Function Command ( ByVal index As Integer = -1 ) As String
Возвращает параметры командной строки при вызове программы. Встроенная в FreeBasic функция. (пишу, чтобы лишний раз не искать.)
index - index - управляет возвращаемым значением.
Если index не используется, то возвращает одну единую строку параметров как один параметр. Пример: "1.exe 1 2 3 4" при Command() вернет 1 2 3 4
Если index равен 0, то вернет родительское имя файла без параметров Пример: "1.exe 1 2 3 4" при Command(0) вернет 1.exe
Если индекс больше нуля, то возвращает имеющийся параметр под своим индексом. Пример: "1.exe 1 2 3 4" при Command(3) вернет 3
Если индекс имеет значение, а параметра под таким индексом нет, ничего не возвратит. Пример: "1.exe 1 2 3 4" при Command(5) ничего не вернет
Windows , Linux
Print "program launched via: " & Command(0)
Dim As Integer i = 1
Do
Dim As String arg = Command(i)
If Len(arg) = 0 Then
Exit Do
End If
Print "command line argument " & i & " = """ & arg & """"
i += 1
Loop
If i = 1 Then
Print "(no command line arguments)"
End If
Sleep
Created with the Personal Edition of HelpNDoc: Free iPhone documentation generator