Цитата SharkyEXE:
Лично я от Вас первый раз в этой теме вижу этот код, »
|
Я имел в виду этот:
Цитата Petya V4sechkin:
есть стандартный Prnmngr.vbs (в XP/2003 - в папке \WINDOWS\system32, в последующих ОС - в папке \Windows\System32\Printing_Admin_Scripts\локаль). »
|
код.
Цитата SharkyEXE:
можно или нет внутрь файла 1.vbs чего-то написать, чтобы файл 1.vbs запускался с парвами администратора? »
|
Нет. Внутрь скрипта ничего нельзя написать, чтобы он
сам запускался с административными привилегиями. Вы можете запускать с административными привилегиями хост, исполняемый файл cscript.exe/wscript.exe, параметром которого будет скрипт.
Мне-то и незаметно было: я работаю из-под Far Manager'а, который запускаю с административными привилегиями, посему и все дочерние процессы, запущенные из-под него, также наследуют эти привилегии.
Попробуйте ещё такой код:
Код:
Option Explicit
Const wbemImpersonationLevelImpersonate = 3
Const wbemPrivilegeLoadDriver = 9
With WScript.CreateObject("WbemScripting.SWbemLocator").ConnectServer(".", "root\cimv2")
With .Security_
.ImpersonationLevel = wbemImpersonationLevelImpersonate
.Privileges.Add wbemPrivilegeLoadDriver
End With
On Error Resume Next
.Get("Win32_Printer.DeviceID='Epson Stylus C20 Series (M)'").Delete_
On Error Goto 0
End With
WScript.Quit 0
Если и он не будет удалять с обычными,
не повышенными, привилегиями — то не знаю, у меня отрабатывает.