Запустить бат файл средствами VB6 - VB

  1. Подскажите как правильно запустит бат файл? так не получается. хотелось бы не указывать весь путь так как этот файл может быть и запущен с другого пк.


textual

Код к задаче: «Запустить бат файл средствами VB6 - VB»

Private Declare Function ShellExecute Lib "shell32" _
Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
 
Private Const SW_SHOWNORMAL = 1
 
Private Sub Command1_Click()
 ShellExecute 0, vbNullString, _
 App.Path & "\arhiv\arhiv.bat", vbNullString, _
  vbNullString, SW_SHOWNORMAL
End Sub

СДЕЛАЙТЕ РЕПОСТ

12   голосов, оценка 3.833 из 5



Похожие ответы
  1. Мне нужно запустить программу и дождаться её завершение, после продолжить работу Вот что я нашел, для реализации этого.

  1. Доброго всем времени суток!Мои знания VB6 практически нулевые,разбираюсь по самоучителю,консультироваться не с кем,надеюсь только на вашу помощь.Вот фрагмент кода

  1. Добрый день.Такая проблема.....Нужно сделать такую вещь. При движении слайдера вверх или вниз должен срабатывать таймер,но останавливаться при остановке движения слайдера.

  1. Доброго времени суток! Поясните, плз, почему не срабатывает центровка контроллов по ширине формы? На форме два PictureBox (один в другом) (не смейтесь над ремарками - пользуюсь редко - забывается ))

  1. Добрый вечер ! Подскажите, пожалуйста, данный код запускает калькулятор Windows. Внешний его вид выглядит как-то ущербно. Какие нужно задать атрибуты при запуске, чтобы он выглядел как другие стандартные приложения windows 7. Еще вопрос: lastDllError возвращает ERROR_NO_MORE_FILES (18). Это нормальный код возврата для CreateProcess ? Т.е., как я понимаю, обычно происходит поиск файла по путям PATH, и если находит, то выдается такая ошибка?

  1. Здравствуйте, уважаемые специалисты. Есть код программы:

  1. День добрый. Кто может подсказать код на VB для запуска по сети приложений? К примеру, имеются три тачки в сети: SERVER (на нем приложение на VB для запуска), USER1 и USER2. Как выглядит код для запуска блокнота на этих двух машинах? Заранее благодарен.

  1. Ребята подскажите что можно сделать? в этом коде не срабатывает код (подчеркнул) только если закоментароваь код один изних работает.