22-12-2020, Saat: 16:11
(22-12-2020, Saat: 16:07)meko Adlı Kullanıcıdan Alıntı:(22-12-2020, Saat: 15:36)hi_selamlar Adlı Kullanıcıdan Alıntı: Merhabalar,
HTTPRIO1.HTTPWebNode.GetHTTPReqResp.UserName := 'KULLANICIADINIZ'; HTTPRIO1.HTTPWebNode.GetHTTPReqResp.Password := 'ŞİFRENİZ';
Şeklinde denermisiniz.
butonda denedim aynı mesajı veriyor.
ayrıca aşağıdaki kodlar ile aynı hatayı vermeye devam ediyor.
procedure TForm1.HTTPRIOHTTPWebNode1BeforePost(const HTTPReqResp: THTTPReqResp; Data: Pointer); var UserName: string; PassWord: string; auth : string; begin UserName := 'username'; Password := 'password'; // yöntem 1 auth := 'Authorization: Basic ' + idEncoderMIME1.EncodeString(); // parantez içine username:password konulacak HttpAddRequestHeaders(Data, PChar(auth), Length(auth), HTTP_ADDREQ_FLAG_ADD); // yöntem 2 HttpAddRequestHeaders(Data, PChar(UserName), Length(UserName), HTTP_ADDREQ_FLAG_ADD); HttpAddRequestHeaders(Data, PChar(Password), Length(Password), HTTP_ADDREQ_FLAG_ADD); end;
Merhabalar,
BeforePost kullanmadan Button Click ile denermisiniz lütfen.
procedure TForm1.Button1Click(Sender: TObject); var aIntegrationSoap : IntegrationSoap; begin HTTPRIO1.HTTPWebNode.GetHTTPReqResp.UserName := 'KULLANICIADINIZ'; HTTPRIO1.HTTPWebNode.GetHTTPReqResp.Password := 'ŞİFRENİZ'; aIntegrationSoap := GetIntegrationSoap(true,'',HTTPRIO); aIntegrationSoap.GetMessage; end;
Amaç, bilginin de/aklın da zekat'ını vermek.

