I have created web browser that surf to the internet through proxy and now I need to create a browser that surf to internet via proxy authentication server (server required enter username and password) and I dont know how to begin program... :/

Maybe something has a small example ?

Pls, help

Finally I got something, what is wrong ?

Private Sub Command6_Click()
Dim header As String
Inet1.UserName = username
Inet1.Password = password
Inet1.Proxy = ""
Inet1.AccessType = icNamedProxy

header = "Proxy-Authorization: Basic " & Inet1.UserName & ":" & Inet1.Password

Inet1.Execute , "GET", , header, Combo1
Inet1.Execute "", "GET", header
Text1.Text = Inet1.OpenURL("http://www.google.com")
WebBrowser1.Navigate Inet1.OpenURL("http://www.microsoft.com")

End Sub

I can`t get this to work:

Private Sub Command6_Click()
Dim header As String, Response As String
Dim temp() As String
Inet1.protocol = icHTTP
Inet1.Proxy = ""
Inet1.UserName = "userr"
Inet1.Password = "pass"
Inet1.URL = "http://whatismyipaddress.com/"
header = "Proxy-Authorization: Basic " & Inet1.UserName & ":" & Inet1.Password
Me.Caption = "Authenticating " & Inet1.URL & "...."
Inet1.Execute , "GET", , header
If Inet1.StillExecuting = False Then Exit Sub
Loop Until Inet1.StillExecuting = False
Response = Inet1.GetHeader
temp = Split(Response, vbNewLine)
MsgBox temp(0)
Text1.Text = Inet1.OpenURL("http://whatismyipaddress.com/")

End Sub

I enter to website, however IP adress wont change. when authorizing with proxy server it said:

http:// 1.1 ok
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, learning, and sharing knowledge.