Dim DataUrl, DataPostString As String
DataUrl = "http://www.url.com"
DataPostString = "your_poststring_here"
Current_Filter = "ALL"
Dim job As HttpJob
'Send a POST request
job.Initialize("Data Update", Me)
job.PostString(DataUrl & DataPostString, Null)
ProgressDialogShow2("Refreshing reference data...", False)