Dim job1, job2 As HttpJob
Dim postUrl_1, PostUrl_2 As String
Dim postData_1, postData_2 As String
postUrl_1 = "http://192.168.1.100/getpackagestatus"
PostUrl_2 = "http://192.168.1.100/setpackagestatus"
postData_1 = "what ever data 1 is"
postData_2 = "what ever data 2 is"
job1.Initialize("POST Job1", Me)
job1.PostString(postUrl_1, postData_1)
job2.Initialize("POST Job2", Me)
job2.PostString(PostUrl_2, postData_2)