Sub Button3_Click
Dim job2 As HttpJob
Try
job2.Initialize("Job2", Me)
job2.PostString("http://192.168.10.177/getid?idno=1234", "")
wait for (job2) JobDone(job2 As HttpJob)
If job2.Success Then
EditText3.Text = job2.GetString
End If
job2.Release
Catch
Log(LastException)
End Try
End Sub