AutoItX3Control & WScript Shell Sample

[newsak2005]

Example:AutoItX3Control & WScriptShell

;============AutoItX3 & WScript Object Shell==============
Local $oAutoIt, $ShellObj

$oAutoIt=ObjCreate("AutoItX3.Control")
$ShellObj=ObjCreate("WScript.Shell")
$ShellObj.Popup ("Run Notepad", 0, "Sample", 0)
$ShellObj.Run ("Notepad.exe", 1, False)
$oAutoIt.WinWait("[Class:Notepad]")
$oAutoIt.WinMove("[Class:Notepad]", "", 320, 270, 400, 250)
$oAutoIt.Sleep(1000)
$ShellObj.SendKeys ("Send text with WScript.Shell"&@CRLF)
$oAutoIt.Sleep(1500)
$oAutoIt.Send("Send text with AutoItX3.Control")
$oAutoIt.Sleep(1500)
$oAutoIt.WinClose("[Class:Notepad]")
$oAutoIt.Sleep(1500)
MsgBox(64, "Sample", "ExitApp", 1)
$oAutoIt.Send("!N")
;=========================================================