vb.net user agent help please
hi there with great respect to all the programmers here i do wish to say i am requesting help from you guys i need
you to help me make somthing archive my goal please i will surely give credits in all my tools.
have a list of useragents click on the list and that user agent will be selected for the browser after i select it browse it
i do not wish that useragent to change every site i visit i want it constant stabled on
it shud only change when i change it any ideas
ChangeUserAgent("Mozilla/5.0 (iPhone; U; CPU like Mac OS X; en) AppleWebKit/420+ (KHTML, like Gecko) Version/3.0 Mobile/1A537a Safari/419.3")
WebBrowser1.Navigate("http://whatsmyuseragent.com/", "_self", Nothing, "User-Agent: Mozilla/5.0 (iPhone; U; CPU like Mac OS X; en) AppleWebKit/420+ (KHTML, like Gecko) Version/3.0 Mobile/1A537a Safari/419.3")
as you can se this code 100% works but i can only change it each time i restart the programe
can you modify or play with it and se if we can change it during runtime and keep it there
you to help me make somthing archive my goal please i will surely give credits in all my tools.
have a list of useragents click on the list and that user agent will be selected for the browser after i select it browse it
i do not wish that useragent to change every site i visit i want it constant stabled on
it shud only change when i change it any ideas
Imports System.Runtime.InteropServices
<DllImport("urlmon.dll", CharSet:=CharSet.Ansi)> _
Private Shared Function UrlMkSetSessionOption(ByVal dwOption As Integer, ByVal pBuffer As String, ByVal dwBufferLength As Integer, ByVal dwReserved As Integer) As Integer
End Function
Const URLMON_OPTION_USERAGENT As Integer = &H10000001
Public Function ChangeUserAgent(ByVal Agent As String)
UrlMkSetSessionOption(URLMON_OPTION_USERAGENT, Agent, Agent.Length, 0)
#End Function
Private Shared Function UrlMkSetSessionOption(ByVal dwOption As Integer, ByVal pBuffer As String, ByVal dwBufferLength As Integer, ByVal dwReserved As Integer) As Integer
End Function
Const URLMON_OPTION_USERAGENT As Integer = &H10000001
Public Function ChangeUserAgent(ByVal Agent As String)
UrlMkSetSessionOption(URLMON_OPTION_USERAGENT, Agent, Agent.Length, 0)
#End Function
ChangeUserAgent("Mozilla/5.0 (iPhone; U; CPU like Mac OS X; en) AppleWebKit/420+ (KHTML, like Gecko) Version/3.0 Mobile/1A537a Safari/419.3")
WebBrowser1.Navigate("http://whatsmyuseragent.com/", "_self", Nothing, "User-Agent: Mozilla/5.0 (iPhone; U; CPU like Mac OS X; en) AppleWebKit/420+ (KHTML, like Gecko) Version/3.0 Mobile/1A537a Safari/419.3")
as you can se this code 100% works but i can only change it each time i restart the programe
can you modify or play with it and se if we can change it during runtime and keep it there