Serveradresse entschlüsseln

[PChristoph]

Halli,

ich möchte mir ein Downloadprogramm basteln. Ich lade mir dazu die Adressen aus einer Textdatei ein. Nur habe ich jetzt Probleme mit dem zerlegen der Adressen. Also wenn ich z.B. „ftp://ftp.server.com/verzeichnis/datei.exe“ habe brauche ich dann für das InternetObjekt(genauer name ist mit jetzt entfallen) die Adresse vom Server also „ftp.server.com“ und dann „verzeichnis/datei.exe“. Ich wollte dies zuerst mit den Stringoperatoren (right,left,mid)machen aber ich hab dann irgend wann nicht mehr durchgeschaut. Jetzt meine Frage, hat irgendjemand schon einmal so etwas gemacht und könnte mir den Quelltext schicken oder hat ein Tipp für mich.

Mit freundlichen Grüßen
Christoph

[Anonym]

hi
zuerst suchst mit der instr-funktion die erste stelle an der ein „//“ vorkommt „schneidest“ alles was links davon liegt ab und suchst wieder mit instr nach dem ersten „/“

a = len(server)
b = instr(server, „//“)
c = mid(server,b ,a - b)
d = instr(server, „/“)
e = d + b + 1

servername = left(server, e)
serverdir = mid(server, e + 1, a - e)

habs zwar nicht getestet aber es sollte eigentlich funzen

mfg Luemmel

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]