Programmpfad auslesen bzw. Dateien suchen

Hallo,

habe da mal ein kleines Problem.....

Suche eine Möglichkeit das mir beim Starten eines VB-Skriptes ausliest wo dieses sich gerade befindet d.h. welcher Programmpfad.

Es geht darum das ich ein Skript habe welches ein anderes mit dem einen oder anderen Tool zusammen aufruft.
Das Funktioniert aber nur wenn ich im Skript den Pfad eintrage wo sich die anderen benötigten Dateien befinden sollen.

Ich möchte dies aber gerne Variabel halten - egal in welchen Ordner oder Verzeichnis ich die Dateien kopiere soll das Skript nach diesen Dateien suchen und diese in eine Variable setzen so das das Programm wieder laufen kann.

Hoffe das jemand dazu eine Idee hat

Gruss
SKID

Please also mark the comments that contributed to the solution of the article

Content-Key: 43900

Url: https://administrator.de/contentid/43900

Printed on: April 20, 2024 at 00:04 o'clock

7 Comments

Latest comment

Moin skid,

sowas in der Art...?

...
Function ScriptPath()
        Dim strSFN
        strSFN = WScript.ScriptFullName
        ScriptPath = Left(strSFN, InStrRev(strSFN, "\") - 1)  
    End Function
...

Gruß
Biber

Gude Biber,

ganz genau sowas in der Art.

Habe gleich mal den Test gemacht - Funktioniert super!

und ich such den halben Tag........

Ach ja, nochwas.....

wie muss denn diese Zeile strSFN = WScript.ScriptFullName in VB heißen

Gruss
Skid

Hallo Skid!

VB 6.0	App.Path
VB 2005	Application.StartupPath
VBA	Application.Path

... oder meintest Du ein anderes VB?

HTH
bastla

Moin bastla,

VB 6.0 passt schon

Bei strSFN = WScript.ScriptFullName bekomme ich die Meldung Laufzeitfehler 424 - Objekt erforderlich

Mit Deinen Vorschlägen siehts auch nicht anders aus.

Ich habe bestimmt nur eine Kleinigkeit vergessen - aber was nur ?

Gruss

SKID