VB -- aus dem wert "C:\123456.txt" den wert "123456" kriegen

[Jan Lauken]

HI,

allso ich möchte aus einem beliebingem Pfad den Dateinamen haben...

Beispiele:

C:\Windows\system\rundll.exe    --> rundll
C:\Eigene Datein\Schule.doc     --> Schule

Ich gehe davon aus das ein Datei Typ nur 3 zeichen hat... z.b ".bmp", ".doc", ".txt", und, und, und...

Wie kriege ich das hin?

[Frank aus Ulm]

Hi, hallo

mithilfe des Scripting.FileSystemObject

Bsp. in VBS

set fso = CreateObject("Scripting.FileSystemObject")
file_path = "C:\Windows\system\rundll.exe"
file_basename = fso.getBaseName(file_path)
file_extension = fso.getExtensionName(file_path)

....

Tschau, tschüß,
Frank

[Jan Lauken]

Hi,

Danke!!!!!!!!
Mit volgendem schript hat es geklapt:

Private Sub Command3()
Dim Datei, file_basename, file_extension As String

Set fso = CreateObject("Scripting.FileSystemObject")
Datei = Text2.Text
file_basename = fso.getBaseName(Datei)
file_extension = fso.getExtensionName(Datei)
Text4.Text = file_basename
Text5.Text = file_extension
End Sub

Danke!!!!!!!!!!!!!!

[Frank aus Ulm]

Hi, hallo

es empfiehlt sich

• das fso auf Seitenebene (ASP) anzulegen, dann steht es im kontext aller Prozeduren auf der Seite und auf includierten Seiten zur Verfügung und brauch nicht jedesmal explizit für einzelne Vorgänge angelegt zu werden
• das fso am Seitenende bzw. nach dem Gebrauch wieder zu killen mit set fso = nothing

Für reines VB (programmiert mit Visual Studio) hängt die Deklaration von der Verwendung ab, innerhalb einer Klasse usw.

In VB kannst du auch einen Verweis auf das Scripting-COM Modell anlegen und dann mittels

dim fso as new scripting.fileSystemObject  das Objekt anlegen

funzt aber nur in VB, nicht in VBS für ASP!!

Gruß, Frank

[Andreas Schneider]

Hallo jens,

allso ich möchte aus einem beliebingem Pfad den Dateinamen haben...
C:\Windows\system\rundll.exe    --> rundll
C:\Eigene Datein\Schule.doc     --> Schule
Wie kriege ich das hin?

Mit myFile.Name (wobei myFile dein File Objekt ist) bekommst Du den Namen der Datei ohne Pfad, also z.B "Schule.doc". Dann musst Du nur noch mit instr den index des Punkts suchen und mit Left den Teil extrahieren, den Du braucht.

Grüße
Andreas