Hey
Ich möchte auf meinem Computer etwas suchen....
Und zwar einfach ob überhaupt ob eine .exe-Datei existiert.
Aber ich bekomm es irgendwie nicht hin..
Bis jetzt hab ich nur so was komisches hier...
Private Sub DoAction()
Dim EXEDatei As String = ""
For Each Suchen In My.Computer.FileSystem.GetParentPath(Form1.Laufwerk) 'Laufwerk ist eine bereits definierte Variable (ein Pfad (D:\))
EXEDatei = Suchen
Next
Select Case True
Case File.Exists(EXEDatei)
MsgBox("Klappt:)")
End Select
End Sub
Danke schon mal!!
P.S.: Ach ja! Ich brauche dann auch den Pfad der .exe-Datei
Ich möchte auf meinem Computer etwas suchen....
Und zwar einfach ob überhaupt ob eine .exe-Datei existiert.
Aber ich bekomm es irgendwie nicht hin..
Bis jetzt hab ich nur so was komisches hier...
Private Sub DoAction()
Dim EXEDatei As String = ""
For Each Suchen In My.Computer.FileSystem.GetParentPath(Form1.Laufwerk) 'Laufwerk ist eine bereits definierte Variable (ein Pfad (D:\))
EXEDatei = Suchen
Next
Select Case True
Case File.Exists(EXEDatei)
MsgBox("Klappt:)")
End Select
End Sub
Danke schon mal!!
P.S.: Ach ja! Ich brauche dann auch den Pfad der .exe-Datei
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „felix“ ()