Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для BigBoo

Старожил


Автор проектов


Сообщения: 474
Благодарности: 120

Профиль | Отправить PM | Цитировать


Помогите люди добрые, битый час бьюсь. Сколько только кавычек не ставил - результат нулевой! Как сделать, чтоб это заработало:
Код: Выделить весь код
Set Create = CreateObject("Scripting.FileSystemObject")  
Set Folder = Create.GetFolder(WshShell.CurrentDirectory)  
Str = Folder.Path &"\Папка\Прога.exe"  
WSHShell.Run Str

Последний раз редактировалось BigBoo, 30-01-2011 в 23:36.


Отправлено: 23:28, 30-01-2011 | #8