06-02-2018, Saat: 11:42
(Son Düzenleme: 06-02-2018, Saat: 13:37, Düzenleyen: ozcanm.
Sebep: Çözüldü bilgisi eklendi
)
Merhaba,
Konu web servisle alakalı bir durum aslında :/
Web servis import edilirken NVİ KPS sisteminde olduğu gibi bazı tanımlamalar ve kullanımda sıkıntı yaşamaktayım.
Araştırma yaparken karşılaştığım bir kaynak doğrultusunda ıdHTTP ile yapılabilir gibi geldi :ss
SOAP-UI testlerinde sonuç alabiliyorum. Buradaki akışı "HttpAnalyzer" ile takip ettim.
ıdHTTP Header kısmını buraya göre düzenlemek istedim fakat istediğim sonucu elde edemedim.
ContentType kısmı düzenlediğim şekilde oluşmuyor ve Connection kısmı gözükmüyor.
"(Status-Line):HTTP/1.1 500 Internal Server Error" hatasını alıyorum.
Bu kısımda takılmış durumdayım.
Bu kısımda kod yapısı
Konu web servisle alakalı bir durum aslında :/
Web servis import edilirken NVİ KPS sisteminde olduğu gibi bazı tanımlamalar ve kullanımda sıkıntı yaşamaktayım.
Araştırma yaparken karşılaştığım bir kaynak doğrultusunda ıdHTTP ile yapılabilir gibi geldi :ss
SOAP-UI testlerinde sonuç alabiliyorum. Buradaki akışı "HttpAnalyzer" ile takip ettim.
ıdHTTP Header kısmını buraya göre düzenlemek istedim fakat istediğim sonucu elde edemedim.
ContentType kısmı düzenlediğim şekilde oluşmuyor ve Connection kısmı gözükmüyor.
"(Status-Line):HTTP/1.1 500 Internal Server Error" hatasını alıyorum.
Bu kısımda takılmış durumdayım.
SOAP-UI sorgusundaki header yapısı
Bu kısımda kod yapısı
var
Strm :TStringStream;
sSSL :TIdSSLIOHandlerSocketOpenSSL;
sIdHTTP :TIdHTTP;
begin
Try
Memo1.Clear;
sIdHTTP :=TIdHTTP.Create(Self);
sSSL := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
sIdHTTP.Request.Clear;
sIdHTTP.IOHandler := sSSL;
sIdHTTP.Request.ContentType :='application/soap+xml;charset=UTF-8;action='+'https://services.XXXXXXXXXX';//
sIdHTTP.Request.Connection :='Keep-Alive';
sIdHTTP.Request.AcceptEncoding:='gzip,deflate';
sIdHTTP.Request.UserAgent :='Apache-HttpClient/4.1.1 (java 1.5)';
sIdHTTP.Request.Host :='services.XXXXXX';
Strm := TStringStream.Create(ExtractFilePath(application.ExeName)+ 'SorguXML.xml');
Memo1.Lines.Add(sIdHTTP.Post('https://services.XXXXXX/XXXXX/service.asmx',Strm));
Finally
Strm.Free;
FreeAndNil(sIdHTTP);
End;
end;
Uygulamayı takibe alıp kodu çalıştırdığımdaki header yapısı
