ChaosZerg Posted June 16, 2017 Share Posted June 16, 2017 Hello I am trying to make a website visitor that visits a certain website a few times including proxies. #include <IE.au3> #include <File.au3> HotKeySet("{NUMPAD1}","_Visit") HotKeySet("{NUMPAD0}","_Terminate") While 1 Sleep(250) Wend Func _Visit() $sWebsite = InputBox("Question","Choose your Website to visit:") If FileExists(@ScriptDir & "\proxies.txt") Then Local $file = FileOpen(@ScriptDir & "\proxies.txt") Local $lCount = _FileCountLines(@ScriptDir & "\proxies.txt") For $i = 1 To $lCount Step 1 $key = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings" $reg = RegWrite($key, "ProxyEnable", "REG_DWORD", "1") $reg1 = RegWrite($key, "ProxyServer", "REG_SZ", FileReadLine($file, $i)) DllCall('WININET.DLL', 'long', 'InternetSetOption', 'int', 0, 'long', 39, 'str', 0, 'long', 0) $oIE = _IECreate($sWebsite,0,0) Next FileClose($file) Else MsgBox("","","Error") EndIf EndFunc Func _Terminate() $key = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings" $reg = RegWrite($key, "ProxyEnable", "REG_DWORD", "0") DllCall('WININET.DLL', 'long', 'InternetSetOption', 'int', 0, 'long', 39, 'str', 0, 'long', 0) Exit EndFunc That's what i've got so far. My problem is that the internet options resets the etablished connection. Is there a way to make it work, that i have them all connected at once? Thanks for some help Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now