Sub Activity_Create(FirstTime As Boolean)
Dim job As HttpJob
job.Initialize("j1", Me)
job.PostString("http://www.w3schools.com/webservices/tempconvert.asmx/CelsiusToFahrenheit", _
"Celsius=30")
End Sub
Sub JobDone(job As HttpJob)
If job.Success Then
Log(job.GetString)
End If
job.Release
End Sub