Войти

Показать полную графическую версию : [решено] vbs скрипт с запросом на выполнения приложения


angel_lyucifer
24-01-2014, 23:22
Привет всем, мне нужен скрипт vbs окно с запросом на выполнения приложения (Желательно от имени Администратора)!
При запуске скрипта будет запрос типа (Вы хотите запустить приложение?) если нажать на кнопку (Да я хочу!) то тогда файл 1.exe запускается а если нажать на кнопку (Нет я не хочу!) тогда скрипт просто закрывается. Файл 1.exe будет размещён рядом с скриптом в одной папке.
Помогите пожалуйста.

icq99999999
24-01-2014, 23:46
наверное так->
set fs = CreateObject("Scripting.FileSystemObject")
Dim Msg, Style, Title, Response, MyString

Msg = "Вы хотите запустить приложение?"
Style = vbYesNo + vbQuestion + vbDefaultButton2
Title = "e-Rus.l"
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then
MyString = "Да"
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "start.bat", 0, false
Else
MyString = "Нет"
End If

angel_lyucifer
25-01-2014, 19:38
Большое спасибо!




© OSzone.net 2001-2012