CGI-Einzelanwendung

[Mavarik]

Zitat von BerTa:

Übergabe Brutto ouble eine XML Datei haben, welche ich in der Funktion verarbeite und eine XML-Datei als Antwort wieder zurück sende.

LESEN macht schlau...

Zitat von Mavarik:

oder wenn Du die XML Datei nicht interpretieren willst diese ggf. packen und als TByteDynArray senden.

Fertig... Ist nen 3 Zeiler

[BerTa]

Hi,
Ich habe mich jetzt mal daran versuch es über ein ByteDynArray zu lösen.
Auf dem Server habe ich mit nun ein XML-Dokument erzeugt welches ich zurück geben will.

Server:

Code:

UebXml := TXMLDocument.Create(nil);
UebXml.Active := True;
UebXml.Version  := '1.0';
UebXml.Encoding := 'UTF-8';
UebXml.Options  := UebXml.Options + [doNodeAutoIndent];
UebXml.DocumentElement := UebXML.CreateNode('APsolutXML', ntElement, '');
UebXml.DocumentElement.AddChild('response').AddChild('status').NodeValue := 0;
UebXml.DocumentElement.ChildNodes.Nodes['response'].AddChild('status_text').NodeValue  := 'Status Test';

lResponse := TMemoryStream.Create;
UebXml.SaveToStream(lResponse);

setlength(bytedynarray,lResponse.size);
lResponse.position:=0;
lResponse.read(bytedynarray[0],lResponse.size);

result := bytedynarray;

Am Client verarbeite ich nun die Daten bekommen aber einen Fehler, wenn ich das XML-Dokument aus dem Stream lade. Speichere ich erst eine Datei ab und lade das Dokument dann aus der Datei, scheint es zu laufen.

Client:

Code:

ByteDynArray2 :=  Service.PruefUser(ByteDynArray);
ByteArrayToFIle(ByteDynArray2,'Client_Response.xml');
lResponse.Write(ByteDynArray[0],SizeOf(ByteDynArray));
lResponse.Position := 0;

UebXml.LoadFromFile('Client_Response2.xml');
UebXml.LoadFromStream(lResponse);

Da der Server und der Client die XML-Dokumente auch weiter verarbeiten sollen, ist es notwendig das XML-Dokument auch wieder einzulesen. Der Umweg über eine Datei ist nicht so schön.

[Mavarik]

Fehler? Welcher?

[BerTa]

Im Projekt SOAPClient.exe ist eine Exception der Klasse EDOMParseError aufgetreten. Meldung: 'Processing instruction was not closed.

Linie: 1
<?xm'. Prozess wurde angehalten.

[HolgerX]

Hmm..

XML in XML..

Das wird wohl nur klappen, wenn du das eingebetete XML-Dokument verschleierst.

Woran soll den ein XML-Parser erkennen, dass das XML (Soap) ein eingebetetstes XML hat?

Also gehe hin und Codiere dein XML-Stream als z.B. Base64 und packe es so in die Soapresponse. Dann Wird der SOAP-Parser dieses als Value überlesen!

Hmm..
Irgendwie habe ich ein DejaVu..
Wurde genau dieses Problem nicht hier im Forum mal behandelt?

[Mavarik]

Nein wieso...

TByteDynArray wird doch automatisch codiert...
Abgesehen davon klapp es ja, wenn der File auf der Platte liegt.

BTW. Packen nicht vergessen!

Ich denke uns fehlt ein bisschen an Infos..

[BerTa]

Was brauchst du denn an Informationen?