String bearbeiten

[Pure-r-Freak]

was geht bei euch leute,
ich würde gerne aus einen string von rechts aus den teil bis zum ersten \ ausschneiden

also:
string$ = "c:\programme\hallo\aha\"
und das resultat sollte sein: "c:\programme\hallo\"

kann mir da irgendjemand helfen ????

[MLK]

den habe ich zufällig noch in der schublade:

Code: Alles auswählen

string$ = "c:\programme\hallo\aha\"
Debug RemoveString(string$, StringField(string$, CountString(string$, "\"), "\") + "\")

[bluejoke]

Ich würde folgendes machen:
Per CountString die Anzahl der "/" zählen,
per FindString die Position des vorletzten (oder wieviele auch immer) "/"-zeichens rausfinden.
Per Left(String$, Position) den linken Teil holen, und fertig.

Das sollte eigentlich zur Lösung reichen.
Bei FindString muss man eine Schleife einsetzen, und als Startposition jeweils den letzten Fundort angeben, das eben CountString-1 mal.

Simon


EDIT: MLK war schneller, seine Lösung scheint mir auch besser, solange nach nur einem Zeichen gesucht wird. Sonst musst du wohl meine Lösung verwenden.

EDIT, Frage: wie arbeitet eigentlich StringField? Nach meiner Methode?

[DarkDragon]

den habe ich zufällig noch in der schublade:

Code: Alles auswählen

string$ = "c:\programme\hallo\aha"
Debug RemoveString(string$, StringField(string$, CountString(string$, ""), "") + "")

Toll, aber schonmal bedacht, dass auch C:\Programme\aha\aha\aha\ möglich sein könnte?

Code: Alles auswählen

string$ = "c:\programme\hallo\aha"
Debug Left(string$, Len(string$)-Len(StringField(string$, CountString(string$, ""), "")+""))

[ORANGE]

Der ist auch nicht schlecht:

Code: Alles auswählen

string$ = "c:\programme\hallo\aha\"
Debug GetPathPart(Left(string$,Len(string$)-1)+".fak")

[Pure-r-Freak]

ihr seid echt die besten
DANKE

[bluejoke]

Man, ich wollte gerade scho über Oranges Lösung meckern, und check erst jetzt, dass sie schon irgendwie geil ist. Ich hab zuerst gedacht, da würde er irgendwas anderes machen, aber grad noch rechtzeitig hab ichs kapiert...

[ts-soft]

@ORANGE
Toplösung, beweist sehr viel Kreativität

[Pure-r-Freak]

kann das bsp von orange vielleicht jemand erklären ???????

[ts-soft]

kann das bsp von orange vielleicht jemand erklären ???????

mit +".fak") simuliert er eine Datei wobei er mit GetPathPart den Pfad ermittelt