Hola,
Alguien me podrá ayudar, necesito llamar un Servicio web que está en un servidor donde me pide usuario y clave, he tratado de diferentes formas, de echo con .net no tengo dramas, tampoco llamando a un servicio local, pero tiene que ser con ASP clásico, tengo el siguiente :
<%
Dim xmlhttp
Dim DataToSend
Dim postUrl, SoapServer, SoapPath
postUrl = "http://servidor:xx/dir/servicio.asmx/metodo"
SoapServer = "servidor "
SoapPath = "/ dir/servicio.asmx "
DataToSend = "Param1=AA&Param2=EE&Param3=SSS”
Response.write postURL
Response.write "<br>"
Set xmlhttp = Server.Createobject("MSXML2.ServerXMLHTTP")
xmlhttp.Open "POST", postUrl, False, "usuario", "clave"
xmlhttp.setRequestHeader "Man", "POST " & SoapPath & " HTTP/1.1"
xmlhttp.setRequestHeader "Host", SoapServer
xmlhttp.setRequestHeader"Content-Type","application/x-www-form-urlencoded"
xmlhttp.setRequestHeader "SOAPAction", "http://tempuri.org/metodod"
xmlhttp.send DataToSend
Response.write xmlhttp.responseText
%>
gracias