脚本管理之打印安装

安装一台打印机
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.AddWindowsPrinterConnection "//PrintServer1/Xerox300"
WshNetwork.SetDefaultPrinter "//PrintServer1/Xerox300"

移除某台打印机
使用RemovePrinterConnection 
移除所有打印机


strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!//" & strComputer & "/root/cimv2")
Set colInstalledPrinters =  objWMIService.ExecQuery _
    ("Select * from Win32_Printer")
For Each objPrinter in colInstalledPrinters
    objPrinter.Delete_
Next



修改本地管理员密码
1、新建一个修改本地管理员的VBS脚本。内容如下：
 strComputer = "."
 Set objUser = GetObject("WinNT://" & strComputer & "/Administrator,user")
 objUser.SetPassword "123456"
 objUser.SetInfo
取名为CHSPW.VBS
2、加密改脚本
 用SCRENC工具加密VBS脚本。命令如下： SCRENC.exe CHSPW.VBS CHSPW.VBE
3、Copy加密后的脚本到Server/Netlogon下
4、用TQCrunas创建一个加密的Runas命令脚本
 >TQCrunas  -build c:/runas.tqc -profile -dd -user admin -pw password -e "//server/netlogon/chspw.vbe"
5、把C：/runas.tqc 复制到Server/Netlogon下
6、新建一个login.Bat文件当作登录脚本
 TQCRunas /f runas.tqc
7、将login.bat文件分发到用户Profile里作为用户的登录脚本，当用户登录Domain时，将自动把本地Administrator的密码修改为您在CHSPW.vbs中设置的密码