Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

(VB 6) Bestimmte Zeichenfolge aus String ausgeben

Frage Entwicklung VB for Applications

Mitglied: 17735

17735 (Level 2)

18.08.2007, aktualisiert 19.08.2007, 12799 Aufrufe, 2 Kommentare

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:

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>

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
Mitglied: miniversum
19.08.2007 um 10:22 Uhr
Angenommen in der Variabeln Text steht dein Text dann gehts so:
01.
pos1 = InStr(Text, "<currentversion>") + Len("<currentversion>") 
02.
pos2 = InStr(Text, "</currentversion>") 
03.
Zahl = Mid(Text, pos1, pos2 - pos1) 
04.
 
05.
MsgBox Zahl
In Zahl steht dann dein Wert drin.

miniversum
Bitte warten ..
Mitglied: 17735
19.08.2007 um 11:06 Uhr
Okay danke das funktioniert.

Gruß,
Ahnenforscher
Bitte warten ..
Ähnliche Inhalte
Visual Studio
gelöst Vb.net raw string in xdocument einfügen (6)

Frage von Herbrich19 zum Thema Visual Studio ...

Visual Studio
gelöst VB bestimmte Stelle im Bild highlighten wenn MouseOver Textbox? (9)

Frage von PixL86 zum Thema Visual Studio ...

Outlook & Mail
gelöst Email Anhänge speichern VB Script aber nur bestimmte Dateitypen (Outlook) (4)

Frage von LindeUnimog zum Thema Outlook & Mail ...

Batch & Shell
gelöst Die Zeichenfolge hat kein Abschlusszeichen - Batch mit mehrzeiligem Powershellbefehl (8)

Frage von freshman2017 zum Thema Batch & Shell ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Viren und Trojaner
Ransomware .nm4 (14)

Frage von Zyklo92 zum Thema Viren und Trojaner ...

iOS
16 iPads zentrall verwalten (14)

Frage von simonlohr zum Thema iOS ...

Microsoft Office
+1.000 Ordner in Outlook: Wie besser? (11)

Frage von Matsushita zum Thema Microsoft Office ...