使用脚本将域账号添加到客户机的本地管理员组代码,VBS代码库,德仔网

代码语言

代码分类

【VBS】使用脚本将域账号添加到客户机的本地管理员组

作者: / 发布于2016/5/27/ 940

'Script Start  
On Error Resume Next  
strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")    
Set colComputers = objWMIService.ExecQuery("Select * from Win32_ComputerSystem")    
For Each objComputer in colComputers  
 strPCname = UCase(objComputer.Name)  
Next  
Set objGroup = GetObject("WinNT://" & strPCname & "/Administrators,group")  
Set objUser = GetObject("WinNT://yangye/ITAdmin")   
 'yangye表示域的NetBIOS名，Itadmin为域账号  
objGroup.Add(objUser.ADSPath)  
'Script End

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

试试其它关键字

同语言下

.使用脚本将域账号添加到客户机的本地管理员组
.删除服务器上文件
.主动ping服务器是否宕机
.自动服务器检查的vbs脚本
.VBS脚本发送邮件，密送多人，带附件，可更换账号密码
.根据文件路径复制文件
.VBA操作数据库
.双击获取公网IP到剪贴板
.定时运行ie浏览执行网址不显示浏览器窗口
.批处理生成日历

可能有用的

.使用脚本将域账号添加到客户机的本地管理员组
.删除服务器上文件
.主动ping服务器是否宕机
.自动服务器检查的vbs脚本
.VBS脚本发送邮件，密送多人，带附件，可更换账号密码
.根据文件路径复制文件
.VBA操作数据库
.双击获取公网IP到剪贴板
.定时运行ie浏览执行网址不显示浏览器窗口
.批处理生成日历

贡献的其它代码Label