VB Code:
Private Sub Form_Load() Dim sArgs() As String Dim i As Integer sArgs = Split(Command, "/") If sArgs(1) = "yes " Then MsgBox "YUp1" Else MsgBox "nope" End If If sArgs(2) = "yes " Then MsgBox "YUp2" Else MsgBox "nope" End If If sArgs(3) = "yes" Then MsgBox "YUp3" Else MsgBox "nope" End If End Sub




Reply With Quote