[RESOLVED] Функция Shell и ошибка FileNotFound

[NeverGone]

Нужно запустить файл exe. Находится он в папке "\Program Files\App\" (это показывает любой файл-менеджер) и называется App.exe. Но когда я пишу:

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

Shell("\Program Files\App\App.exe")

вылетает ошибка FileNotFound.
Пробовал еще так:

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

Shell("..\Program Files\App\App.exe")

(из папки "\My Documents");
так:

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

OpenFileDialog1.ShowDialog()
MsgBox(OpenFileDialog1.FileName)
Shell(OpenFileDialog1.FileName)

(MsgBox выдает полный путь) - та же ошибка. Файл, разумеется, на месте. Что я не так делаю?

[NeverGone]

Неужели никто не знает?
Хоть идею какую подайте...

[ANDLL]

Неужели никто не знает?
Хоть идею какую подайте...

Дык имя диска приписать слева

[NeverGone]

Неужели никто не знает?
Хоть идею какую подайте...

Дык имя диска приписать слева

Дык, а какое имя корневой папки в КПК? Писал C:\, A:\ - не проканывает...
У кого еще какие идеи будут?

[NeverGone]

Так, всем спасибо, проблема решена...

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

Public Declare Function CreateProcess Lib "coredll" Alias "CreateProcessW" (ByVal lpApplicationName As String, ByVal lpCommandLine As String, ByVal lpProcessAttributes As Long, ByVal lpThreadAttribute As Long, ByVal bInheritHandles As Long, ByVal dwCreationFlags As Long, ByVal lpEnvironment As Long, ByVal lpCurrentDirectory As Long, ByVal lpStatupInfo As Long, ByVal lpProcessInformation As Long) As Boolean

Private Sub cmdRun_Click()
CreateProcess("\program files\app\app.exe", "", 0, 0, 0, 0, 0, 0, 0, 0)
End Sub

EDIT:

Если в теме нет нарушений правил, то она, как правило, не закрывается.

А, вот как у вас здесь... Ладно, тогда не закрывайте

[Viper]

Если в теме нет нарушений правил, то она, как правило, не закрывается.

[NeverGone]

А вот еще один вариант, гораздо проще:

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

Process.Start("\program files\app\app.exe", "")

Всё-таки дотнет неадекватен