|
|
|
Помогите с Wshell
|
|||
|---|---|---|---|
|
#18+
Для запуска и ожидания окончания работы программы использую код Dim WShell As Object, ErrCode Set WShell = CreateObject("WScript.Shell") ErrCode = WShell.Run("d:\pr.exe < d:\f.inp > d:\f.out", 3, True) Set WShell = Nothing Надо запустить программу и задать ей входной и выходной файл. Из батника эта строка работает. Пробовал аналог ErrCode = WShell.Run("d:\pr.exe 0< d:\f.inp 1> d:\f.out", 3, True) Результат в обоих случаях - запускается пр. и просит inp и out - не передаются параметры. Пришлось создавать .bat и потом запускать его, но это не очень красиво. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2004, 00:58 |
|
||
|
Помогите с Wshell
|
|||
|---|---|---|---|
|
#18+
Во-первых, есть несколько способов управлять stdin'ом и stdout'ом программы в досе. Например copy autoexec.bat con | more Во вторых, ты разве не можешь переделать pr.exe и передавать ей эти файлы в виде параметров? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2004, 01:11 |
|
||
|
Помогите с Wshell
|
|||
|---|---|---|---|
|
#18+
Программу переделывать можно, но нельзя-:). Будучи в форуме Access я не написал, что запускаю WShell.Run из VBA Access. Разве можно в VBA использовать конструкцию - copy autoexec.bat con | more Там Copy несет другое значение. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2004, 14:24 |
|
||
|
|
start [/forum/topic.php?fid=45&fpage=1665&tid=1676025]: |
0ms |
get settings: |
10ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
46ms |
get topic data: |
9ms |
get forum data: |
5ms |
get page messages: |
42ms |
get tp. blocked users: |
1ms |
| others: | 244ms |
| total: | 370ms |
| 0 / 0 |
