VBScript y PHP (va aqui?)

sergio_r · #1 (**permalink**) 09/07/2009, 16:46

Nas.

Tengo un problema para poder acceder a un servicio PHP desde VBSCript en el cliente: al intentar descargar un fichero con el código:

Código:

	Dim URL, parm, strHost
	URL = "xxxxxxxxxx.bibliotheka.org/bajar.php"
	parm = "nro=1776125"
	strHost = "xxx.bibliotheka.org"
	Dim oXMLHTTP
	Set oXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP")
	oXMLHTTP.Open "POST", URL, False
	oXMLHTTP.setRequestHeader "Content-type", "text/html; charset=iso-8859-1"
	oXMLHTTP.setRequestHeader "Content-Transfer-Encoding", "8bit"
	oXMLHTTP.setRequestHeader "Content-length", Len(parm)
	oXMLHTTP.setRequestHeader "Connection", "close"
	oXMLHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; .NET CLR 2.0.50727; .NET CLR 3.0.04506.648; .NET CLR 3.5.21022)"
	oXMLHTTP.setRequestHeader "Pragma", "no-cache"
	oXMLHTTP.setRequestHeader "Cache-Control","no-cache"
	oXMLHTTP.setRequestHeader "Host", strHost
	oXMLHTTP.setRequestHeader "Location", strHost
	oXMLHTTP.setRequestHeader "Referrer", strHost
	oXMLHTTP.send parm
	Do Until oXMLHTTP.readyState = 4
		WScript.sleep 100
	Loop
	If oXMLHTTP.Status = 200 Then
		strRespuesta = oXMLHTTP.responseText
	Else
		strRespuesta = ""
	End If
	Set oXMLHTTP = Nothing

Siempre obtengo un error en la respuesta: obtengo el texto "Error 0 <hr>", cuando lo que quiero es obtener el contenido que se descarga si descargo el fichero (xxxxxxxxxx.bibliotheka.org/bajar.php?nro=1776125) con cualquier navegador, Flashget, etc.

El servicio PHP redirecciona la dirección anterior a otro servidor.

¿Alguien me puede ayudar a encontrar el problema? Thanks.
(xxx y xxxxxxxxxx son lo que deben ser, claro; ej'ke soy nuevo)

u_goldman · #2 (**permalink**) 09/07/2009, 18:03

Hole sergio_r el hilo definitivamente pertenece a ASP pues es con ASP que haces la llamada, aunque me parece que tu llamada es exitosa pues te regresa un valor aunque éste sea erroneo.

Yo comenzaría por revisar los posibles valores que te puede regresar dicho servicio y ver si el valor 0 se encuentra en sus especificaciones y a qué corresponde.

Saludos

sergio_r · #3 (**permalink**) 10/07/2009, 02:51

No tengo acceso al servicio PHP, así que me apañaré utilizando un objeto InternetExplorer.Application.

Gracias.

ibuezas · #4 (**permalink**) 10/05/2011, 11:08

Hola,

Yo tengo el siguiente problema, cuando estoy en internet explorer antes 7 y ahora 8 y quiero abrir un pdf me sale una paguina en blanco y no me carga nada, pero esto no me lo hace siempre porque en otras paguinas me funciona, pero con una enconcreto no me funciona y la tengo agregada como sitio de confianza y todo. Me da este error:

Detalles de error de página web

Agente de usuario: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; GTB6.6; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 1.1.4322)
Fecha: Mon, 9 May 2011 19:02:39 UTC

Mensaje: Esta clase no acepta Automatización
Línea: 125
Carácter: 2
Código: 0
URI: https://ibiss.crse.com/parts-ordering/ibiss/statusInfo?&ibissHook=pA4PVapiklH45KU6h1y7xwf6Ui%2 F78KUI3p69WSRiyjMcGB4ul5HGZJ%2FCMyNi%2BJp5HI0Lhlbx zvjC%0D%0As93%2B%2BMMIxrG0Q2xPr0i1GGpT6QLZO5zmc63h TWK3m1P%2BuXjXqekK1MHH0IkoeyHO61SdBpgU0ODL%0D%0ArU H6jnBOH59YTx4lilBzHE9YeoL9UpXMnCpOZPF9j4C0TaQnMovS D%2FX8E97fYD8a0qF7hmoSxRS6%0D%0Ad3RFHD9PhMtNf1xx1i RmQf%2B44XKUC%2FfJq%2FYKrujQXQ7c6hJgUrJx2NEv%2BtaX da%2FUe9We8Aa%2Bp9Nj%0D%0AN7TpqQ6AHKIbXSLNy99Poc9j b1lZf0GJECBY64r3dtQJIVIZ5nxr%2BPf1Jzw4NexmpJ5SuShZ jvIe%0D%0Ad4Gz

A ver si alguien me pueda ayudar porque no se como solucionarlo.

Gracias.