set http = Createobject("MSXML2.ServerXMLHTTP.6.0")
url="https://www.appliancesconnection.com/login.html"
login_name="XXXXXX"
login_pass="XXXXXX"
query="email="+login_name+"&password="+password_pass
http.Open "POST",url,false
http.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
http.send(query)
text=http.responsetext