Имя пользователя:
Пароль:
 | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Смена IP адресса

Ответить
Настройки темы
Смена IP адресса

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


Здравствуйте, есть бот, который заходит на сайт (логин, пароль берет из файла). Как сделать,чтобы каждый раз когда заходит на следующий аккаунт менялся ip адрес?
Скрытый текст

#include <IE.au3>

Local $b = 0

$oIE = _IECreate("сайт", 0, 1)
$file = FileOpen("Путь к файлу")
While 1
$b +=1
$Profile = FileReadLine($file)
If @error = -1 Then ExitLoop
$Login = StringRegExpReplace($Profile, "(.*).*)", "\1")
$pass = StringRegExpReplace($Profile, "(.*).*)", "\2")
$oLogin = _IEGetObjById($oIE, "authentificationLogin")
_IEDocInsertText($oLogin, $Login)
$oPass = _IEGetObjById($oIE, "authentificationPassword")
_IEDocInsertText($oPass, $pass)
If $b > 1 Then
$oAuth = _IEGetObjById($oIE, "authentificationSubmit")
Else
$oAuth = _IEGetObjById($oIE, "connexion-submit")
EndIf
_IEAction($oAuth, "click")
_IELoadWait($oIE, 500)
$oBtns = _IETagNameGetCollection($oIE, "a")
For $oBtn In $oBtns
If $oBtn.ClassName == "icone-deconnexion" Then
_IEAction($oBtn, "click")
_IELoadWait($oIE, 500)
EndIf
Next
WEnd

Отправлено: 03:40, 09-11-2015

 


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Смена IP адресса

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
2008 R2 - Смена IP сети в AD AsvComp Windows Server 2008/2008 R2 2 08-07-2013 10:46
Смена ip адреса в Win2003 intlive Microsoft Windows NT/2000/2003 3 11-07-2009 01:32
Интернет - Не преобразуются имена серверов в IP адресса Alexandr80 Microsoft Windows 2000/XP 3 13-06-2008 14:40
Смена MAC адресса Mr_MOROZNYAK Железо в Linux 4 19-04-2007 23:30
Смена IP адресса у модемов tursun Microsoft Windows 2000/XP 3 07-04-2006 21:40




 
Переход