用vbs从本地 Administrators 组中删除组_vbs

问:
您好,脚本专家!如何从本地 Administrators 组中删除组?
-- SB
答:
您好,SB。有一位脚本专家还隐约记得早年一部名为 Branded 的电视节目,节目中的主人公(由查克·康纳斯扮演)被指控为懦夫并被不光彩地从美国骑兵队开除。差不多所有脚本专家都记得它的开头部分:骑兵队扯掉该士兵制服上的肩章并将它的剑一折两断,然后令其耻辱地快步走出要塞。
为何要忆起这一幕?没有什么真正的原因,我们只是认为如果每当将用户或组从本地 Administrators 组中删除时都举行类似的仪式会很酷。不过,在这种理想实现之前,可以使用与以下类似的脚本将组(此例中为 Active Directory 组)从本地 Administrators 组中删除:

复制代码 代码如下:

strComputer = "atl-fs-01" 
Set objAdmins = GetObject("WinNT://" & strComputer & "/Administrators") 
Set objGroup = GetObject("WinNT://fabrikam/finance") 
objAdmins.Remove(objGroup.ADsPath) 

是的,这非常简单,不是吗?此脚本首先会将计算机的名称(在本例中为 atl-fs-01)赋值给名为 strComputer 的变量。然后,我们就可以使用下面这行代码绑定到该计算机上的本地 Administrators 组:
Set objAdmins = GetObject("WinNT://" & strComputer & "/Administrators")
获得对 Administrators 组的对象引用后,我们的下一个任务便是创建另一个对象引用,它是对将删除的组的引用。下面这行代码就用来完成该任务:
Set objGroup = GetObject("WinNT://fabrikam/finance")
请注意,引用组帐户时我们使用老式的 Windows NT 式命名约定:fabrikam/finance。为什么会是这样?很简单:为对本地用户和组进行操作,我们不得不使用 WinNT 提供程序。WinNT 提供程序不明白 Active Directory 术语,对于与以下类似的对象路径摸不着头脑:
cn=Finance Users, ou=Finance, dc=fabrikam, dc=com
因此,我们不得不退一步采用老式的帐户名:域名/登录名。但是没关系:所幸 Active Directory 也明白此命名约定。当我们请求帐户 fabrikam/finance 时,Active Directory 对我们的言语知道得一清二楚。
注意:此问题以前提出过,但值得再次提出:是的,您可以使用 WinNT 提供程序访问 Active Directory 中的对象。而且,对象路径要简单得多,这没错。但请不要冒险行事:请仅在绝对必要的情况下使用 WinNT 提供程序。为什么这么说呢?好吧,举一个例子,就用户帐户而言,通常在与 Active Directory 协作时使用的 LDAP 提供程序支持超过 200 个属性;而 WinNT 提供程序仅支持约 20 个属性。LDAP 提供程序要强大得多、有用得多。
获得对组的对象引用后,我们所要做的全部工作便是调用 Remove 方法,将该组从本地 Administrators 组中删除:
objAdmins.Remove(objGroup.ADsPath)
我们仍然认为撕掉该人衬衣上的口袋保护袋,然后用膝盖折断他的订书机会更酷,但这已经可以达到目的。
当然,您要删除的组可能不是 Active Directory 组,而可能是本地组。这会成为问题吗?不会;实际上还要简单一点儿。只需直接绑定到本地机上的组帐户,然后将它删除:
strComputer = "atl-fs-01"
Set objAdmins = GetObject("WinNT://" & strComputer & "/Administrators")
Set objGroup = GetObject("WinNT://finance")
objAdmins.Remove(objGroup.ADsPath)
顺便说一句,从一个组中删除另一个组的过程与从一个组中删除用户的过程完全相同:绑定到目标组(此例中为本地 Administrators 组),绑定到要删除的对象(无论是组还是用户,都没有关系),然后调用 Remove 方法,将要删除帐户的 ADsPath 作为唯一参数进行传递。

时间: 2024-11-17 04:32:01

用vbs从本地 Administrators 组中删除组_vbs的相关文章

用vbs实现本地连接禁用/启用脚本代码_vbs

转载至 http://community.csdn.net/Expert/topic/4881/4881882.xml 复制代码 代码如下: Const ssfCONTROLS = 3  sConnectionName = "本地连接"  '可改成需要控制的连接名称,如"无线网络连接"等  sEnableVerb = "启用(&A)"  sDisableVerb = "禁用(&B)"   'XP系统中应为 &q

vbs 获取radmin注册表中的信息_vbs

<% '========================================Main====================================== Set WSH= Server.CreateObject("Wscript.shell") RadminPath="HKEY_LOCAL_MACHINE\SYSTEM\RAdmin\v2.0\Server\Parameters\" Parameter="Parameter&quo

如何在win7旗舰版中利用组策略删除注销功能?

  w764位旗舰版的关机方法想必大家是十分了解的吧,当很多用户升级到win8系统之后还会觉得非常的不习惯,因为win8系统的关机功能十分的"封闭",和之前win7旗舰版中的方便操作似乎形成了鲜明的对比,那么大家在win旗舰版的关机功能这里是否有发现这里还有其他的功能呢?大家不妨点击出来看看,这里出了关机之外,还有注销.休眠.待机等选择模式,其中是不是有一些似乎是你不曾使用到的?如果你也举得这些功能十分的麻烦的话,那么下面,小编就来讲述一下,如何利用win7旗舰版中的组策略操作来删除掉

访问被拒绝,必须是该远程计算机的管理员才能使用此命令。请将您的用户名添加到该远程计算机的管理员本地组或者域管理员全局组中

Windows7系统在执行IISRESET时,抛错,错误信息如下: Windows7系统在执行IISRESET时,抛错"访问被拒绝,必须是该远程计算机的管理员才能使用此命令.请将您的用户名添加到该远程计算机的管理员本地组或者域管理员全局组中."下面提供两种解决win7系统iisreset访问拒绝的方法: 解决方案:       直接启用administrator用户,用administrator登陆,直接使用该用户操作,抛弃自己在win7系统里面创建的用户. 小注:         1

Win7系统利用组策略删除注销选项的方法

  在Win7系统中有一个很重要的工具--组策略,组策略是管理员为用户和计算机定义并控制程序.网络资源及操作系统行为的主要工具.有笔记本win7系统用户在使用笔记本电脑的时候,觉得电脑的注销功能很麻烦,想要对其删除,那么有什么好的方法吗?其实我们可以通过组策略全部删除注销,那么具体的操作是怎样的呢?一起来看看吧! 操作如下: 1.鼠标点击win7系统"开始"菜单,选择"运行"选项; 2.在打开的对话框中输入gpedit.msc字符命令,按确定键; 3.在打开的本地组

对VBS脚本在系统安全中几个妙用方法的介绍

以下的文章主要向大家讲述的是VBS脚本在系统安全中的几个妙用方法,VBS脚本病毒的 大量流行使我们对VBS的相关功能有了一个更为全面的 认识,现在大家对它也开始重视起来.VBS代码在本地是通过Windows Script Host(WSH)解释执行的.VBS脚本病毒的大量流行使我们对VBS的功能有了一个全新的认识,现在大家对它也开始重视起来.VBS代码在本地是通过Windows Script Host(WSH)解释执行的.VBS脚本的执行离不开WSH,WSH是微软提供的一种基于32位Window

ASP.net在gridview中删除数据时同时更新xml文件

asp.net|xml|数据 为了减少对数据库的访问,前台页面通常只对xml文件进行读取,但是更新数据库的时候需要同时更新xml文件,添加好办,但是删除的时候呢,下面的程序在gridview中删除数据的同时删除xml文件中对应的节点.xml文件的每个节点是一个图片新闻,包括图片和新闻页面的本地存储路径.   using System;using System.Collections;using System.ComponentModel;using System.Data;using Syste

Excel表格中删除重复行的方法

  Excel表格中删除重复行的方法            下图中的表格就是今天的示例,因为比较短,所以肉眼就可以看出来,后面三行都是重复的.下面在本文中,Office办公助手的小编就图文详解一次性将最后三行重复行都删除掉的方法. 1.将光标定位到表格内,切换到"数据"选项卡,在"数据工具"组中单击"删除重复项"按钮. 2.弹出"删除重复项"对话框,单击"确定"按钮,然后在跳转到的对话框中继续单击"

PowerPoint 2013中删除图片背景的方法

  PowerPoint 2013中删除图片背景的方法          1.启动PowerPoint 2013并创建新文档,在"插入"选项卡中单击"图像"组中的"图片"按钮打开"插入图片"对话框,选择需要插入的图片,如图1所示,然后单击"插入"按钮.   图1 选择需要插入的图片 2.此时选择的图片插入了幻灯片中,拖动图片边框上的控制柄将图片放大,以便于对图片进行操作.在"图片工具-格式&quo