Как вызвать программу, чтобы она вернула какое-то значение?

[arthur2]

Как вызвать программу, передать ей на обработку какое-нибудь значение и получить его обратно?

Скажем, я запускаю программу, передаю ей число 2, она умножает его на два и возвращает мне 4.

[Twister]

Программа не функция, она ни чего не возвращает.
Создай расшаренный маппинг.
Перед запуском проги запиши туда исходные данные.
Запусти программу.
Дождись ее завершения.
Прочитай результат из маппинга.

Все.

[Mikle]

arthur2
msgbox 2*val(command$)

[Twister]

Да, можно еще передавать данные в командной строке, но много ты таким способом не передашь...

[Viper]

Да, можно еще передавать данные в командной строке, но много ты таким способом не передашь...

Туда то он передаст, а вот назад.
Вопрос автору:
Программа уже существует или ты еще только предполагаешь ее сотворить? Если второе, то надо сразу думать о возможностях взаимодействия с этой программой из вне, разделяемая память лучше всего (в Кирпичах есть мой кирпичик на эту тему). Если же программа уже есть, то как она с окружающим миром взаимодействет?

[Konst_One]

может автору стоит обратить внимание на ActiveX DLL проект, создать свой класс с нужными ему функциями и уже в других программах его использовать.

[arthur2]

Twister

Программа не функция, она ни чего не возвращает.

Во-во! А как сделать, чтобы возвращала?
Что такое мапинг и как им пользоваться? можно ссылочку или кусочек кода?

В принципе, командная строка меня бы устроила, но это ведь как передать туда, а не обратно.

Mikle
Ну да, только чтобы результат отправился не куда-нибудь, а в вызвавшую программу.

[arthur2]

Viper
Здесь просто - запускаемая программа моя, что хочу то и делаю.
(пошёл на кирпичи за примером)

Konst_One
Нет, этот вариант мне не подходит.

[Antonariy]

А как сделать, чтобы возвращала?

Эээ... возвращала куда?

Имхо, автор хочет странного...

[arthur2]

В туда же, из откуды вызвано:

x = dvajdyDva(2)

Function dvajdyDva(n As Integer) As Integer
'Как-то там вызываю внешнюю программу
Shell или ShellExecute или ещё чего
dvajDydva='как-то там получаю результат
End Function

Как-то так...

[Хакер]

arthur2
Ещё раз: программа - не функция.

Эта логика (делёж на вызывающую и вызываемую стороны) не применим к двум процессам (в том смысле, в котором ты имеешь ввиду, разумеется), как он применим к функциям.

Маппинг - это отображение дискового пространства на виртуальное адресное пространство процесса.

Если сделать в двух процессах маппинг одного и того же дискового пространства, то получится общая память у этих двух процессов (тогда как вообще в Windows у всех процессов своё АП).

[ANDLL]

Ну блин, какое узкое мышление. Нормальная ситуация, ничего странного.
Кстати, как вариант "передачи назад" - проще всего наверное создать атом и вернуть его идшник в exitprocesscode. Код получится наиболее короткий

[arthur2]

Хакер
Я понял, что стандартного способа нет. Меня, как всегда, устроит эмуляция.

Ну пусть с маппингом - теоретически я красиво всё предтавил: две программы пользуются одним и тем же куском памяти. Ещё слишал такие красивые слова, как фиберы, атомы и симофоры

А практически?

Пример из кирпичей про отображение файла на память посмотрел. Этот способ, наверное, удобен, если нужно передавать большие объёмы данных. А если по чуть-чуть? И там ведь один положил, другой взял. Но никто не сообщает, что уже, мол, пора взять.

В "Популярных вопросах"
http://bbs.vbstreets.ru/viewtopic.php?t=14649
судя по описанию, что-то похожее на то, что надо, но... пример оттуда не качается. А спросить в том топике - ниизя

А если ActiveX EXE попробовать - такую программу нужно регистрировать, как библиотеку, или она сама при запуске прописывается? Можно ли её снаружи запустить и снаружи же убить? Вообще, чем она отличается от обычного экзешника?

[arthur2]

ANDLL
О, тебя-то мне и надо! В топике
http://bbs.vbstreets.ru/viewtopic.php?t=14649
Не кочается твой пример.

Да, и вот на этот:
http://bbs.vbstreets.ru/viewtopic.php?t=12444
тоже хотелось бы посмотреть

А про атом - можно чуть подробнее? Или где посмотреть? Очень похоже, что это как раз то, что я смутно ищу

[Хакер]

Атом - это особое 16-битное число, соответсвующее строке в особой таблице. Строка при этом может быть не длиннее 255 символов.

Атомы глобальны для рабочей станции. Их можно добавлять/удалять, искать атом по его имени (строке, ассоциированной с атомом).

[arthur2]

Хакер
То есть, зная строку, я могу посмотреть значение, или наоборот, зная значение, строку? И то и другое я сам задаю? Строка в особой таблице и имя атома - одно и то же? И как всё это осуществить.

Как я понял:
1. Создаю атом с именем "вася", кладу в него значение 10, запускаю программу

2. Программа смотрит значение атома "вася", умножает его на 100, пишет результат в атом "вася" и умирает.

3. Я дожидаюсь, пока программа умрёт, и забираю из "вася" результат.

Так?

Что такое exitprocesscode (слово поисковики не знают)?

Если можно, чуть больше конкретики: как эти атомы создавать и с чем их есть?

[ANDLL]

Если твоя программа должна обмениватся 4-байтовыми числами, то не нужны атомы.
Нужно просто класть ответ в exit code. Что бы положить надо вызвать ExitProcess(code). Что бы узнать - GetExitCodeProcess

[Александр Дмитриев]

Предполагаю, что ты пишешь Shell Extension (если это не так, то всё написанное дальше - скорее всего, не в тему). У тебя есть две программы - основная прога и Extension. Extension вызывается оболочкой и должен проанализировать каким-то образом файл (например) и выдать что-то на экран, связанное с этим файлом. Так как анализировать файл умеет и сама основная программа и код этого анализа занимает добрых 3/4 её размера, то тебе не хочется этот код копировать в Extension, а хочется запустить основную программу, чтобы она его проанализировала, вернула ответ Extension'у, а тот вывел информацию на экран. В таком случае, думаю, лучше будет сделать что-то типа такого: создать DLL, поместить в неё код анализа файла и сделать так, чтобы и Extension, и основная прога пользовались этой DLL (я ни разу не писал DLL, хотя очень многое о них знаю, поэтому, возможно, где-то что-то сказал не то). Но если информации передавать нужно немного, то, скорее всего, лучший вариант - с командной строкой и exit code.

[arthur2]

ANDLL
Спасибо! Вроде, работает, но...
Вот так я кладу код возврата:

Код: Выделить всё

Option Explicit
Private Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)

Sub Main()
MsgBox "kk"
'DoEvents
  ExitProcess 100
End Sub

Если в этом варианте, то при вызове из второй программы GetExitCodeProcess даёт то, что положил, 100

Но! Если закомментировать меседжебокс, то GetExitCodeProcess уже читает 0

Пытался вместо бокса влепить дуэвент, но тчетно. В чём тут может быть дело?

Про атомы мне всё равно интересно: я вообще правильно понял? Можно ли с их помощь. обмениваться небольшими строками? Или ещё чем-нибудь? И как!

З.Ы. Посмотри на три топика выше: там ссылки на твои примеры, которые не скачиваются

[Matew]

arthur2, и все таки мне не не понятно, чем не устроил ActiveX EXE ? Он вроде делает то, что нужно с наименьшими трудозатратами и с большой надежностью.

[arthur2]

Александр Дмитриев
Ага, ты всё правильно понял: это расширение, контекстное меню любых файлов. Но работать онo должнo не c одной конкретной программой, а с любой.

Идея в следующем: если программе надо, чтобы на её родных файлах было дополнительное меню, она просто прописывает то, что ей нужно, в файл конфигурации моего расширения.

Для стандартных задач абсолютно не нужно, чтобы программа сама общалась с расширением (эта часть у меня уже готова). Что написано в файле конфигурации, то и выводится в меню.

Но если программа хочеть помечать свои пункты галочками или менять заголовок пункта в зависимости от содержания файла, она должна как-то сообщать моему расширению, чего она хочет от конкретного пункта.

Matew
Мне предложили активХ длл, и это мне не подходит. А на актив ЕХЕ я как раз посматриваю. Но некоторые моменты с ним мне не ясны (чуть выше в теме я уже спрашивал)

[Konst_One]

плагины обычно пишуться на ActiveX DLL. зачем велосипед то изобретать

[arthur2]

С длл более-менее понятно и спрашивать-то особо нечего. Но не хочется множить лишние сущности, так что если получится без длл обойтись, я бы предпочёл обойтись.

Расширение - само по себе уже длл. Если чтобы читать инфу из файлов, оно будет от каждой из программ требовать ещё по длл, то всё это получится слишком уж запутано. Хотя, может быть я так и зделаю, но по этому способу у меня вопросов пока нет. Пока надеюсь с ним не связываться

[Хакер]

arthur2
Какие-то предрассудки.

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

Если чтобы читать инфу из файлов, оно будет от каждой из программ требовать ещё по длл, то всё это получится слишком уж запутано.

Будет ничуть не менее запутанней, чем у тебя, но на порядок наждёжнее.

[arthur2]

Хакер
Я не хочу, чтобы это были плагины и пытаюсь придумать, как без плагинов обойтись. Но в общем, да, убедили - вероятно, эту конкретную задачу лучше решать длл-ками. Проехали.

Но мой вопрос был несколько шире моей сейчашной задачи. Я же пытаюсь объяснить - как присобачить длл, более-менее понятно. А вот как передать данные с атомами - мне интересно.

[Mikle]

Можно просто передавать через файл, открытый с общим доступом.