티스토리 뷰

Auto It

autoit-1소스

만키로군 2011. 12. 20. 12:25

Alzip.au3

AutoItSetOption("TrayIconHide",0)             --->>> 트레이아이콘 설치아이콘을 표시여부(0 =표시,1=표시안함)
AutoItSetOption("WinTitleMatchMode",1)    --->>> 무인설치방법(윈도우창 제목을 통한 방법)
 

;파일명
Global $AppName1 = "ALZip74.EXE /VERYSILENT /SP-"

;타이틀
Global $wTitle01 = "환경 설정"

;윈도우 텍스트
Global $wText01 = "아이콘"

;실행 차례
Global $wAct01 = "!O"

;If Not FileExists($AppName1) Then Exit


RUN($AppName1)

While 1
Select

 Case WinActive($wTitle01, $wText01)
  Send($wAct01)
  ExitLoop
 Case WinActivate($wTitle01, $wText01)
  Send($wAct01)
  ExitLoop
 
Endselect
WEnd

Exit

 

------------------------------------------------------------------------------------------

마우스 사용하기

WINMOVE("네이트온 설치 프로그램","네이트온 설치완료",0,0)
MOUSECLICK("LEFT",49,170)

 

------------------------------------------------------------------------------------------

MSI 파일 실행시키기

RunWait(@COMSPEC & " /c Start HOFFICEK.MSI")

------------------------------------------------------------------------------------------

다운 받기

$downfile = "http://nateondownload.nate.com/download/NATEON37.EXE"    

$filesize = InetGetSize( $downfile )
DirCreate("C:\snoopy")                                                                          

ProgressOn("네이트온 다운로드", "다운로드 진행상황", "0% 다운로드 중...")   

InetGet($downfile, "C:\snoopy\nateon37.exe",1,1)        

While @InetGetActive
$downsize = @InetGetBytesRead
$per = ($downsize / $filesize) * 100
$per = Int( $per )
ProgressSet( $per, $per & "% 다운로드 중...")
Sleep(200)
WEnd
ProgressSet(100 , "다운로드를 완료하였습니다.", "완료")
Sleep(500)
ProgressOff()

 

FileDelete("C:\snoopy\nateon37.exe")
DirRemove("C:\snoopy")

------------------------------------------------------------------------------------------

Handy_Auto.au3

 

AutoItSetOption("TrayIconHide",0)
AutoItSetOption("WinTitleMatchMode",1)

 

;기본정보
Global $AppName1 = "Hwp2005Patch_1020.exe"
Global $AppName2 = "HANDYGroupware.exe"
Global $wTitle = "한글 2005 업데이트"
Global $wTitle_0 = "HANDY Groupware 6 - InstallShield Wizard"
Global $wTitle_1 = "자동 등록 오류"
Global $wTitle_2 = "설치 끝내기"

 

;윈도우 텍스트
Global $wText001 = "한컴 업데이트 마법사입니다."
Global $wText002 = "한컴 업데이트 마법사가 설치를 끝냈습니다."
Global $wText01 = "HANDY Groupware 6 InstallShield Wizard입니다."
Global $wText02 = "HANDY Groupware 6 설치 위치:"
Global $wText03 = "이제 프로그램을 설치할 수 있습니다."
Global $wText04 = "설치했습니다."
Global $wText05 = "프로그램을 수정, 복구 또는 제거합니다."
Global $wText06 = "제거 완료"
Global $wText011 = "다음 파일을 자동 등록하거나 등록하지 않습니다:"
Global $wText021 = "관리 완료"

 

;실행 차례
Global $wAct001 = "!N"
Global $wAct002 = "{SPACE}{TAB}{SPACE}"

Global $wAct01 = "!N"
Global $wAct02 = "!N"
Global $wAct03 = "!I"
Global $wAct04 = "{SPACE}"
Global $wAct05 = "!R!N"
Global $wAct06 = "{SPACE}"

Global $wAct011 = "{SPACE}"

Global $wAct07 = "!B"
Global $wAct08 = "!Y"
Global $wAct09 = "{SPACE}"


If Not FileExists($AppName1) Then Exit
If Not FileExists($AppName2) Then Exit


RUN($AppName2)

While 1
Select


 ;설치
 Case WinActive($wTitle_0, $wText01)
  Send($wAct01)
 Case WinActivate($wTitle_0, $wText01)
  Send($wAct01)

 Case WinActive($wTitle_0, $wText02)
  Send($wAct02)
 Case WinActivate($wTitle_0, $wText02)
  Send($wAct02)

 Case WinActive($wTitle_0, $wText03)
  Send($wAct03)
 Case WinActivate($wTitle_0, $wText03)
  Send($wAct03)

 Case WinActive($wTitle_0, $wText04)
  Send($wAct04)
  ExitLoop
 Case WinActivate($wTitle_0, $wText04)
  Send($wAct04)
  ExitLoop

 

 ;제거
 Case WinActive($wTitle_0, $wText05)
  Send($wAct05)
 Case WinActivate($wTitle_0, $wText05)
  Send($wAct05)
 Case WinActive($wTitle_0, $wText06)
  Send($wAct06)
  ExitLoop
 Case WinActivate($wTitle_0, $wText06)
  Send($wAct06)
  ExitLoop
 
 ;오류메시지
 Case WinActive($wTitle_1, $wText011)
  Send($wAct011)
 Case WinActivate($wTitle_1, $wText011)
  Send($wAct011)
 
Endselect
WEnd

Sleep(5000)

RUN($AppName2)

While 1
Select
 ;설치
 Case WinActive($wTitle_0, $wText01)
  Send($wAct01)
 Case WinActivate($wTitle_0, $wText01)
  Send($wAct01)

 Case WinActive($wTitle_0, $wText02)
  Send($wAct02)
 Case WinActivate($wTitle_0, $wText02)
  Send($wAct02)

 Case WinActive($wTitle_0, $wText03)
  Send($wAct03)
 Case WinActivate($wTitle_0, $wText03)
  Send($wAct03)

 Case WinActive($wTitle_0, $wText04)
  Send($wAct04)
  ExitLoop
 Case WinActivate($wTitle_0, $wText04)
  Send($wAct04)
  ExitLoop

 ;취소
 Case WinActive($wTitle_0, $wText05)
  Send($wAct07)
 Case WinActivate($wTitle_0, $wText05)
  Send($wAct07)
 Case WinActive($wTitle_0, $wText021)
  Send($wAct04)
  ExitLoop
 Case WinActivate($wTitle_0, $wText021)
  Send($wAct04)
  ExitLoop


Endselect
WEnd

RUN("handy.exe")

RUN("Patch.exe")

RUN($AppName1)

While 1
Select
 Case WinActive($wTitle, $wText001)
  Send($wAct001)
 Case WinActivate($wTitle,$wText001)
  Send($wAct001)

 Case WinActive($wTitle, $wText002)
  Send($wAct002)
  ExitLoop
 Case WinActivate($wTitle,$wText002)
  Send($wAct002)
  ExitLoop

Endselect
WEnd


Exit

[출처] AutoIt Ex|작성자 사달스우드

'Auto It' 카테고리의 다른 글

autoit-1소스  (0) 2011.12.20
댓글
댓글쓰기 폼