Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim pandora As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(TextBox1.Text) Dim response As System.Net.HttpWebResponse = pandora.GetResponse Dim braco22 As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream) Dim source As String = braco22.ReadToEnd TextBox2.Text = source EndSub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)