Why isn't my call to the SpiceSMS service returning a response?

See more:

VB

We are using the code below to provide our users with a mobile response. However, it isn't working. Can anyone see a problem with it? Or should we take this up with the SpiceSMS people...?

Private Sub SendSMS(sMessage As String, 
  Optional sFrom As String = "rasheedsys")


Dim oXml As New MSXML2.XMLHTTP
    Call oXml.Open("POST", "http://www.spicesms.com/abc.asp?from=" 
      & sFrom & "&msg=" & sMessage & "~") 
        'Cange your vendor URL appropriately

Call oXml.setRequestHeader("Content-Type", "text/xml")
Call oXml.Send
txtLog = txtLog & "Status of: " & "http://www.spicesms.com/abc.asp?from=" 
      & sFrom & "&msg=" & sMessage & "~" & vbCrLf
  txtLog = txtLog & oXml.responseText & vbCrLf


End Sub