If Url.Contains("http://www.clickfight.com.br/google/") Then
'webviewlogin.Visible = False
jobgoogle.Initialize("resposta",Me)
jobgoogle.Download(Url)
End If
Sub JobDone (Job As HttpJob)
If Job.Success Then
Select Job.JobName
Case "resposta"
respostadogoogle = Job.GetString
Msgbox(respostadogoogle,"lala")
Job.Release
End Select
End If
End Sub