[amel27]

может через предварительно настроенное задание планировщика запускать?..
поробно: Create Administrator Mode Shortcuts Without UAC Prompts in Windows 7 or Vista

[okshef]

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

Кстати, есть русскоязычный вариант статьи у нас: Упрощаем запуск приложений в Windows 7 от имени администратора без отключения UAC

[Vadikan]

deepred, нужен просто запрос на повышение прав. Никаких имен пользователя и паролей в скрипте быть не должно.

[okshef]

deepred, спасибо, но...
Может я неполно оговорил условия. Скрипт запускается из реестра по команде

Код:

wscript.exe manage-bde.vbs -lock -forcedismount %1

Файл manage-bde.vbs находится в Windows\Sysytem32
В настоящий момент вот такая ошибка

Ярлык никакой не нужен, вернее, может его временно в профиль пользователя помещать?

Заменил

Код:

strDstPath      =  "Путь к manage-bde.exe"

на

Код:

strDstPath      =  "%windir%\system32"

[deepred]

okshef,

ёлки-палки..., ты просто партизан!

По поводу "%windir%\system32", как насчет ExpandEnvironmentString? Но это так, лирика...

Про реестр надо было сказать сразу, если у тебя эта софтина прописана в реестре (кстати, в каком
разделе - не Run kb и в каком корне?) и судя по твоему скрину содержится в Path то, "%windir%\system32"
вообще не нужен (тем более, что "спецальные папки" надо изначально "развернуть").
А ярлык заменится автоматически при новом запуске скрипта, хотя добавь три строчки и его можно
удалять по окончанию сеанса WSH

[okshef]

HKEY_CLASSES_ROOT\drive\shell....

как насчет ExpandEnvironmentString? »

А вот таких вопросов задавать не нужно...

ёлки-палки..., ты просто партизан! »

а запуск осуществляется из реестра с дополнительными ключами. »

так что я говорил

[okshef]

deepred, может будет понятнее, если я дам ссылку на тему, для чего это все: http://social.technet.microsoft.com/...3-67fe8657bc0f
пост Les Ferch
При отключенном UAC работает превосходно. Нужно, не пользуясь дополнительными программами, запустить скрипт с запросом на повышение прав.

[deepred]

okshef,

В общем понятно, т.е. у тебя выскочил bug с учетками?

Ладно, тема знакомая, все, что было написано мною ранее остается в силе, но есть одно уточнее... При включенном UAC у тебя что происходит - вообще

ничего или выходит запрет? Тебе надо просто отладить этот скрипт, косяк там кроется в том, что при активном UAC запуск manage-bde может

производиться только от имени учетной записи локального администратора (по идее должен существовать какой-нибудь манифест, в котором

это прописано).

Попробуй просто исключить путь к файлу, если у тебя автоматом он вносится в wshshortcut. Bitlocker штука скользкая, по той ссылке которую ты скинул

есть пост, он в самом конце - я бы его попробовал применить, хотя рассматриваемый вариант должен работать...

[okshef]

deepred, у меня при включенном UAC не происходит ничего (при исходном скрипте), т.е. скрипт просто не запускается. Есть вариант использовать программу Elevate - но это не красиво: окно командной строки, и пр. и пр.

Как мне казалось поначалу в

Этом

Method 1 This re-launches the current VBScript as administrator (elevated) if the script has no command-line arguments passed. When re-launching the script as administrator, simply pass a bogus argument so that the script does not run in a cyclic loop. Код: If WScript.Arguments.length =0 Then Set objShell = CreateObject("Shell.Application") 'Pass a bogus argument with leading blank space, say [ uac] objShell.ShellExecute "wscript.exe", Chr(34) & _ WScript.ScriptFullName & Chr(34) & " uac", "", "runas", 1 Else 'Add your code here End If Method 2 This method uses a stub or wrapper script which runs the main VBScript elevated using the runas verb. Код: Set objShell = CreateObject("Shell.Application") Set FSO = CreateObject("Scripting.FileSystemObject") strPath = FSO.GetParentFolderName (WScript.ScriptFullName) If FSO.FileExists(strPath & "\MAIN.VBS") Then objShell.ShellExecute "wscript.exe", _ Chr(34) & strPath & "\MAIN.VBS" & Chr(34), "", "runas", 1 Else MsgBox "Script file MAIN.VBS not found" End If

есть рациональное звено, но как связать - не знаю, ибо, полный ноль.