0 / 0 / 1
Регистрация: 30.04.2007
Сообщений: 27
1

Как получить и передать параметры из другой программы (через командную строку)?

05.01.2008, 15:30. Показов 2267. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Как получить и передать параметры из другой программы (через командную строку)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.01.2008, 15:30
Ответы с готовыми решениями:

Передать параметры через командную строку
Здравствуйте, господа. Пишу одну вещь на Java FX (через Intellij IDEA 13.1.1). В итоге должен...

Как передать строку из слов и пробелов через командную строку?
Я сделал запуск проги через командную строку. Теперь считываю параметры. Ничего сложного. Один...

Как передать параметр в командную строку через Delphi?
Есть куча параметров, набирать их лен Команды Run compmgmt.msc clipbrd.exe cleanmgr.exe ...

Передать параметры в командную строку и перехватить результат обратно в приложение
Дорого времени суток! Есть небольшая задача: необходимо из C# приложения вызвать выполнение...

2
0 / 0 / 0
Регистрация: 19.12.2007
Сообщений: 16
06.01.2008, 13:22 2
' Пример передачи аргументов командной строки в функцию,которая возвращает их в переменной типа Variant,содержащей массив
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Function GetCommandLine(Optional MaxArgs)
   ' Объявляем переменные
   Dim C, CmdLine, CmdLnLen, InArg, I, NumArgs
   ' Проверка наличия MaxArgs
   If IsMissing(MaxArgs) Then MaxArgs = 10
   ' Задание корректной размерности массива
   ReDim ArgArray(MaxArgs)
   NumArgs = 0: InArg = False
   ' Получаем аргументы командной строки
   CmdLine = Command()
   CmdLnLen = Len(CmdLine)
   ' Анализ всех символов командной строки
   For I = 1 To CmdLnLen
      C = Mid(CmdLine, I, 1)
      ' Проверка наличия пробела или табуляции
      If (C < > ' ' And C < > vbTab) Then
         ' пробел и табуляция не обнаружены
         ' Проверка наличия аргумента
         If Not InArg Then
         ' Начало нового аргумента
         ' Проверка количества аргументов
            If NumArgs = MaxArgs Then Exit For
            NumArgs = NumArgs + 1
            InArg = True
         End If
         ' Добавляем символ к текущему аргументу
         ArgArray(NumArgs) = ArgArray(NumArgs) & C
      Else
         ' Если найден символ пробела или табуляции,
         ' устанавливаем флаг InArg flag в False
         InArg = False
      End If
   Next I
   ' Меняем размер массива
   ReDim Preserve ArgArray(NumArgs)
   ' Возвращает массив в качестве имени функции
   GetCommandLine = ArgArray()
End Function
Пример из MSDN ))
Если я тебя правильно понял!
Удачи!
0
Anri
07.01.2008, 17:57 3
если прога своя, то кто платит тот и танцет девушку
тогда все может быть саааусэм проще. Допустим у тя такие условия: пробел - делит комманды и все, тогда вот:
Visual Basic
1
2
Dim vCMD As Variant
vCMD = Split(Command$, ' ')  'тут у тебя будет массив из твоих комманд
и ты можешь над ними извращаться как хошь
07.01.2008, 17:57
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.01.2008, 17:57
Помогаю со студенческими работами здесь

Передать аргумент через командную строку
Cледующая программа попросту выписывает Hello, world на экран. Компилирую следующую программу как...

Необходимо передать аргумент виртуальной машине через командную строку
Добрый вечер, не знал куда кинуть эту тему, поэтому она здесь. Есть задача запустить виртуальную...

Как открыть программу написанную на c++ через командную строку, если в пути программы есть пробелы
путь программы C:\la la\ve.exe пишу в командной строке: start C:\la la\ve.exe и выдает такое...

на другой комп через командную строку по локалке
Хотелось бы узнать возможно ли попасть на другой комп по локалке с помощью командной строки. Кто...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru