Post a otra página con MSXML2

[Aibarra.net]

Buenas,

esoty intentando utilizar MSXML2.XMLHTTP para enviar por post un formulario a otra página. En realidad, el objeto de hacer esto es crear un sistema de trackbacks para blogs tipo MovableType. Necesito mandar un formulario y leer la respuesta que me da el otro servidor cuando lo procese (un XML muy básico)

Mi problema es que no se reciben los campos del formulario. Este es el código que uso para enviarlo:

[...]
Set objHTTP = CreateObject("MSXML2.XMLHTTP")

campos="&blog_name=" & blog_name & "&url=" & url & "&title=" & title & "&excerpt=" & excerpt

objHTTP.Open "POST", strURL, FALSE

objHTTP.Send campos
[...]

Todas las variables contienen valores y son de los tipos y tamaños requeridos. strURL tiene la dirección correcta. En realidad, el registro se crea (con lo que la llamada se hace), la página responde que OK (con lo cual no hay error al otro lado) pero los campos no se meten en la base de datos (con lo que digo yo que no se están enviando)

Como no domino el objeto en cuestión, puede que esté dejándome algo por el camino. Agradecería cualquier sugerencia o ayuda de cualqueir tipo :)

[u_goldman]

Que valor tiene strURL?

Estas seguro que le estas concatenando los valores?

Código:

Set objHTTP = CreateObject("MSXML2.XMLHTTP")

campos="&blog_name=" & blog_name & "&url=" & url & "&title=" & title & "&excerpt=" & excerpt

strURL = strURL & "?" & campos

objHTTP.Open "POST", strURL, FALSE

objHTTP.Send campos

Salu2,

[davidcr]

Prueba este codigo creo que es lo que necesitas

Response.Buffer = True
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")

' Notice the two changes in the next two lines:
xml.Open "POST", "http://www.mundovirtual.co.cr/hola.asp", False
xml.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
xml.Send "dato=hola"
Response.Write xml.responseText
Set xml = Nothing


Yo tambien dure mucho tiempo antes de encontrarle la solucion a poder pasar un dato POST mediante el Microsoft.XMLHTTP