Hallo zusammen, ich habe ein Code der funktioniert, aber ich finde das auf die art nicht so toll und habe bisher keine andere möglichkeit gefunden das der Laufwerkbuchstabe automatisch gesucht und gefunden wird um den Pfad zu öffnen.
Vielleicht kann jemand ein besseren Code vorschlagen?
VB.NET-Quellcode
- Private Function DoesProcessExists(ByVal PName As String) As Boolean
- Return System.Diagnostics.Process.GetProcessesByName(PName).Length >= 1
- End Function
- Private Sub Harddisk(ByVal Laufwerkbuchstabe As String)
- Try
- Laufwerkbuchstabe = "C:" & "Program Files\Opera x64\opera.exe"
- Process.Start(Laufwerkbuchstabe)
- Catch ex0 As Exception
- Try
- Laufwerkbuchstabe = "D:" & "Program Files\Opera x64\opera.exe"
- Process.Start(Laufwerkbuchstabe)
- Catch ex1 As Exception
- Try
- Laufwerkbuchstabe = "E:" & "Program Files\Opera x64\opera.exe"
- Process.Start(Laufwerkbuchstabe)
- Catch ex2 As Exception
- Try
- Laufwerkbuchstabe = "F:" & "Program Files\Opera x64\opera.exe"
- Process.Start(Laufwerkbuchstabe)
- Catch ex3 As Exception
- MsgBox("Opera wurde nicht gefunden, bitte installiere Opera", MsgBoxStyle.Critical)
- End Try
- End Try
- End Try
- End Try
- End Sub
- Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
- If DoesProcessExists("opera") = False Then
- Harddisk(Laufwerkbuchstabe:=0)
- ElseIf DoesProcessExists("opera") = True Then
- Process.Start("www.google.de")
- Else
- MsgBox("Opera wurde nicht gefunden, bitte installiere Opera", MsgBoxStyle.Critical)
- End I
Vielleicht kann jemand ein besseren Code vorschlagen?