[DENoszone]

а может эта программа производить поиск по брауеру по открытой странице и нажимать на определыные фразы?


как добавить в скрипт что бы нажималась "Page Down"
Maza Faka, как сделать что бы последний клик в цикле все время изменялся +10 по Х

[Maza Faka]

а может эта программа производить поиск по брауеру по открытой странице и нажимать на определыные фразы? »

Смотри в справке функцию _IELinkClickByText().

как добавить в скрипт что бы нажималась "Page Down" »

Код:

Send("{PGDN}")

как сделать что бы последний клик в цикле все время изменялся +10 по Х »

Если я правильно тебя понял:

Код:

Opt("MouseClickDelay", 50) ;Задаём паузу между кликами мыши в 50 милисекунд

HotKeySet("{Esc}", "_Exit") ;задаём горячую клавишу (Escape) для завершения скрипта

Dim $plus = 0
Global $aMousePos[11][2] ;создаём двумерный массив

$aMousePos[0][0] = 10 ;указываем кол-во элементов

;Заполняем 0 размерность Х-координатами
$aMousePos[1][0] = 100
$aMousePos[2][0] = 200
$aMousePos[3][0] = 300
$aMousePos[4][0] = 400
$aMousePos[5][0] = 500
$aMousePos[6][0] = 600
$aMousePos[7][0] = 700
$aMousePos[8][0] = 800
$aMousePos[9][0] = 900
$aMousePos[10][0] = 1000

;Заполняем 1 размерность Y-координатами
$aMousePos[1][1] = 50
$aMousePos[2][1] = 100
$aMousePos[3][1] = 150
$aMousePos[4][1] = 200
$aMousePos[5][1] = 250
$aMousePos[6][1] = 300
$aMousePos[7][1] = 350
$aMousePos[8][1] = 400
$aMousePos[9][1] = 450
$aMousePos[10][1] = 500

;запускаем цикл
While 1
    For $i = 1 To $aMousePos[0][0]
        If $i = 10 Then
            $plus += 10
            MouseClick("left", $aMousePos[$i][0] + $plus, $aMousePos[$i][1]) ;последний клик в цикле все время изменяется +10 по Х
            ContinueLoop
        EndIf
        MouseClick("left", $aMousePos[$i][0], $aMousePos[$i][1]) ;кликаем в 10 разных местах
    Next

    MouseClick("left", 10, 10, 1, 50) ;потом ещё в 1 месте :)
    Sleep(50)
WEnd

Func _Exit()
    $aMousePos = 0
    Exit
EndFunc

[DENoszone]

я уже наверное достал.но не как не могу понять как это все работает =((

1. как кликать в браузере по определеному тексту "Нажми сюда"
2. Как можно копировать title сайта и вставлять на другой сайт в форму поиска.
3. Как обновлять страницу? браузер.
4. можно начинать цикл только когда сайт полностью заргружен или на 90% ?
5. есть какой то норм мануал русский по этой проге?
заранее спасибо

[prokazzza]

Maza Faka,

Надеюсь, что Creat0R не обидится, если отвечу я »

Все работает, но мне не нужно окно, с надписью о том что библиотека загрегина, я бы мог воспользоваться батником.Есть решения этого???

[HORRIBLE]

DENoszone,

1. как кликать в браузере по определеному тексту "Нажми сюда"

PHP код:

#include <IE.au3>

$oIE = _IECreate ("http://forum.oszone.net" )



_IELoadWait ($oIE)

MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Автоматическая установка приложений >>",3)

_IELinkClickByText ($oIE, "Автоматическая установка приложений")

   

 _IELoadWait ($oIE)

 MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << AutoIt скрипты .:[общие вопросы]:. >>",3)

 _IELinkClickByText ($oIE, "AutoIt скрипты .:[общие вопросы]:.")



  _IELoadWait ($oIE)

  MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Последняя » >>",3)

  _IELinkClickByText ($oIE, "Последняя »") 

2. Как можно копировать title сайта и вставлять на другой сайт в форму поиска.

PHP код:

#include <IE.au3>

$oIE = _IECreate ("http://forum.oszone.net" )

_IELoadWait ($oIE)



MsgBox(0, "<title> сайта", _IEPropertyGet ($oIE,"title")) ;title  форума



$oIE_2 = _IECreate ("http://www.yandex.ru")

_IELoadWait ($oIE_2)

$oForm = _IEFormGetObjByName ($oIE_2, 0)

$oQuery = _IEFormElementGetObjByName ($oForm, 0)

_IEFormElementSetValue ($oQuery, _IEPropertyGet ($oIE,"title"))

_IEFormSubmit ($oForm) 

3. Как обновлять страницу? браузер.

PHP код:

_IEAction ($oIE, "refresh") 

4. можно начинать цикл только когда сайт полностью заргружен.

Код:

_IELoadWait ($oIE) ;ждем пока все не загрузится, после чего работаем дальше.

[DENoszone]

Блин. как научится работать с этой программой?=(
а то стыдно уже тут спрашивать.

PHP код:

#include <IE.au3>   $oIE = _IECreate ("http://forum.oszone.net" )   _IELoadWait ($oIE)   MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Автоматическая установка приложений >>",3)   _IELinkClickByText ($oIE, "Автоматическая установка приложений")   _IELoadWait ($oIE)   MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << AutoIt скрипты .:[общие вопросы]:. >>",3)   _IELinkClickByText ($oIE, "AutoIt скрипты .:[общие вопросы]:.")   _IELoadWait ($oIE)   MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Последняя » >>",3)   _IELinkClickByText ($oIE, "Последняя »") 

как из этого сделать цикл?

PHP код:

#include <IE.au3>   $oIE = _IECreate ("http://forum.oszone.net" )   _IELoadWait ($oIE)     MsgBox(0, "AddressBar Status", _IEPropertyGet ($oIE,"title")) ;title  форума     $oIE_2 = _IECreate ("http://www.yandex.ru")   _IELoadWait ($oIE_2)   $oForm = _IEFormGetObjByName ($oIE_2, 0)   $oQuery = _IEFormElementGetObjByName ($oForm, 0)   _IEFormElementSetValue ($oQuery, _IEPropertyGet ($oIE,"title"))   _IEFormSubmit ($oForm) 

это классно...но билн даже не могу сделать что бы загружалась страница с таитлом...потом в другой сайт куда в писывает title вписывало и переходило обратно на сайт с title и обновлял её....опять брал title и шел в писывал в сайт.
понятно?

[HORRIBLE]

PHP код:

$oFrames = _IEFrameGetCollection ($oIE)

            $iNumFrames = @extended

            For $i = 0 to ($iNumFrames - 1)

              local $oFrame = _IEFrameGetCollection ($oIE, $i)

               _IELoadWait ($oFrame)

           next 

Это взято из примера, ожидаем пока на страничке загрузятся все фрэймы, проблема вот в чем, иногда бывает так, что при работе этой части, во время ожидания, страничка может вылететь на главную или ее вооще могут закрыть, из за этого вылазит ошибка которая прекращает дальнейшее выполнение программы, возможно ли это как нибуть исправить чтоб ошибки не было , а просто шла далее.....

и еще одно, я наверно что то не так делаю. Не получается скопировать, что угодно со странички если использовать ClipPut(""), как тогда быть, если мне перед выполнением необходимо его все таки почистить ?
вот есть

читать дальше »

PHP код:

ClipPut("")



$start_2 = "Этаж 1"

      _WaitLoad();ожидание загрузки

      MouseClickDrag("left", 972, 168, 1178,168)

      ControlSend("title","","","{Ctrl}+{C}") <-- это правильно написано?

;ControlSend("title","","[Class: Internet Explorer_Server; Instance:1]","{Ctrl}+{C}") <--или это?

      ;Send("^{c}")



         ;обрезаем излишки скопированного слова........

         $len_start_2 = StringLen($start_2)

         $len_Clip_2 = StringLen(ClipGet())

         $len_Clip_sum_2 = Abs($len_Clip_2 - $len_start_2)

         $result_start_2 = StringTrimRight(ClipGet(), $len_Clip_sum_2)



            $compare_2=StringCompare ( $result_start_2, $start_2, 2)

            if $compare_2 = 0 then

            exit

            endif 

Спасибо.

[Creat0R]

prokazzza,

мне не нужно окно, с надписью о том что библиотека загрегина

regsvr32.exe /?

Использование: regsvr32 [/u] [/s] [/n] [/i[:строка_команд]] DLL-файл /u - Отменяет регистрацию DLL /s - "Тихий" режим; окна сообщения не отображаются /i - Вызывает DllInstall, передавая параметром необязательную строку_команд, при использовании с ключом /u вызывает DllUnInstall /n - Не вызывает DllRegisterServer; это может использоваться с ключом /i

Соответственно:

Код:

Run(@SystemDir & '\regsvr32.exe /s "' & @ScriptDir & '\Test.dll"')

[DENoszone]

Код:

#include <IE.au3> 


While 1

    
	#include <IE.au3> 
$oIE = _IECreate ("http://www.old-school.ru" ) 

_IELoadWait ($oIE) 
MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Всем любителям проходить тест >>",3) 
_IELinkClickByText ($oIE, "Всем любителям проходить тест") 
    
 _IELoadWait ($oIE) 
 MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Пригласить в группу >>",3) 
 _IELinkClickByText ($oIE, "Пригласить в группу") 

  _IELoadWait ($oIE) 
  MsgBox(0,_IEPropertyGet ($oIE,"title"),"Кликаем по: << Начать поиск » >>",3) 
  _IELinkClickByText ($oIE, "Начать поиск »") 
	
wend

вот по пытался.
не фига не вышло.
КАК отметить галочку? она единственая на странице

[NikLok]

Возник вопрос о сохранении - загрузке данных. Имеется скрипт, кончено же с туевой хучей данных-переменных. После его завершения требуется сохранить все установки, до след сеанса работы, в котором конечно прочитать их. Данные эти весьма разнородны, от переменных до состояния чекбоксов. Что посоветуете коллеги?!