Teil von SELFHTML Forum Teil von SELFHTML Forumsarchiv Teil von 2003 Teil von Februar

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

Informationsseite
  1. Seite (SONSTIGES) VB -- aus dem wert "C:\123456.txt" den wert "123456" kriegen von Jan Lauken, 28. 02. 2003, 09:44
nach unten

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

Die folgende Nachricht zum Thema stammt von: Jan Lauken, 28. 02. 2003, 09:44

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?

nach obennach unten

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

Die folgende Nachricht zum Thema stammt von: Frank aus Ulm, 28. 02. 2003, 09:59

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

nach obennach unten

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

Die folgende Nachricht zum Thema stammt von: Jan Lauken, 28. 02. 2003, 10:14

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!!!!!!!!!!!!!!

nach obennach unten

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

Die folgende Nachricht zum Thema stammt von: Frank aus Ulm, 28. 02. 2003, 12:04

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

nach obennach unten

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

Die folgende Nachricht zum Thema stammt von: Andreas Schneider, 28. 02. 2003, 10:01

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

nach oben
Teil von SELFHTML Forum Teil von SELFHTML Forumsarchiv Teil von 2003 Teil von Februar

© 1998-2006 Seite Impressum, Software: Classic Forum