프로그램 제작중인데 확인좀~~ > 십년전오늘

십년전오늘

10년전 추억의 책장을 넘기며

프로그램 제작중인데 확인좀~~ 정보

프로그램 제작중인데 확인좀~~

본문

http://terrorboy.net/terrorboy.zip

일단 처음 실행시 자동으로 환경파일(config.ini) 생성하고
"키값이 없거나 잘못 된 키값입니다."
라는 메시지가 뜹니다.
그다음 환경설정에서 키값을 "7777"으로 설정하고 프로그램을 종료후 다시 실행하면
"정상적인 키값 입니다."
가 떠야 정상입니다.

댓글 전체

#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=config\terrorboy.ico
#AutoIt3Wrapper_outfile=Terrorboy.exe
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; 제작 : Terrorboy (임동덕)
; Copyright ⓒ 2011 by Terrorboy All Rights Reserved
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;중요 소스
;iniWrite("config.ini", "test", "test", "값1") ; ini생성 "파일이름", "세션", "키", "값"
;IniRead("config.ini", "test", "test", ""); conf.ini를 읽는다 "파일위치&파일명", "세션", "키", "값"
;;;;;;;;;;;;;;;;;;
;$load_init = IniRead("config.ini", "test", "test", "") ; config.ini에 test세션에 test키의 값을 $load_init에 할당한다.
;GUICtrlCreateLabel($load_init,100,50,320,30) ; 위에서 할당한 것을 출력한다
;$ini_file = FileExists("config.ini") ; 파일이 있는지 확인한다.
;If $ini_file = 1 Then ; 파일이 있다면(1) 파일 있수를 출력
; GUICtrlCreateLabel("파일있수",100,50,320,30)
;Else ; 파일이 없다면 파일없수를 출력
; GUICtrlCreateLabel("파일없수",100,50,320,30)
;EndIf
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#include <guiconstants.au3>
#include <IE.au3>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 중복실행방지 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#include <Misc.au3> ;중복실행 방지 라이브러리?
If _Singleton(@ScriptName, 1) = 0 Then
    Exit
EndIf
;;;;;;;;;;;;;;;;;;;;;;;;;;; 스플레시 이미지 ;;;;;;;;;;;;;;;;;;;;;;;;;;
SplashImageOn("Splash", @ScriptDir & "\config\logo.jpg", 420, 150, @DesktopWidth, @DesktopHeight, 1)
WinSetTrans("Splash","",1)
WinMove("Splash","", @DesktopWidth/2-420/2, @DesktopHeight/2-150/2)
For $trans=0 to 255
WinSetTrans("Splash","",$trans)
$trans+=1
Sleep(10)
Next
Sleep(500)
For $trans=255 to 0 Step -1
$trans-=1
WinSetTrans("Splash","",$trans)
Sleep(10)
Next
SplashOff()
;;;;;;;;;;;;;;;;;;;;;;;;;;; 창기본설정 분리 ;;;;;;;;;;;;;;;;;;;;;;;;;;
$icon = @ScriptDir & "\config\terrorboy.ico" ; 아이콘 설정 분리
$main_title = "Terrorboy 자동 알림이" ; 메인 창이름 설정 분리
$config_title = "환경설정" ; 환경절정창 창이름 설정 분리
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


;;;;; 창설정
$gui = GUICreate($main_title ,500,500) ; 500*500으로 새창을 만듭니다.
GUISetIcon($icon,"main") ; 새창의 아이콘을 추가해줍니다. "아이콘위치", "아이콘이름"
GUISetState(@SW_SHOW) ;새창을 보여줍니다.
;; 텍스트1설정
$msg = GUICtrlCreateLabel("자동 알림 테스트 입니다.",100,10,320,30) ; 왼쪽 100, 위쪽 10, 가로 320, 세로 30의 텍스트를 뿌립니다.
GUICtrlSetBkColor($msg, 0x000000) ; 배경을 검정으로 설정합니다.
GUICtrlSetColor($msg, 0xffffff) ; 폰트 색상을 하얀색으로 설정합니다.
GUICtrlSetFont($msg,20) ; 폰트크기를 20으로 설정합니다.


;;;;; 환경설정 창 설정
$config_win_pos = WinGetPos($gui, "")
$config_win = GUICreate($config_title, 300, 170,$config_win_pos[0]  +100, $config_win_pos[1] + 100,-1,-1,  $gui)

$ini_file = FileExists(@ScriptDir & "\config\config.ini") ; 파일이 있는지 확인을 위하여 변수에 할당
if $ini_file = 1 Then ; 파일이 있으면..
Else ; 파일이 없으면...
iniWrite(@ScriptDir & "\config\config.ini", "INFO", "key", "키 값이 없습니다.") ; 발급아이디 정보
iniWrite(@ScriptDir & "\config\config.ini", "INFO", "host", "http://terrorboy.net/autoit.php") ; 호스트 정보
iniWrite(@ScriptDir & "\config\config.ini", "INFO", "boot", "1") ; 부트정보
EndIf
;;;;;;;;;; 리드된정보를 변수에 할당
$key = IniRead(@ScriptDir & "\config\config.ini", "INFO", "key", "")
$host = IniRead(@ScriptDir & "\config\config.ini", "INFO", "host", "")
$boot = IniRead(@ScriptDir & "\config\config.ini", "INFO", "boot", "non")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
GUICtrlCreateGroup($config_title, 0, 10, 300, 113) ; 그룹생성
GUICtrlCreateLabel("발급 아이디 ",10,35,70,20) ; "발급아이디" 텍스트 출력
$key_value = GUICtrlCreateInput($key,80, 30,200,20) ; 발급아이디 인풋박스 생성
;GUICtrlSetData($key_value, $key) ; ini에서 불러와 인뭇에 데이터 입힘
GUICtrlCreateLabel("접속 호스트 ",10,65,70,20) ; 호스트 인풋박스 생성
$host_value = GUICtrlCreateInput("",80,60,200,20)
GUICtrlSetData($host_value, $host) ; ini에서 불러와 인뭇에 데이터 입힘
GUICtrlCreateLabel("부트시 시작 ",10, 95,70,20) ; 부트 인풋박스 생성
$boot_value = GUICtrlCreateCheckbox("",80,85,30,30)
;GUICtrlSetData($boot_value, $boot) ; ini에서 불러와 인뭇에 데이터 입힘
If $boot = 1 Then ; "부트시 시작" 값이 1이면...
GUICtrlSetState(-1, $gui_checked) ; 체크박스를 체크하라~
EndIf
$config_win_ok =GUICtrlCreateButton("확인", 100, 130, 50, 30)
$config_win_cancel =GUICtrlCreateButton("취소", 150, 130, 50, 30)
GUISetIcon($icon,"config") ; 환경설정의 아이콘을 추가해줍니다. "아이콘위치", "아이콘이름"
GUISetState(@SW_SHOW,$gui)


;;;; 브라우저 삽입
$object = ObjCreate("Shell.Explorer.2")
$object_ctrl = GUICtrlCreateObj($object, 100, 50, 200, 200)
_IENavigate($object, $host & "?user_key=" & $key)
GUISetState()


;;;;; 일반 메뉴 설정
$menu = GUICtrlCreateMenu("메뉴") ; menu를 생성합니다.
$menu_1 = GUICtrlCreateMenuItem("종료", $menu) ; menu-종료를 생성합니다.
$menu2 = GUICtrlCreateMenu("환경설정")
$menu2_1 = GUICtrlCreateMenuItem("환경설정", $menu2)
guictrlcreatemenuitem("", $menu2) ; 메뉴 라인 추가
$menu2_2  = guictrlcreatemenuitem("도움말", $menu2)


;;;;트레이드 설정
$tray_text = GUICtrlCreateButton("도움말 보기",  230, 400)
TraySetIcon($icon,"icon") ; 트레이드 아이콘을 변경합니다. "아이콘위치", "아이콘이름"
;; 트레이드메뉴 설정
Opt("traymenumode", 3)
$traymenu1 = TrayCreateMenu("메뉴")
$sub_menu1 = TrayCreateItem("메뉴1", $traymenu1)
$sub_menu2 = TrayCreateItem("메뉴2", $traymenu1)
TrayCreateItem("")
$traymenu2 = TrayCreateItem("정보")
TrayCreateItem("")
$traymenu_exit = TrayCreateItem("EXIT")
TraySetState()



;;;; 작동?설정
While 1
 $msg = guigetmsg(1)
 $tray = TrayGetMsg()

 ;if $msg = $gui_event_close then ExitLoop ; 창의 기본닫기 작동되게 설정


; 창 내부 객체 선택
Switch $msg[0]

        Case $msg[0] = $GUI_EVENT_CLOSE
            If $msg[1] = $config_win Then
                GUISetState(@SW_HIDE, $config_win)
            ElseIf $msg[1] = $gui Then
                GUIDelete($gui)
                Exit
            EndIf


; 메뉴 설정
case $menu_1 ; menu-종료 설정
Exit

case $menu2_1 ; 환경설정을 선택
GUISetState(@SW_SHOW, $config_win)

case $config_win_cancel ; 환경설정에서 취소를 누른 경우
GUISetState(@SW_HIDE, $config_win)

Case $config_win_ok  ; 환경설정에서 확인을 누른 경우
;;;;;; 데이터 텍스트로 변수에 담음
$value1 = GUICtrlRead($key_value) ; 발급아이디데이터 리로드
$value2 = GUICtrlRead($host_value) ; 호스트 데이터 리로드
$value3 = GUICtrlRead($boot_value) ; 부트 데이터 리로드
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
iniWrite(@ScriptDir & "\config\config.ini", "INFO", "key", $value1) ; 발급아이디 정보 갱신
iniWrite(@ScriptDir & "\config\config.ini", "INFO", "host", $value2) ; 호스트 정보 갱신
iniWrite(@ScriptDir & "\config\config.ini", "INFO", "boot", $value3) ; 부트정보 갱신
GUISetState(@SW_HIDE, $config_win)

case $tray_text ; 도움말 보기 클릭했을때
TrayTip ("도착한 메시지 입니다.", "ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ", 5) ; 트레이드 아이콘 지역에 도움말 띄움~

Case $menu2_2
MsgBox(48, "도움말", "* 본 프로그램은 거래목적으로 사용하실수 없습니다." & @CRLF & "* 본 프로그램을 불법적인 용도로 사용을 금합니다." & @CRLF & "* 본 프로그램의 저작권은 Terrorboy(임동덕)에게 있습니다." & @CRLF & "* 위 약관을 지키신다면 사용 목적에는 제한이 없습니다." & @CRLF & @CRLF & "Copyright ⓒ 2011 by Terrorboy All Rights Reserved")


EndSwitch

; 트레이드 메뉴 선택
Switch $tray
case $traymenu_exit
Exit
EndSwitch


WEnd
소스 전문 입니다.
해킹 또는 크레킹 프로그램일시 알집이나 백신 프로그램에서 1차적으로 필터링되며 사용자 컴퓨터 조작은 ini파일 생성 이외 없습니다.
걱정 되신다면 테스트 안해주셔도 됩니다. ^^
요즘 세상이 세상인 만큼 조심해서 안좋은것은 없으니까요
전체 135,051
십년전오늘 내용 검색

회원로그인

(주)에스아이알소프트 / 대표:홍석명 / (06211) 서울특별시 강남구 역삼동 707-34 한신인터밸리24 서관 1402호 / E-Mail: admin@sir.kr
사업자등록번호: 217-81-36347 / 통신판매업신고번호:2014-서울강남-02098호 / 개인정보보호책임자:김민섭(minsup@sir.kr)
© SIRSOFT