Sub DownloadPage
Dim job As HttpJob
job.Initialize("", Me)
job.Download("http://127.0.0.1/home.html")
Wait For (job) JobDone(job As HttpJob)
If job.Success Then
Dim result As String = job.GetString
Dim Header As String = result.SubString2(result.IndexOf("<h3>"), result.IndexOf("</h3>") + "</h3>".Length)
Log(Header)
End If
job.Release
End Sub