Rubrik: Verschiedenes / Sonstiges | VB-Versionen: VB.NET | 23.10.07 |
Befehlszeilenparameter ermitteln Durch Erweiterung der "Sub Main" lassen sich die beim Start der Anwendung angegebenen Befehlszeilenparameter sehr einfach abrufen. | ||
Autor: Dieter Otter | Bewertung: | Views: 12.828 |
www.tools4vb.de | System: WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Um zu ermitteln, mit welchen Parametern (Befehlszeilenargumente) die eigene Anwendung aufgerufen wurde, gehen Sie am einfachsten wie folgt vor:
1. Fügen Sie dem Projekt innerhalb eines Modduls eine "Sub Main" hinzu bzw. erweitern Sie diese wie folgt:
Module modMain Public Sub Main(ByVal sArgs() As String) ' ... End Sub End Module
2. Ändern Sie im Eigenschaften-Dialog des Projekts das Startobjekt auf "Sub Main". Unter VB 2005 müssen Sie hier ggf. zuvor die Einstellung "Anwendungsframework aktivieren" deaktivieren.
Über das String-Array sArgs erhalten Sie dann sofort alle Parameter, die beim Start Ihrer Anwendung angegeben wurden:
Public Sub Main(ByVal sArgs() As String ' Wurde die Anwendung mit Parametern gestartet? If sArgs.Length > 0 Then ' alle Parameter ermitteln For i As Integer = 0 To sArgs.Length - 1 Debug.Print sArgs(i) Next i End If End Sub
Anmerkung:
Um das Ganze zu testen, können Sie die Parameter für die Ausführung der Anwendung im Debug-Modus direkt in den Projekt-Eigenschaften hinterlegen (Projekt-Eigenschaften - Debuggen -
Startoptionen - Befehlszeilenargumente).
Hinweis:
Durch Deaktivierung der Einstellung "Anwendungsframework aktivieren" wird autom. auch der evtl. eingestellte "Visuelle XP-Style" deaktiviert. Damit Ihre Anwendung aber dennoch
den "Visuellen XP-Style" benutzt, setzen Sie folgende Anweisung in die Prozedur "Main":
Public Sub Main(ByVal sArgs() As String) ' Visuellen XP-Style aktivieren Application.EnableVisualStyles() ... End Sub