' Collection of code snippets by Arne Vajhøj ' posted to eksperten.dk, usenet and other places (2002-now) Private Sub Command1_Click() Dim WinHttpReq As Object Set WinHttpReq = New WinHttpRequest WinHttpReq.Open "GET", Text1.Text, False WinHttpReq.Send Text2.Text = WinHttpReq.ResponseText End Sub Private Sub Form_Load() Text2.Text = "" End Sub