Delphi - Problemas con POST (Internet) y MSXML2_TLB

 
Vista:

Problemas con POST (Internet) y MSXML2_TLB

Publicado por David (1 intervención) el 04/10/2006 19:33:39
Buenas, y muchas gracias por leer este mensaje,

Me han pedido, hace casi un año, que realice una aplicación que recoja un XML, lo formatee, lo envie a una dirección en concreto, previa validación de usuario y contraseña, y me duelve resultados XML.

Os explico....

=== PAUTAS OBLIGADAS A SEGUIR ====

1.- Tengo que enviar los datos por POST de Internet a través de un parámetro que se llame xmlQuestion (la idea es equivalente como si hiciera un post de una página web con un Textarea -alias TMemo en Delphi- que se llame xmlQuestion, que contendrá todo el código XML)
2.- Los datos los envío a una compañía que únicamente me ha dicho que use la libreria MSXML3. (en Delphi MSXML2_TLB) y el componente serverXMLHTTP (supongo que tendrá desarrollala la aplicación en MS Visual Studio .NET)

=== ERROR QUE SIEMPRE ME APERECE ===

HTTP/1.0 501 NOT IMPLEMENTED

mi problema es que ya no sé como solucionar le problema. He copiado todos los ejemplos que hay en MSDN online y tampoco.

Os agradecería cualquier tipo de ayuda

==================================================
======== Mi código es el siguiente ===========
==================================================

procedure TForm1.FormCreate(Sender: TObject);
var
str: String;
begin
Memo1.Clear;
str := 'https://host/servicios/brokers/tariff.asp';

ServerXMLHTTP401.Connect;
ServerXMLHTTP401.open('POST',str,false,'USUARIO1','CONTRASEÑA1');
ServerXMLHTTP401.setRequestHeader('WWW-Authenticate','Basic realm=NOMBRE_HOST');
ServerXMLHTTP401.send('xmlQuestion=<DS_REQUEST><COMMUNIC '+
'ID_PARTNER="USUARIO2" PWD="CONTRASEÑA2" PN="11"/>'+
'<CAR_SEARCH TM_ID="00017" MODEL_ID="" MODEL="XSARA"'+
' VERSION="1.9" NB_DOOR="5" FUEL="D" POWER=""/>'+
'</DS_REQUEST>');
Memo1.lines.Add(ServerXMLHTTP401.responseText);
ServerXMLHTTP401.Disconnect;
end;

==================================================

Teóricamente tiene que funcionar pero la respueta es NO.

Alguien puede ayudarme.

Muchas gracias por adelantado.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder