2012. 12. 27. 23:23
스크립트 오류 입니다..
눈팅만 하세요 ㅠㅠ..
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=보조파일\86_1_t.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\jnb\desktop\form1.kxf
$Form1_1 = GUICreate("Photoshop CS6 (x86) 한/영 ", 277, 110, 801, 137)
$Button1 = GUICtrlCreateButton("Korea Ps", 104, 16, 155, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "한글 포토샾 실행")
$Button2 = GUICtrlCreateButton("English Ps", 104, 64, 155, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "영문 포토샾 실행")
FileInstall("86_1_t.jpg", @TempDir & "\86_1_t.jpg", 0) ;FileInstall을 이용하여 TempDir에 만듭니다..
; FileInstall("86_1_t.jpg" 이 위치는 오토잇 소스가 있는 경로 입니다..
$Pic1 = GUICtrlCreatePic(@TempDir & "\86_1_t.jpg", 8, 8, 84, 92, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
; $Pic1 = 이미지의 경로를 TempDir 로 적어 줍니다....
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Sleep(100)
If Not FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat") Then
Local $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(33, "tw10428.dat 확인 중..." , " 파일이 없습니다.. " & @CRLF & " 영문 Photoshop을 실행 하시겠습니까?. ")
Select
Case $iMsgBoxAnswer = 1 ;OK
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
FileDelete(@TempDir & "\86_1_t.jpg")
Exit
Case $iMsgBoxAnswer = 2 ;Cancel
FileDelete(@TempDir & "\86_1_t.jpg") ;프로스램 종료후 이미지를 삭제 합니다..
Exit
EndSelect
EndIf ;여기까지는 경로에 tw10428.dat파일이 없을경우의 소스 입니다..
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe") ;tw10428.dat파일이 있을경우 실행 합니다..
FileDelete(@TempDir & "\86_1_t.jpg")
Exit
Case $Button2
If FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat") Then ; 경로에 tw10428.dat파일이 있을경우 FileMove를 이용하여 이동 합니다..
FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat")
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
While 1
If Not ProcessExists("Photoshop.exe") = 0 Then ExitLoop
FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
FileDelete(@TempDir & "8\6_1_t.jpg")
Sleep(200)
WEnd
EndIf ; 경로에 tw10428.dat파일이 있을경우 이동후 실행 합니다..
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe") ; 없을경우 바로 실행 합니다..
;saving Settings
If FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat") Then
FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
FileDelete(@TempDir & "8\6_1_t.jpg")
EndIf
Exit
EndSwitch
WEnd
#AutoIt3Wrapper_icon=보조파일\86_1_t.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\jnb\desktop\form1.kxf
$Form1_1 = GUICreate("Photoshop CS6 (x86) 한/영 ", 277, 110, 801, 137)
$Button1 = GUICtrlCreateButton("Korea Ps", 104, 16, 155, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "한글 포토샾 실행")
$Button2 = GUICtrlCreateButton("English Ps", 104, 64, 155, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "영문 포토샾 실행")
FileInstall("86_1_t.jpg", @TempDir & "\86_1_t.jpg", 0) ;FileInstall을 이용하여 TempDir에 만듭니다..
; FileInstall("86_1_t.jpg" 이 위치는 오토잇 소스가 있는 경로 입니다..
$Pic1 = GUICtrlCreatePic(@TempDir & "\86_1_t.jpg", 8, 8, 84, 92, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
; $Pic1 = 이미지의 경로를 TempDir 로 적어 줍니다....
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Sleep(100)
If Not FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat") Then
Local $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(33, "tw10428.dat 확인 중..." , " 파일이 없습니다.. " & @CRLF & " 영문 Photoshop을 실행 하시겠습니까?. ")
Select
Case $iMsgBoxAnswer = 1 ;OK
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
FileDelete(@TempDir & "\86_1_t.jpg")
Exit
Case $iMsgBoxAnswer = 2 ;Cancel
FileDelete(@TempDir & "\86_1_t.jpg") ;프로스램 종료후 이미지를 삭제 합니다..
Exit
EndSelect
EndIf ;여기까지는 경로에 tw10428.dat파일이 없을경우의 소스 입니다..
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe") ;tw10428.dat파일이 있을경우 실행 합니다..
FileDelete(@TempDir & "\86_1_t.jpg")
Exit
Case $Button2
If FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat") Then ; 경로에 tw10428.dat파일이 있을경우 FileMove를 이용하여 이동 합니다..
FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat")
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
While 1
If Not ProcessExists("Photoshop.exe") = 0 Then ExitLoop
FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
FileDelete(@TempDir & "8\6_1_t.jpg")
Sleep(200)
WEnd
EndIf ; 경로에 tw10428.dat파일이 있을경우 이동후 실행 합니다..
RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe") ; 없을경우 바로 실행 합니다..
;saving Settings
If FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat") Then
FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
FileDelete(@TempDir & "8\6_1_t.jpg")
EndIf
Exit
EndSwitch
WEnd
'도움말들.... > 오토잇' 카테고리의 다른 글
2차 - Photoshop CS6 (x86) 한/영 (2) | 2012.12.28 |
---|---|
한글 포토샾 전환 (x86) - 민정님 (3) | 2012.12.28 |
AutoIt + mmacro view (0) | 2012.12.27 |
오토잇 프로그램의 시작.. 민정님 (8) | 2012.12.26 |
Photoshop CS6(x86) 도우미 의 오토잇 소스 (2) | 2012.12.26 |