incepator Posted September 14, 2015 Share Posted September 14, 2015 (edited) Hi,I researched a bit, but unfortunately I can not find how to set the correct parameter referrer.How can i set http header referrer?I made a simple interface, maybe someone could help me.I found this parameters but not working good....https://en.wikipedia.org/wiki/List_of_HTTP_header_fields#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #NoTrayIcon Local $oIE = _IECreateEmbedded() #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 610, 542, 424, 114) GUICtrlCreateObj($oIE, 8, 112, 596, 420) $Label1 = GUICtrlCreateLabel("Referrer:", 8, 8, 65, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Input1 = GUICtrlCreateInput("http://en.wikipedia.org/wiki/Main_Page", 96, 8, 505, 21) $Label2 = GUICtrlCreateLabel("User Agent: ", 8, 32, 89, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Input2 = GUICtrlCreateInput("Mozilla/5.0 (X11; Linux x86_64; rv:12.0) Gecko/20100101 Firefox/21.0", 96, 32, 505, 21) $Button1 = GUICtrlCreateButton("Browsing...", 8, 80, 75, 25) $Label3 = GUICtrlCreateLabel("Navigate:", 8, 56, 71, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Input3 = GUICtrlCreateInput("http://website.com", 96, 56, 505, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $oIE.Navigate2(GUICtrlRead($Input3), Default, Default, Default, 'Referer: "http://website.com"') EndSwitch WEnd Thank you for your time! Edited September 14, 2015 by incepator Link to comment Share on other sites More sharing options...
incepator Posted September 14, 2015 Author Share Posted September 14, 2015 I need this, I can paying someone for these functions, but if function properly. Link to comment Share on other sites More sharing options...
jguinch Posted September 14, 2015 Share Posted September 14, 2015 Don't be so hasty, and explain us why you want to do this. Spoiler Network configuration UDF, _DirGetSizeByExtension, _UninstallList Firefox ConfigurationArray multi-dimensions, Printer Management UDF Link to comment Share on other sites More sharing options...
incepator Posted September 14, 2015 Author Share Posted September 14, 2015 I need this function for a personal project.Exist a software, "Ubot Studio", which has this function predetermined and i want to do a software like this in autoit, but only for their own use.I can do all other elements, except for the referrer and user agent functions.I would be grateful if you could help me, if you do not make public the source code, I understand you, give me a private message. Link to comment Share on other sites More sharing options...
jguinch Posted September 14, 2015 Share Posted September 14, 2015 OK, I give you a way, even if I don't know if this request is legitimate of not...$oIE.Navigate2(GUICtrlRead($Input3), Default, Default, Default, 'User-Agent: ' & GUICtrlRead($Input2) & @CRLF & 'Referer: ' & GUICtrlRead($Input1) ) Spoiler Network configuration UDF, _DirGetSizeByExtension, _UninstallList Firefox ConfigurationArray multi-dimensions, Printer Management UDF Link to comment Share on other sites More sharing options...
incepator Posted September 14, 2015 Author Share Posted September 14, 2015 (edited) Thanks, I will test and i come back with an answerThat I have done so far, currently only the interface and some functions.Tomorrow I hope to be ready. Edited September 15, 2015 by incepator Link to comment Share on other sites More sharing options...
incepator Posted September 17, 2015 Author Share Posted September 17, 2015 Hi again,It seems to work ..and not..Why not appear these data in IE, on the website http://whatsmyuseragent.com?See also pictures with firefox, to understand the difference.This is my code:expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <File.au3> #NoTrayIcon _ClearCookies() $oIE = _IECreate("") Sleep(1000) $oIE.Navigate2("http://whatsmyuseragent.com/", Default, Default, Default, @CRLF & _ "Accept-Charset: utf-8" & @CRLF & _ "Accept-Encoding: gzip, deflate" & @CRLF & _ "Accept-Language: en-US" & @CRLF & _ "Connection: keep-alive" & @CRLF & _ "Cookie: $Version=1; Skin=new;" & @CRLF & _ "Content-Type: application/x-www-form-urlencoded" & @CRLF & _ "Date: Tue, 15 Nov 1994 08:12:31 GMT" & @CRLF & _ "Referer: http://www.bing.com" & @CRLF & _ "TE: trailers, deflate" & @CRLF & _ "User-Agent: Mozilla/5.0 (compatible; MSIE 10.0; Windows Phone 8.0; Trident/6.0; IEMobile/10.0; ARM; Touch; NOKIA; Lumia 520)" & @CRLF & _ "X-Requested-With: XMLHttpRequest" & @CRLF & _ "Front-End-Https: on" & @CRLF & _ "Proxy-Connection: keep-alive" & @CRLF & _ "Access-Control-Allow-Origin: *" & @CRLF & _ "Accept-Patch: text/example;charset=utf-8" & @CRLF & _ "Allow: GET, HEAD" & @CRLF & _ "Status: 200 OK") Func _ClearCookies() ShellExecute("RunDll32.exe", "InetCpl.cpl,ClearMyTracksByProcess 2", "", "open", @SW_HIDE) $cookieFolders = _FileListToArray(@AppDataDir & "\Macromedia\Flash Player\#SharedObjects", "*", 2) If @error Then Return False Else For $i = 1 To UBound($cookieFolders) - 1 $siteFolders = _FileListToArray(@AppDataDir & "\Macromedia\Flash Player\#SharedObjects\" & $cookieFolders[$i], "*", 2) For $j = 1 To UBound($siteFolders) - 1 DirRemove(@AppDataDir & "\Macromedia\Flash Player\#SharedObjects\" & $cookieFolders[$i] & "\" & $siteFolders[$j], 1) Next Next EndIf Return True EndFunc ;==>_ClearCookies Link to comment Share on other sites More sharing options...
incepator Posted September 28, 2015 Author Share Posted September 28, 2015 Can someone help me ? I need some information, there may be another header for these functions.Sometimes, I use ubot studio, have preset functions and function properly, but I'm curious to do this with its own functions.Thank you for your time. Link to comment Share on other sites More sharing options...
jguinch Posted September 28, 2015 Share Posted September 28, 2015 Your code works for me. The reason is that Javascript is disabled in your configuration. Spoiler Network configuration UDF, _DirGetSizeByExtension, _UninstallList Firefox ConfigurationArray multi-dimensions, Printer Management UDF 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