Что нового

[Сеть, интернет] Определение действия через браузер

VermanVendetta13

Новичок
Сообщения
147
Репутация
0
Версия AutoIt: 3.3.14.1

Описание: Необходимо сделать скрипт который бы определил что ему делать по данным на на странице браузера.
Для этого, я отдельно создал аккаунт нужного сайта. Чтобы увидеть сраницу которую нужно доделать в скрипте дождитесь после запуска скрипта окна в котором увидите "Wait"

для конкретики:
Скрипт заходит на сайт. переходит по нужным ссылкам. открывает окно в котором указано какую картинку нажать. Нужно определить какую картинку нужно нажать и вставить ниже для выполнения "If"

Примечания: основной код который удалось сделать. такое количество tab только по причине лени отслеживать ссылки

Код:
#include <IE.au3>
$oIE = _IECreate ("http://www.twodollarptc.com/index.php?view=login&")
Sleep (5000)
For $Idx = 1 to 18
Send("{tab}")

Next
Send("TestAutoit")
Send("{tab}")
Send("TestAutoit")
Send("{tab}")
Send("{tab}")
Send("{enter}")
Sleep (5000)
For $Idx = 1 to 33
Send("{tab}")

Next
Send("{enter}")
Sleep (5000)
For $Idx = 1 to 29
Send("{tab}")

Next
Send("{enter}")
Sleep (5000)
For $Idx = 1 to 34
Send("{tab}")

Next
Send("{enter}")
Sleep (16000)


; ЗДЕСЬ СКРИПТ ДОЛЖЕН ОПРЕДЕЛИТЬ КАКУЮ ЦИФРУ НЕОБХОДИМО НАЖАТЬ


While 1

If Цифра 1 Then
 
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/1.png?v3")  
EndIf
  If Цифра 2 Then
	
  
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/2.png?v3")
 EndIf
 If Цифра 3 Then
	
   
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/3.png?v3")
 EndIf
 If  Цифра 4 Then
	
  
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/4.png?v3")
 EndIf
If Цифра 5 Then
	
   
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/5.png?v3")
 EndIf
 If Цифра 6 Then
	
   Then
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/6.png?v3")
 EndIf
 If Цифра 7 Then
	
   
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/7.png?v3")
 EndIf
If Цифра 8 Then
	
   
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/8.png?v3")
 EndIf
If Цифра 9 Then
	
  
 _IEImgClick ($oIE, "http://www.twodollarptc.com/clickimages/9.png?v3")
 EndIf
 WEnd
 

InnI

AutoIT Гуру
Сообщения
4,911
Репутация
1,427
Код:
#include <IE.au3>

$oIE = _IEAttach("Viewing Ad")

$oFrame = _IEFrameGetObjByName($oIE, "surftopframe")
$oTimer = _IEGetObjById($oFrame, "timer")
$sText = _IEPropertyGet($oTimer, "innertext")
$sDigit = StringRight($sText, 1)
_IEImgClick($oFrame, "clickimages/" & $sDigit & ".png", "src", 0, 0)
 
Автор
V

VermanVendetta13

Новичок
Сообщения
147
Репутация
0
InnI сказал(а):
Код:
#include <IE.au3>

$oIE = _IEAttach("Viewing Ad")

$oFrame = _IEFrameGetObjByName($oIE, "surftopframe")
$oTimer = _IEGetObjById($oFrame, "timer")
$sText = _IEPropertyGet($oTimer, "innertext")
$sDigit = StringRight($sText, 1)
_IEImgClick($oFrame, "clickimages/" & $sDigit & ".png", "src", 0, 0)




Я конечно могу и тупить в пять утра, но все же

вот такая вот ошибочка

Код:
"C:\Program Files (x86)\AutoIt3\Include\IE.au3" (344) : ==> The requested action with this object has failed.:
$sTmp = $oWindow.type



код я запихал как есть

Код:
#include <IE.au3>
$oIE = _IECreate ("http://www.twodollarptc.com/index.php?view=login&")
Sleep (5000)
For $Idx = 1 to 18
Send("{tab}")

Next
Send("TestAutoit")
Send("{tab}")
Send("TestAutoit")
Send("{tab}")
Send("{tab}")
Send("{enter}")
Sleep (5000)
For $Idx = 1 to 33
Send("{tab}")

Next
Send("{enter}")
Sleep (5000)
For $Idx = 1 to 29
Send("{tab}")

Next
Send("{enter}")
Sleep (5000)
For $Idx = 1 to 34
Send("{tab}")

Next
Send("{enter}")
Sleep (16000)



$oIE = _IEAttach("Viewing Ad")

$oFrame = _IEFrameGetObjByName($oIE, "surftopframe")
$oTimer = _IEGetObjById($oFrame, "timer")
$sText = _IEPropertyGet($oTimer, "innertext")
$sDigit = StringRight($sText, 1)
_IEImgClick($oFrame, "clickimages/" & $sDigit & ".png", "src", 0, 0)
 

InnI

AutoIT Гуру
Сообщения
4,911
Репутация
1,427
VermanVendetta13
код я запихал как есть
У меня ваш код на нужную страницу не переходит, поэтому я его не использовал.
А пример я делал уже находясь на странице с истёкшим временем Wait, когда отображаются и надпись "Click" и кнопки.
 
Верх