Does anyone know how to use a VB (VB express 2005) program to access a
webpage that requires HTTP Basic Authentication for access?
Below is the code I have so far. It obviously does not work because
there is no authentification info supplied (and I do not know how to
supply the info).
Public Class Form1
Const URL As String = "http://twitter.com/statuses/
friends_timeline.xml?count=1"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim request As WebRequest = WebRequest.Create(URL)
Dim response As WebResponse = request.GetResponse()
Dim rssStream As Stream = response.GetResponseStream()
Dim rssDoc As XmlDocument = New XmlDocument()
rssDoc.Load(rssStream)
DisplayNode(rssDoc, 0)
End Sub
Private Sub DisplayNode(ByVal node As XmlNode, ByVal depth As
Integer)
' Define the indent level.
Dim Indent As New String(" "c, depth * 4)
' Display the node type.
TextBox1.Text &= (Indent & node.NodeType.ToString() & _
": <" & node.Name & ">")
' Display the node content, if applicable.
If node.Value <> String.Empty Then
Console.WriteLine(Indent & "Value: " & node.Value)
End If
' Display all nested nodes.
Dim Child As XmlNode
For Each Child In node.ChildNodes
DisplayNode(Child, depth + 1)
Next
End Sub
End Class
