07/03/2006, 05:54
|
 | | | Fecha de Ingreso: enero-2002 Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses Puntos: 4 | |
| on error resume next
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("MSXML2.XMLHTTP")
xml.Open "GET", strURL, False
xml.setRequestHeader "Accept-Language", "sp"
xml.setRequestHeader "Pragma", "no-cache"
xml.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xml.Send
cadena = Cstr(xml.responseText)
Response.Write(cadena)
intenta asi a ver si te funciona |