Sub SendPostRequest
Dim val1 As String = "Hello"
Dim val2 As String = "World"
Private sendjob1 As HttpJob
sendjob1.Initialize("", Me)
'Send a POST request
sendjob1.PostString("https://www.mydomain.com/mypage.php", _
"val1=" & myVariable1 & _
"&val2=" & myVariable2)
Wait For (sendjob1) JobDone(sendjob1 As HttpJob)
If sendjob1.Success Then
xui.MsgboxAsync("Data was successfully sent to server.", "")
' How to display the webpage with changes in this process?
End If
sendjob1.Release
End Sub