17735
18.08.2007, aktualisiert am 19.08.2007
13375
2
0
(VB 6) Bestimmte Zeichenfolge aus String ausgeben
Hallo,
ich habe folgendes Problem in VB6:
Ich lade aus dem Internet eine XML-Datei herunter, den Inhalt daraus speichere ich in einer Variablen. Dies sieht etwa so aus:
Aus diesem Text, der in einer Variable vom Typ "String" gespeichert ist, möchte ich nun die Zeichenkette zwischen <currentversion> und </currentversion> filtern und in einer neuen Variable abspeichern, also in diesem Fall sollte in der neuen Variable 3.0 stehen. Anschließend kann ich dann mit dieser Variable weiterarbeiten.
Meine Frage: Wie kann ich diesen String aus dem String herausfiltern und dabei beachten, dass die Länge des aus dem Internet ankommenden Strings vor <currentversion> variabel (also mal länger, mal kürzer) sein kann? Ich habe bereits verschiedene Kombinationen mit den Funktionen Left(), Right(), InStr() und Len() versucht, bin jedoch nicht erfolgreich zum Ziel gekommen.
Ich hoffe, ich habe meine Frage verständlich formuliert, wenn nicht, einfach fragen...
Gruß,
Ahnenforscher
ich habe folgendes Problem in VB6:
Ich lade aus dem Internet eine XML-Datei herunter, den Inhalt daraus speichere ich in einer Variablen. Dies sieht etwa so aus:
HTTP/1.1 200 OK
ETag: "70cb5336-b6-437feb020c0c0"
Accept-Ranges: bytes
Content-Length: 182
Date: Sat, 18 Aug 2007 20:14:07 GMT
Connection: close
Last-Modified: Sat, 18 Aug 2007 19:55:23 GMT
Server: Apache
Content-Type: application/xml
Keep-Alive: timeout=10, max=961
<?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?>
<Product>
<title>ProductTitle</title>
<currentversion>3.0</currentversion>
</Product>
ETag: "70cb5336-b6-437feb020c0c0"
Accept-Ranges: bytes
Content-Length: 182
Date: Sat, 18 Aug 2007 20:14:07 GMT
Connection: close
Last-Modified: Sat, 18 Aug 2007 19:55:23 GMT
Server: Apache
Content-Type: application/xml
Keep-Alive: timeout=10, max=961
<?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?>
<Product>
<title>ProductTitle</title>
<currentversion>3.0</currentversion>
</Product>
Aus diesem Text, der in einer Variable vom Typ "String" gespeichert ist, möchte ich nun die Zeichenkette zwischen <currentversion> und </currentversion> filtern und in einer neuen Variable abspeichern, also in diesem Fall sollte in der neuen Variable 3.0 stehen. Anschließend kann ich dann mit dieser Variable weiterarbeiten.
Meine Frage: Wie kann ich diesen String aus dem String herausfiltern und dabei beachten, dass die Länge des aus dem Internet ankommenden Strings vor <currentversion> variabel (also mal länger, mal kürzer) sein kann? Ich habe bereits verschiedene Kombinationen mit den Funktionen Left(), Right(), InStr() und Len() versucht, bin jedoch nicht erfolgreich zum Ziel gekommen.
Ich hoffe, ich habe meine Frage verständlich formuliert, wenn nicht, einfach fragen...
Gruß,
Ahnenforscher
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 66540
Url: https://administrator.de/forum/vb-6-bestimmte-zeichenfolge-aus-string-ausgeben-66540.html
Ausgedruckt am: 22.04.2025 um 13:04 Uhr
2 Kommentare
Neuester Kommentar
Angenommen in der Variabeln Text steht dein Text dann gehts so:
In Zahl steht dann dein Wert drin.
miniversum
pos1 = InStr(Text, "<currentversion>") + Len("<currentversion>")
pos2 = InStr(Text, "</currentversion>")
Zahl = Mid(Text, pos1, pos2 - pos1)
MsgBox Zahlminiversum
Okay danke das funktioniert.
Gruß,
Ahnenforscher
Gruß,
Ahnenforscher
