Что нового

[Сеть, интернет] Игнорируется For;In;Next

Soulgainer

Новичок
Сообщения
3
Репутация
0
Здраствуйте. У меня появилась проблема, с которой я уже не знаю что делать, а именно не работает (хотя по выводу "ConsoleWrite" — он просто игнорируется) For In Next.
Для теста:
В папке создать файл с именем sample_случайные символы без пробелов.расширение (png/jpg)

Отрывок который не работает как следует:

Код:
#include <IE.au3>
$ie_w=_IECreate()
_IENavigate ($ie_w, "http://gelbooru.iqdb.org/", 1)
$fl=FileFindFirstFile("sample_*.*")
$file=FileFindNextFile($fl)
;$flnn = StringTrimLeft($file, 7)
$oInputFile=_IEGetObjById($ie_w, "file")
;_IEAction($oInputFile, "click")
MouseMove(_IEPropertyGet($oInputFile, "screenx") + _IEPropertyGet($oInputFile, "width") - 10, _IEPropertyGet($oInputFile, "screeny") + _IEPropertyGet($oInputFile, "height")/2)
MouseClick("left")
WinWait("Choose File to Upload")
ControlSetText("Choose File to Upload", "", "[CLASS:Edit; INSTANCE:1]", @WorkingDir & "\" & $file) 
ControlClick("Choose File to Upload", "", "[CLASS:Button; INSTANCE:2]")
$oSubmits=_IETagNameGetCollection($ie_w, "submit")
For $oSubmit In $oSubmits
   ConsoleWrite ("Start Collecting")
   If String($oSubmit.Value) == "submit" Then
	  ConsoleWrite ("Collecting Done")
	  _IEAction($oSubmit, "click")
	  _IELoadWait($ie_w)
	  ExitLoop
   EndIf
Next
ConsoleWrite ("Collecting Skipped or Done")
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,673
Репутация
2,486
Нужно проверить что возвращает $oSubmits, и чему равняется @error после вызова _IETagNameGetCollection.
 

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
Код:
$oSubmits=_IETagNameGetCollection($ie_w, "input")

Ведь тэга submit несуществет)


Добавлено:
Сообщение автоматически объединено:

Вы уверены что у вас value = submit, а не type = submit ?
 
Автор
S

Soulgainer

Новичок
Сообщения
3
Репутация
0
Вы уверены что у вас value = submit, а не type = submit ?

:stars:
Вот вырезка из кода страницы:

Код:
<input type="submit" value="submit" accesskey="s">

UPD: Оно заработало! :laugh: Изменил в строке
Код:
$oSubmits=_IETagNameGetCollection($ie_w, "submit")
submit на input и все зашевелилось. Спасибо.
 
Верх