Сайт не дам, стесняюсь
Немного поплагиатил и на основе готового варианта сделал так:
Код:
#Include <WinAPI.au3>
$hWnd = WinGetHandle("нужный сайт")
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{TAB}")
_SendMessage($hWnd, 0x6, 0x1)
_SendMessage($hWnd, 0x6, 0x1)
ControlSend($hWnd, "", "", "{ENTER}")
_SendMessage($hWnd, 0x6, 0x1)
Sleep(3000)
А как его теперь зациклить?
а то go to что-то не помогает
И еще, пытался прикрутить поиск окна по процессу, т.к. планирую запустить несколько окон, как вариант в разных браузерах, пока прихобится создавать в виндовс учетки, тоже извращентство. Ну так вот, тоже нарыл тут код:
Код:
$sWindow = _ProcessGetWindow("сhrome.exe", 1)
ConsoleWrite($sWindow & @CRLF)
Func _ProcessGetWindow($iPID, $iRet=-1)
Local $aWinList = WinList()
Local $aRet[2]
If IsString($iPID) Then $iPID = ProcessExists($iPID)
For $i = 1 To UBound($aWinList)-1
If WinGetProcess($aWinList[$i][1]) = $iPID Then
$aRet[0] = $aWinList[$i][0] ;Title
$aRet[1] = $aWinList[$i][1] ;WinHandle
If $iRet = 0 Then Return $aRet[0]
If $iRet = 1 Then Return $aRet[1]
Return $aRet
EndIf
Next
Return SetError(1, 0, $aRet)
EndFunc
но оно не работает=( а пишет вот чаво:
Line 64
(File "C:\Documents and 5ettings\Zbruy\Pa6o4MM стол\Копия сайт тест.аиЗ")
: Func _ProcessGetWindow($iPID, $iRet=-l)
Error: Duplicate function name.
