'Service module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
' Dim httpClient1 As HttpClient
Dim app_version, server_version As String
' Dim url As String
Dim preferences_set As Boolean
HttpUtils.CallbackActivity = "RemoteManagement" ' Service Name
HttpUtils.CallbackJobDoneSub = "JobDone"
HttpUtils.CallbackUrlDoneSub = "URLdone"
Dim MainUrl As String
End Sub
sub functionOne
' httpClient1.InitializeAcceptAll("httpClient1")
' Dim req As HttpRequest
' req.InitializeGet(url & "update.txt")
' httpClient1.Execute(req, 1)
MainUrl = url & "update.txt"
HttpUtils.Download("checkUpdate", MainUrl)
end sub
.
.
.
.
.
etc