Sub Process_Globals
Private http As HttpJob
Dim ReturnResult As String
End Sub
Public Sub Post(url As String,postString As String) As String
If (http.IsInitialized = True) Then
ReturnResult = http.PostString(url,postString)
Log("HttpRequest = "&ReturnResult)
Return ReturnResult
Else
Log("HttpJob need be initialized !")
Return "Error"
End If
End Sub