Wenn ich ehrlich bin, ich verstehe dein Problem nicht!
Wie sehen die Ursprungsdaten aus?
Was machst Du mit ihnen?
Was ist das Ergebnis,
welches Ergebnis erwartest Du?
(Abgesehen davon, daß mit
XML nicht digital (mit de finger) bearbeitet)
Gruß
K-H
Ich habe über
WSDL die .pas zu dem Webservice erzeugt. Außerdem nutze ich eine wsse.pas
wsse.pas (welche mir damals mal ein Embarcadero Mitarbeiter angepasst hat), damit das richtige Format für Security verwendet wird.
Code:
procedure SetSecurityHeader2(Service: ######); stdcall;
var
Header: Security;
SOAPHeaders: ISOAPHeaders;
begin
Header := Security.Create;
Header.MustUnderstand := True;
Header.UsernameToken := UserNameToken.Create;
Header.UsernameToken.Username := '#####';
Header.UsernameToken.Password := PasswordString.Create;
Header.UsernameToken.Password.Type_ := 'http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordText';
Header.UsernameToken.Password.Text := '#####';
SOAPHeaders := Service as ISOAPHeaders;
SOAPHeaders.OwnsSentHeaders := True;
SOAPHeaders.Send(Header);
end;
Mein Problem ist, das das beim Aufruf erzeugte
XML den Namespace nicht setzt. Seltsamerweise funktioniert es aber mit SoapUI tadellos.
Ich dachte mir also, ich passe mir vor dem Senden das
XML an, so wie es bei SoapUI funktioniert. Das ich StringReplace nicht nutzen soll, hab ich verstanden, aber leider auch nicht, wie ich mir sonst helfen soll.
Hier noch mal wie es sein soll:
Code:
<wsse:UsernameToken>
<wsse:Username>#####</wsse:Username>
<wsse:Password Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordText">####</wsse:Password>
</wsse:UsernameToken>
und so macht es meine wsse.pas:
Code:
<UsernameToken>
<Username>####</Username>
<Password Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordText">####</Password>
</UsernameToken>