exe ​​avec paramètre d'exécution acceptant

Question

comment écrire un code vb qui peut être exclu du paramètre à l'exécution

ex. Mon exe est « readfile.exe » et si je veux donner la ligne de commande rom nom du fichier de la commande à exécuter sera

nom readfile.exe

il doit prendre le paramètre nom de fichier et effectuer l'action

Answer 1

vous pouvez faire quelque chose comme ceci:.

Sub Main() 
    Dim a_strArgs() As String 
    Dim blnDebug As Boolean 
    Dim strFilename As String 

    Dim i As Integer 

    a_strArgs = Split(Command$, " ") 
    For i = LBound(a_strArgs) To UBound(a_strArgs) 
     Select Case LCase(a_strArgs(i)) 
     Case "-d", "/d" 
     ' debug mode 
     blnDebug = True 
     Case "-f", "/f" 
     ' filename specified 
     If i = UBound(a_strArgs) Then 
      MsgBox "Filename not specified." 
     Else 
      i = i + 1 
     End If 
     If Left(a_strArgs(i), 1) = "-" Or Left(a_strArgs(i), 1) = "/" Then 
      MsgBox "Invalid filename." 
     Else 
      strFilename = a_strArgs(i) 
     End If 
     Case Else 
     MsgBox "Invalid argument: " & a_strArgs(i) 
     End Select 

    Next i 
    MsgBox "Debug mode: " & blnDebug 
    MsgBox "Filename: " & strFilename 
End Sub 

Answer 2

Regardez la fonction Command, qui devrait vous donner tous les paramètres qui ont été passés dans

Je ne trouve pas les documents VB6 en ligne, mais MSDN a les docs pour la version VBA, et c'est généralement la même chose, donc je suggère de regarder here pour plus d'informations. Et il a même un échantillon complet here.