Запуск екзешника

[KPEATOP]

Запускаю екзешник grad1.bat и жду окончания его работы, чтобы взять результаты из создаваемого им файла grad1.res
Все работало нормально без указания пути к екзешнику (где был мой екзешник, там и grad1.bat). Нужно было переместить grad1.bat в другое место. Указал при запуске путь к нему C:\Program Files\NGDU\grad1.bat он перестал запускаться из моей программы. Самостоятельно он нормально запускается. Как повлияло указание пути к grad1.bat ? Что нужно сделать, чтоб он и оттуда запускался из моей проги ? Заранее сенкс!

Private Declare Function OpenProcess Lib "kernel32.dll" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function WaitForSingleObject Lib "kernel32.dll" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long
Private Declare Function CloseHandle Lib "kernel32.dll" (ByVal hObject As Long) As Long
Private Const SYNCHRONIZE As Long = &H100000
Private Const INFINITE As Long = &HFFFFFFFF

Sub HotPu()
hProcess = OpenProcess(SYNCHRONIZE, 0, Shell("C:\Program Files\NGDU\grad1.bat", vbNormalFocus))
WaitForSingleObject hProcess, INFINITE
CloseHandle hProcess

Open "C:\Program Files\NGDU\grad1.res" For Input As #1
...............
Close #1
End Sub

[Debugger]

екзешник grad1.bat

Так экзешник или батник?

[KPEATOP]

конечно батник. Ошибся. Ну так все таки, почему батник не запускается , когда я ввел путь ?

[awl100Alex]

Ничто не повлияло, это глюки в компе у тебя. Все работает при любых путях...

[KPEATOP]

У меня grad1.bat почему то не создает grad1.res и далее ошибка из моей программы, что она не может найти grad1.res
Когда без прописывания пути запускаю grad1.bat из того же места, где мой екзешник, все нормально. Проста так запускаю grad1.bat тоже все нормально. Ошибка только когда прописываю путь к grad1.bat

[Twister]

Покажи код батника и расскажи в двух словах что он должен делать.

[KPEATOP]

Кода батника у меня нет, это не мой батник. Он считывает данные из файла WWOD.DAT, производит кое какие расчеты и результаты скидывает в GRAD1.res Но когда я пропичываю путь и запускаю батник, он не создает GRAD1.res , хотя без пути он нормально все делает.

[Денис]

Кода батника у меня нет, это не мой батник.

Файл BAT это текстовый файл, открывается блокнотом. Surprise!!!

[iGrok]

Кода батника у меня нет, это не мой батник. Он считывает данные из файла WWOD.DAT, производит кое какие расчеты и результаты скидывает в GRAD1.res Но когда я пропичываю путь и запускаю батник, он не создает GRAD1.res , хотя без пути он нормально все делает.

А GRAD1.res, случаем, не создаётся в папке, откуда запускается программа? Если это тест из под IDE - то в папке с vb6.exe ?

[Debugger]

Если он батник и вправду делает то, что описал автор, то это довольно странно. Или же автор публично вешает лапшу и не хочет сознаваться, что у него - экзешник. (с расширением батника).
Кстати,

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

ChDir App.Path

спешит помочь нам.

[KPEATOP]

Лапшу я никому не вешаю. Объясню еще раз, может неправильно объяснил. У меня есть 3 файла Grad1.bat , Grad1.exe и WWOD.dat
При запуске Grad1.bat данные считываются из WWOD.dat , обрабатываются и создается файл Grad.res
код батника: @GRAD1.exe >GRAD1.res
Эти три файла (Grad1.bat, Grad1.exe и WWOD.dat) я могу переносить хоть куда и при самостоятельном запуске (запускаю Grad1.bat вручную) проограмма работает всегда и везде, т.е. все считает и создает GRAD1.res в том числе и в папке C:\Program Files\NGDU\
Я сделал запуск Grad1.bat из своей программы (программа написана на VB5) без прописания пути C:\Program Files\NGDU\, просто shell ("Grad1.bat",1)
и запускал ее из среды VB5, т.е. Grad1.bat, Grad1.exe и WWOD.dat находились в папке с екзешником VB5.
Когда я делаю свой екзешник из VB5 (запуск такой же shell ("Grad1.bat",1)) и переношу его вместе с Grad1.bat, Grad1.exe и WWOD.dat в папку C:\Program Files\NGDU\ тоже все нормально работает.
Но когда запускаю свою программу из среды VB5, чтобы по шагам посмотреть ход моей программы (мне это надо), а файлы Grad1.bat, Grad1.exe и WWOD.dat находятся в папке C:\Program Files\NGDU\, я естественно прописываю путь к батнику C:\Program Files\NGDU\Grad1.bat
И вот тут то Grad1.bat не работает, не создается файл Grad1.res
Не понимаю в чем дело.

[Хакер]

И ты ради того, чтобы записать вывод exe-шника в файл используешь батник? Стыд тебе.

[KPEATOP]

Это не мой екзкшник. Я не могу его исправить. Как есть так есть

[KPEATOP]

и батник тоже не мой. Это чужая прога, чужие файлы Grad1.bat , Grad1.exe и WWOD.dat

[Хакер]

Ну батник то ты можешь исправить или вообще не использовать?

[KPEATOP]

Если запускать Grad1.exe , то не создается файл Grad1.res
Он создается только когда запускаешь батник

[Хакер]

Нда, тяжелый случай.

Ты понимаешь смысл содержания батника, в частности, что в батнике делает символ >?

[KPEATOP]

нет не понимаю, я батниками не занимался и что же мне сделать ?

[Хакер]

Учить фундаментальные вещи типа того, что такое @, >, | и прочее.

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

[Денис]

Короче говоря
shell ("Grad1.bat",1)
заменить на
shell ("@GRAD1.exe >GRAD1.res",1)

[Хакер]

Денис, ты добиваешься того, чтобы я тебя забанил? Есть какой-то предел бреда, который ты можешь породить и выпостить за ограниченный интервал времени?

[KPEATOP]

Мне же нужно запускать из дериктории C:\Program Files\NGDU\
Тогда так ?

shell ("@C:\Program Files\NGDU\GRAD1.exe >C:\Program Files\NGDU\GRAD1.res",1)

не получается так

[Хакер]

shell ("@C:\Program Files\NGDU\GRAD1.exe >C:\Program Files\NGDU\GRAD1.res",1)

Я кажется сказал, что Денис написал бредятину. Но ты, видимо, доверяешь ему больше и решил всё-таки проверить, да?

[KPEATOP]

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

[Хакер]

Чел, ты адекватный?

Мы кажется разобрались, что батник тебе не нужен. Тебе нужно запустить exe-шник и перенаправить его вывод в файл. Тебе это надо сделать. Правильным способом, а не тем неправильным, что предложил денис.

[Денис]

Я кажется сказал, что Денис написал бредятину.

Да, сказал! Но не объяснил, почему это именно бредятина. Потому что я так не считаю. Почему shell нельзя вызывать, передав в качестве параметра строку с параметрами (рекурсивно)?
Объясни, в чем я не прав?

Почему нельзя задать рабочую папку с помощью ChDir а потом вызвать Shell так как я предложил?

[KPEATOP]

Чел, ты адекватный?

Мы кажется разобрались, что батник тебе не нужен. Тебе нужно запустить exe-шник и перенаправить его вывод в файл. Тебе это надо сделать. Правильным способом, а не тем неправильным, что предложил денис.

Если без батника, то как мне перенаправить вывод екзешника в файл. Я это и пытаюсь узнать. Подскажите как это сделать.

[alibek]

Да, сказал! Но не объяснил, почему это именно бредятина.

А своей головы у тебя нет?
Перенаправление реализует cmd, а не Windows.

[alibek]

Подскажите как это сделать.

Поискать по форуму через CreateProcess.

[KPEATOP]

Поищу конечно! Мне CreateProcess ни о чем не говорит. Я думал, что здесь новичкам в VB тоже помогают.
Ладно поищу, спасибо!