Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP.4.0")

objXMLHTTP.Open "POST", "http://licencing.webhostautomation.com/default.asp", False
objXMLHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

objXMLHTTP.send "nothing=test"

wscript.echo objXMLHTTP.Status

Set objXMLHTTP=Nothing