JIereHga2010
Новичок
- Сообщения
- 68
- Репутация
- 0
Всем Доброго времени суток, ув. Форумчане.
И так к делу:
Имеется сайт:
http://smofast.com/p.php?p=vk_frend
Логин: [email protected]
Пароль: d123456
Там есть кнопка Добавить
Вот исходник этой кнопки:
Вот скрипт автоматизации, который нажимает на кнопку:
Так вот, проблема в том, что согласно коду, создается IE окно (невидимое), но когда скрипт выполняет
Окно IE становится "видимым", что мне категорически противопоказано.
Посоветуйте пожалуйста, есть ли способы заставить это окно оставаться невидимым??
:stars: :stars: :stars: :IL_AutoIt_1: :IL_AutoIt_1: :IL_AutoIt_1:
И так к делу:
Имеется сайт:
http://smofast.com/p.php?p=vk_frend
Логин: [email protected]
Пароль: d123456
Там есть кнопка Добавить
Вот исходник этой кнопки:
Код:
<a href="javascript:void(0);" onclick="ModulePopup('2218','id245794491','VK','4','1');" class="followbutton" style="font-size:11px;font-family:Tahoma">Добавить</a>
Код:
$Url = "http://smofast.com/p.php?p=vk_frend"
$oIE= _IECreate ($Url,0,0,1,1)
$aLinks = _IELinkGetCollection($oIE)
For $aLink In $aLinks
If ($aLink.className == 'followbutton_vip') Or ($aLink.className == 'followbutton') Then
$sFunction = $aLink.getAttributeNode('onclick').nodeValue
$sID = StringRegExpReplace($sFunction, '.*(id\d+).*', '$1')
$oIE.document.parentWindow.execScript("" & StringFormat("setTimeout(function(){%s},1)", $sFunction) & "")
Do
$oIE2 = _IEAttach("" & StringFormat("http://vk.com/%s", $sID) & "", "url")
Sleep(1000)
Until IsObj($oIE2)
;~ Button_sign ($oIE2)
Sleep ("1000")
;~ $Caphca_Flag = Search_Caphca($oIE2)
;~ If $Caphca_Flag = 1 Then
;~ Edit ("Поймана капча ВКонтакте!!!")
;~ $sUrl = _IEPropertyGet( $oIE2, "locationurl" )
;~ $oIE3 = IECreate ($sURL,1)
;~ $Title = _IEPropertyGet( $oIE3, "title" )
;~ Button_sign ($oIE3)
;~ WinWaitClose ($Title&" - Internet Explorer")
;~ EndIf
Sleep ("3000")
_IEQuit ($oIE2)
;~ Edit ("Добавил друга: "&$sID)
Sleep ("3000")
EndIf
NextТак вот, проблема в том, что согласно коду, создается IE окно (невидимое), но когда скрипт выполняет
Код:
If ($aLink.className == 'followbutton_vip') Or ($aLink.className == 'followbutton') Then
$sFunction = $aLink.getAttributeNode('onclick').nodeValue
$sID = StringRegExpReplace($sFunction, '.*(id\d+).*', '$1')
$oIE.document.parentWindow.execScript("" & StringFormat("setTimeout(function(){%s},1)", $sFunction) & "") ; - Вот эту операцию
Do
$oIE2 = _IEAttach("" & StringFormat("http://vk.com/%s", $sID) & "", "url")
Sleep(1000)
Until IsObj($oIE2)Окно IE становится "видимым", что мне категорически противопоказано.
Посоветуйте пожалуйста, есть ли способы заставить это окно оставаться невидимым??
:stars: :stars: :stars: :IL_AutoIt_1: :IL_AutoIt_1: :IL_AutoIt_1:
