Photoshop CS6 한/영 수정...

스크립트 오류 입니다..

눈팅만 하세요 ㅠㅠ..

 

 

 

#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