Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > Коммандная строка в VBA

Автор: valex13 27.1.2004, 08:00

Как получить коммандную строку в VBA . Например MS Exel excel.exe c:\myex.xls
В VB это делается так

Код


Dim sCommandLine As String
sCommandLine = Trim(Command())

Автор: cardinal 27.1.2004, 20:25

Код

Private Declare Function GetCommandLine Lib "kernel32" Alias "GetCommandLineA" () As String

Private Sub CommandButton1_Click()
  Dim CmdLine As String
  CmdLine = Split(GetCommandLine(), Chr(34))(2)
  MsgBox CmdLine
End Sub

Автор: Гость_Serj 3.2.2004, 23:41

GetCommandLine мне нравится использовать вместе с CommandLineToArgvW.

Автор: Mephisto 4.2.2004, 19:04

Цитата

GetCommandLine мне нравится использовать вместе с CommandLineToArgvW.

Пример можешь кинуть?

Автор: valex13 5.3.2004, 08:47

Можно еще использовать:

Код


Dim sCommand As String
sCommand = GetCommand()

Не зависимо от ОС! т.к. в NT вот это

Код


Private Declare Function GetCommandLine Lib "kernel32" Alias "GetCommandLineA" () As String

не работает!