[DUG] Http help

[Jolyon Smith]

You haven't setup the SSL information required to communicate with a HTTPS
URL.  You need to assign a properly configured TIdSSLIOHandlerSocketOpenSSL
to the IOHandler of your HTTP client component.

 

 

From: delphi-bounces at delphi.org.nz [mailto:delphi-bounces at delphi.org.nz] On
Behalf Of Robert martin
Sent: Friday, 26 February 2010 11:13 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: [DUG] Http help

 

Hi Guys

I had imported a WSDL file and built a soap service to send data to a web
service.  Unfortunately there is a bug in the WSDL that impacts delphi but
seems to be ignored in Microsoft tools (it really is a problem with the wsdl
file).  Anyway since it is a simple job I thought it might be quicker to fix
by just removing the soap and building the XML manually and posting it with
idHttp.  

However I cant get it to work !  When I try and post my test xml to the web
serivce I get an 'Invalid IOHandler' message in the app.  I have no
ioHandler defined but that works fine in my other apps where I post to php
based web services.  I am sure it is just some weird indy bug but I am under
a huge deadline and need to sort this.  Any help would be greatly
appreciated.

code follows (this is quick and dirty proof of concept code)

var
    sl                  : TStringList;
    PostDataStream      : TStringStream;
    SendStream      : TStringStream;
begin
    PostDataStream  := TStringStream.Create('');
    sl := TStringList.Create;
    try
        IdHTTP.Request.Username := '9313527067946306';
        IdHTTP.Request.Password := 'passdfsw9634306';
        IdHTTP.ReadTimeout := 5000;

        sl.LoadFromFile('E:\Work\Test post\TestRequest.XML');
        SendStream      := TStringStream.Create(sl.text);


 
IdHTTP.Post('https://uateclonline.nzpost.co.nz/eclonlinewebnowse/Services.as
mx', SendStream, PostDataStream);  //Error here 

        ShowMessage(PostDataStream.DataString);
    finally
        sl.Free;
        PostDataStream.Free;
        SendStream.Free;
    end;








-- 



Robert Martin

Software development manager

 

Chreos

www.chreos.co.nz

Ph +64 03 377-0495

 

 

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://listserver.123.net.nz/pipermail/delphi/attachments/20100226/e4d49244/attachment.html