Поочередное авто заполнение поля

zonderz · Отправлено: **04:09, 11-04-2010** | #2

Hawk37,

возможно все!

учитесь работать со справкой.

fileopen, filereadline, _filecountlines

пример алгоритма (логика) - это не рабочий код autoit!!!

Код:

  file = base.txt
  a = _FileCountLines (file)
  FileOpen (file);
  for i:=0  to a - 1 do
  begin
     WinOpen (IE);
     Send (FileReadLine(i));
     Send (EnterButton);
     WinClose (IE);  
     Sleep (1000);
  end;

Hawk37 · Отправлено: **20:17, 12-04-2010** | #3

zonderz, Была бы у мну справка на РуссиШээ )

ПОМОГИ ТОВАРИСЧУ! НАКАЙ МНЕ ЭТОТ СКРИПТ!!

Hawk37 · Отправлено: **20:36, 12-04-2010** | #4

Слушай ну напиши этот КОД!!!

madmasles · Конфигурация компьютера

Hawk37,
Русская справка
Попробуйте так:

Код:

#include <IE.au3>
#include <file.au3>

Dim $aArray
_FileReadToArray("base.txt", $aArray)
For $i = 1 To $aArray[0]
    $oIE = _IECreate("URL");адрес тоже как-то менять, наверное, надо?
    $oForm = _IEFormGetObjByName($oIE, "Auth")
    $oUser = _IEGetObjByName($oIE, "numerocell")
    _IEFormElementSetValue($oUser, $aArray[$i])
    $iMsgBoxAnswer = MsgBox(68, "", "Ввели строку: " & _IEFormElementGetValue($oUser) & @CRLF & "Продолжить?")
    Select
        Case $iMsgBoxAnswer = 6
            _IEFormSubmit($oForm)
            _IELoadWait($oIE)
            _IEQuit($oIE)
        Case $iMsgBoxAnswer = 7
            _IEQuit($oIE)
            ContinueLoop
    EndSelect
Next