Problem... Externe .MSI aus VB.net heraus starten
Hallo zusammen,
ich habe folgendes Problem, bei dem ich um Eure Hilfe bitte...
Ich habe in VisualStudio 2008 (genauer gesagt VisualBasic 2008) eine Art Menü geschrieben, welches auf einen USB-Stick gepackt werden soll. Damit sollen verschiedene Installationsdateien mit Click auf einen CommandButton gestartet werden.
Dummerweise habe ich allerdings Probleme mit dem Ansteuern einer Microsoft Installer Datei (.msi). Was bei einer .exe klappt, funktioniert dort nicht. (Er sagt, er findet die Datei nicht...)
Was aber nicht sein kann. Sie ist genau im selben Verzeichnis, wie die .exe, bei der es problemlos funktioniert...
Hier die zwei Code-schnipsel:
1. Der funktionierende mit der .exe
2. Der nicht funktionierende mit der .msi
Habe in etlichen Foren schon gesucht... (Daher stammen auch die Codeschnipsel, da ich nicht wirklich versiert bin... Habe diese lediglich an meine Bedürfnisse angepasst)
Vielen Dank im Voraus für Eure Hilfe.
Gruß
Horseman
ich habe folgendes Problem, bei dem ich um Eure Hilfe bitte...
Ich habe in VisualStudio 2008 (genauer gesagt VisualBasic 2008) eine Art Menü geschrieben, welches auf einen USB-Stick gepackt werden soll. Damit sollen verschiedene Installationsdateien mit Click auf einen CommandButton gestartet werden.
Dummerweise habe ich allerdings Probleme mit dem Ansteuern einer Microsoft Installer Datei (.msi). Was bei einer .exe klappt, funktioniert dort nicht. (Er sagt, er findet die Datei nicht...)
Was aber nicht sein kann. Sie ist genau im selben Verzeichnis, wie die .exe, bei der es problemlos funktioniert...
Hier die zwei Code-schnipsel:
1. Der funktionierende mit der .exe
Private Sub cmdInstProgA_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdInstProgA.Click
Dim sAppPath As String
sAppPath = Application.StartupPath
ChDir(sAppPath & "\Setup")
Call Shell("ProgrammA.exe", 1)
End Sub
Dim sAppPath As String
sAppPath = Application.StartupPath
ChDir(sAppPath & "\Setup")
Call Shell("ProgrammA.exe", 1)
End Sub
2. Der nicht funktionierende mit der .msi
Private Sub cmdInstProgB_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdInstProgB.Click
Dim sAppPath2 As String
sAppPath2 = Application.StartupPath
ChDir(sAppPath2 & "\Setup")
Call Shell("ProgrammB.msi", 1)
End Sub
Dim sAppPath2 As String
sAppPath2 = Application.StartupPath
ChDir(sAppPath2 & "\Setup")
Call Shell("ProgrammB.msi", 1)
End Sub
Habe in etlichen Foren schon gesucht... (Daher stammen auch die Codeschnipsel, da ich nicht wirklich versiert bin... Habe diese lediglich an meine Bedürfnisse angepasst)
Vielen Dank im Voraus für Eure Hilfe.
Gruß
Horseman
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 109365
Url: https://administrator.de/contentid/109365
Ausgedruckt am: 25.11.2024 um 00:11 Uhr
2 Kommentare
Neuester Kommentar