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, 12787 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
Outlook & Mail
gelöst Email Anhänge speichern VB Script aber nur bestimmte Dateitypen (Outlook) (4)

Frage von LindeUnimog zum Thema Outlook & Mail ...

C und C++
String einlesen in Array und wieder ausgeben von hinten (4)

Frage von Protected zum Thema C und C ...

Debian
gelöst Bash - String zwischen zwei Kommata ausgeben (3)

Frage von plutowitsch zum Thema Debian ...

Visual Studio
gelöst CSharp Bereiche von Listen von Zahlen ausgeben (1)

Frage von Aicher1998 zum Thema Visual Studio ...

Neue Wissensbeiträge
Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(2)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Heiß diskutierte Inhalte
Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (36)

Frage von Datsspeed zum Thema Exchange Server ...

Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Windows 10
Windows Store Apps ohne Windows Store installieren (10)

Frage von keefien zum Thema Windows 10 ...

Internet Domänen
Nameserver ein Geist? (9)

Frage von zelamedia zum Thema Internet Domänen ...