Что нового

Adlibregister отказывается работать

rufik

Новичок
Сообщения
33
Репутация
4
Народ, сколько не пробовал, эта функция никак не работает, ни с каким сайтом ни в каком случае...
Помогите :laugh:
Код:
#include <IE.au3>


Local $oIE = _IECreate("google.com")

AdlibRegister("MyAdlib", 60000)
sleep(2000)

Func MyAdlib()
_IELinkClickbytext($oIE,"Картинки")
   Endfunc
      Adlibunregister("MyAdlib")
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
rufik [?]
эта функция никак не работает
Работает.
В коде выше, задаётся вызов функции по истечении 60-ти секунд, а после 2-ух секунд отменяется вызов (AdlibUnRegister) и скрипт завершает свою работу.
Нужно видимо так:

Код:
#include <IE.au3>

Local $oIE = _IECreate("google.com")

AdlibRegister("MyAdlib", 60000)
Sleep(61000)

Func MyAdlib()
    _IELinkClickbytext($oIE,"Картинки")
    AdlibUnRegister("MyAdlib")
Endfunc


Хотя конкретно в данном случае Adlib не нужен, можно просто подождать 60 секунд (Sleep) и вызвать функцию (MyAdlib()).
 
Автор
R

rufik

Новичок
Сообщения
33
Репутация
4
Спасибо, сейчас попробую.
В моем случае надо раз в 5 минут нажать F5 или перейти по определенному сайту, полегче варианта не знаю, поэтому пошел так... Если знаете, подскажите


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

Короче, такой мелкий скрипт сделал
Код:
#include <IE.au3>


Local $oIE = _IECreate("xospital.spaces.ru/Operation")

while 7

_IELinkClickByText($oIE,"Встать в очередь")
_IELinkClickByText($oIE,"Обновить")
sleep(3000)
_IELinkClickByText($oIE,"Перейти")
_IELinkClickByText($oIE,"Бросить кубик")
_IELoadWait($oIE)

AdlibRegister("MyAdlib", 1800000)


WEnd
sleep(1800001)
Func MyAdlib()
send("{F5}")
   Endfunc
      Adlibunregister("MyAdlib")


У меня иногда интернет выкидывает на минуту, при этом открывается ссылка на ИЕ, что нет доступа к сети и скрипт останавливается (всмысле работает, но нечего нажимать). Поэтому поставил функцию F5 на каждые 30 минут. А сайт не могу поставить, так как каждый раз разная операция и разные адрес сайта. Если есть способ полегче, подскажите
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
rufik [?]
такой мелкий скрипт сделал
Adlib там не нужен, да и сама функция тоже:

Код:
#include <IE.au3>

Local $oIE = _IECreate("xospital.spaces.ru/Operation")

While 1
	_IELinkClickByText($oIE, "Встать в очередь")
	_IELinkClickByText($oIE, "Обновить")
	
	Sleep(3000)
	
	_IELinkClickByText($oIE, "Перейти")
	_IELinkClickByText($oIE, "Бросить кубик")
	_IELoadWait($oIE)
	
	Sleep(1800000)
	Send("{F5}")
WEnd
 
Автор
R

rufik

Новичок
Сообщения
33
Репутация
4
Так при это все эти клики будут раз в 15 минут, а мне надо, чтобы они были подряд... а обновить экран (F5) раз в 30 минут
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
rufik [?]
мне надо, чтобы они были подряд... а обновить экран (F5) раз в 30 минут

Код:
#include <IE.au3>

Local $oIE = _IECreate("xospital.spaces.ru/Operation")

AdlibRegister('_F5', 1800000)

While 1
    _IELinkClickByText($oIE, "Встать в очередь")
    _IELinkClickByText($oIE, "Обновить")
    
    Sleep(3000)
    
    _IELinkClickByText($oIE, "Перейти")
    _IELinkClickByText($oIE, "Бросить кубик")
    _IELoadWait($oIE)
WEnd

Func _F5()
	Send("{F5}")
EndFunc


тебе бы научится делать правильно постановку задачи.
 
Верх