Запуск прог

[neic]

Создал я одну тему не давно, не нашёл на форуме, ну да и всё равно не получил нормального ответа!

Теперь проблема заключаеться в том, что запуск файла в проекте(ну когда проект ещё не скомпилирован) осуществляеться, а когда выполняеться запуск файла с скомпелированого проекта, то запуск не удаёться.

Корче:
В проекте (не скомпелированом) эти строки(см. ниже) выполняються

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

Shell App.Path & "\" & List1.Text & "\Setup.exe", vbHide

А в скомпелированом проекте (*.exe) эти строки невыполняються!

[gaidar]

Вы сделайте проще, замените:

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

Shell App.Path & "\" & List1.Text & "\Setup.exe", vbHide

на:

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

MsgBox App.Path & "\" & List1.Text & "\Setup.exe"

И посмотрите. Думаю все станет ясно.

[neic]

Уважаемый gaidar! А что должно стать ясно? Ну вы велось у меня сообщение с путём запускаемого файла, ну и что? Путь загружаемого файла равен с путём который я хочу загрузить!

[ALX_2002]

2 neic: Может проблема в неправильном указании пути. В случае запуска из проекта путь один, а в скомпиленном виде другой ?



Звучит абсурдно, но других вариантов, кроме этого быть не могёт. Только, если МИСТИКАА

[neic]

Я указал детальный путь к файлу от и до!
Значит мистика

[ALX_2002]

2 neic: И что, даже при этом прога не стартует ??? И в процессах не висит ??? Пришли код и EXE вместе плиз, если сможешь. Хочу взглянуть данный феномен

[neic]

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

Народ либо я чё-то глючу, либо Бейсик заразился скалерозом!

ALX_2002
Увы не могу ничего прислать хочу прогу сделать комерческой!

[neic]

ALX_2002

Да просто создай новый проект и напиши

Private Sub Form_Load()
Shell "Здесь путь до лбого файла"
End Sub

[Sedge]

Корче:
В проекте (не скомпелированом) эти строки(см. ниже) выполняються

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

Shell App.Path & "" & List1.Text & "\Setup.exe", vbHide

А в скомпелированом проекте (*.exe) эти строки невыполняються!

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

Shell Replace(App.Path & "" & List1.Text & "\Setup.exe", Chr(34), ""), vbHide


[RayShade]

*шепотом* А может, просто задекларировать ShellExecute, a? А то ведь и впрямь в скомпилированном коде Shell не того...

[Mikle]

Может не работать из ROOT, так как там App.Path оканчивается на "\". Других причин не вижу.
RayShade
Как это не того? Сколько раз пользовался.

[Sedge]

Кстати да, а с какой ошибкой прога не изволит запускаться?

[RayShade]

Ну не всегда того. У меня почему то Shell в некоторых проектах в натуре не работал. Ну я и пользовался Shellexecute.

[neic]

Sedge
Прога просто ничего не говоирт (типа делает вид что запускает!)

[neic]

Sedge
Не работает!

*шепотом* А может, просто задекларировать ShellExecute, a? А то ведь и впрямь в скомпилированном коде Shell не того...

А как? а то я в этом не секу!

[RayShade]

Да по форуму поищи просто слово ShellExecute. Найдешь примеров штук 20.

[Sebas]

ДА.... КРИВЫЕ РУКИ ИЛИ ПРГОСТО ЕХЕ ПО ВЫВАЛИВАЕТСЯ РАНЬШЕ ЧЕМ ОН ЕГО ВИДИТ)))

[extHack]

А ты сначала команду в переменную string положи. А потом
shell [имя переменной], vbHide

[tyomitch]

А ты сначала команду в переменную string положи. А потом
shell [имя переменной], vbHide

Ещё объясни, какая разница между этим и shell "команда", vbHide

[neic]

extHack
Хм... как я знаю стринг имеет определённую размерность, а вдруг путь будет
For i = 1 to 100000000
Путь = Путь & "*"
Next

!!!!

[neic]

Вот выкладываю прогу, может у вас пойдёт?

Суть проги сделать программу-оболочку для программ (ну типа Алекс сфот и другие фирмы)
--------------------------------------
П.С. Всё решено скоро прога будет в нете!

[SHURUP]

Ну и что с ЕХЕ-хой делать? Максимум, что можно узнать - название, размер файла, и то, что "организация" в системе афтара - "НОМЕ".
----
Лучше бы источник выложил. Хотя если АВТОРАН для CD делаешь, то 99%, что ошибка в использовании App.Path & "\" & List1.Text & "\Setup.exe" (Mikle уже об этом написал, но его слова проигнорировали)
зы: 2 года назад мой земляк с этим мучался: http://bbs.vbstreets.ru/viewtopic.php?t=91

[neic]

Ну что запускаешь, нажмиаешь Добавить...>Вводишь все данные о проге и нажимаешь добавить файл(любой exeшный) и нажимаешь добавить прогу в список. Закрываешь все окна кроме первого> нажимаешь на названии проги и нажимаешь установить.

При первом разе всё запуститься, а вот если прогу перезагрузить, то уже ничего не установиться!

[SHURUP]

При первом разе всё запуститься, а вот если прогу перезагрузить, то уже ничего не установиться!

Ничего не запустилось, даже При первом разе при клике на " добавить в список". (ошибка 53)

[Cryonyx]

Ты часом не пробуешь запускать свою прогу из корня диска?
Если так, то App.Path будет оканчиваться на "\", а ВБ - не Ослик, чтобы двойной слеш читать без ошибок.

[tyomitch]

extHack
Хм... как я знаю стринг имеет определённую размерность, а вдруг путь будет
For i = 1 to 100000000
Путь = Путь & "*"
Next

Ограничение на String - 2Гб. Таких длинных путей всё равно не бывает.

[neic]

Всё УРА!!! Проблема решена с не совместительством некоторых иностоляторов!

[SHURUP]

А!! Типа должна прога запускаться из активной директории… Но тогда ShellExecute должно было бы помочь...

[Sedge]

Жуткий топик. Гадание на кофейной гуще какое-то...