| Вопрос: Не работает функция Shell!!! | Добавлено: 28.01.03 09:09 |
Автор вопроса:  SergKuz
|
|
Добрый день! После установки на клиентскую машину (установка проходит нормально) не работает функция shellю Вызов происходит следующим образом "Shell App.Path & "\" & RunProgramPath & RunProgramName & " param1", vbNormalFocus". Путь правильный, файл по нему есть. Если тупо скопировать строчку и выполнить в системе - файл запускается. ОС Вынь 2000 сервер англ. СП3. В чем может быть дело? |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа: Nonamer ICQ: 268674940 Вопросов: 31 Ответов: 69 |
Web-сайт: Профиль | | #1 | Добавлено: 28.01.03 11:49 |
|
На самом деле у тебя все работает. Только ты не правильно путь указываеш... Функция App.Path возвращает уже полный путь программы кроме его имени. Например, файл находится C:\Program Files\MyProgram\Start.exe Так вот, app.path - это уже C:\Program Files\MyProgram. Достаточно написать "\Start.exe" и все будет работать... В твоем случае надо писать НЕ Shell App.Path & "\" & RunProgramPath & RunProgramName & " param1" а Shell App.Path & "\" & RunProgramName & " param1" Либо Shell RunProgramPath & RunProgramName & " param1"
С уважением, Nonamer. |
||
((
)) 
|
Номер ответа: 2 Автор ответа:  SergKuz Вопросов: 1 Ответов: 1 |
Профиль | | #2 | Добавлено: 28.01.03 11:58 |
|
запускаемое приложение находится в пути относительно запускающего т.е. в c:\program files\folder1 лежит запускающее приложение (в котором не работает shell) а в c:\program files\folder1\folder2 - запускаемое. Поэтому Ваше утверждение не совсем верно p.s. к тому же я написал, что выполнение строчки в системе (через run, к примеру) приводит к запуску приложения |
||
|
Номер ответа: 3 Автор ответа: PolВопросов: 0 Ответов: 2 |
Профиль | | #3 | Добавлено: 28.01.03 12:04 |
| А я с помощью Shell вызываю архиватор rar. Вопрос: можно-ли то что обычно выводится в текстовом окне при обычном вызове rar'a (служебные сообщения программы) выводить в какой-нибудь элемент формы (например TextBox) ? | ||
|
Номер ответа: 4 Автор ответа: PolВопросов: 0 Ответов: 2 |
Профиль | | #4 | Добавлено: 28.01.03 12:10 |
|
Касательно вопроса SergKuz : Попробуйте запускать Shell так : Dim RetVal RetVal = Shell(pathname,windowstyle) |
||
Страница: 1 |