hc.Initialize("hc")
Dim req As HttpRequest
req.InitializeHead("http://www.google.com")
hc.Execute(req, 0)
End Sub
Sub hc_ResponseSuccess (Response As HttpResponse, TaskId As Int)
Log("success")
Log(Response.ContentLength)
End Sub
Sub hc_ResponseError (Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
Log("error")
End Sub