Enjoy IT (ITECN.NET)

很多的企业都有这样的要求：希望整理自己的computers容器中的计算机，根据计算机名将其添加到对应的OU中去，但如果由人力来实现的话，工作量非常大，所以，在这次给某个企业实施项目的时候，我随手写了一个脚本，该脚本会自动将计算机加入到对应的OU中去。用户可以自己改写一下脚本，以适应自己的情况，我的脚本里对计算机名截取了2个字符。 dim strADsPathdim sResultTextConst ADS_SCOPE_SUBTREE = 2Set con = CreateObject(''ADODB.Connection'')Set com = CreateObject(''ADODB.Command'')'Open the connection with the ADSI-OLEDB ...

前面一个博克帖子是简单的一个枚举操作，其缺点就是前面的说的。 修改后的脚本目的：   1。域名不再采用绝对域名，而采用自动感知   2。输出到一个文本文件，使得大量计算机和用户的输出不受限制现在的脚本具有了更高的通用性。 呵呵！梦龙！你当我不知道你是谁啊？锵锵锵...我手持钢鞭将你打  枚举用户并输出到文件 dim iSet con = CreateObject(''ADODB.Connection'')Set com = CreateObject(''ADODB.Command'')'Open the connection with the ADSI-OLEDB provider namecon.Provider = ...

这两个脚本是应Austin的要求匆忙中写就的，要求非常简单： 枚举出域内所有的用户和计算机帐号，并且统计数量。 首先是枚举域内用户帐号： dim iSet con = CreateObject(''ADODB.Connection'')Set com = CreateObject(''ADODB.Command'')'Open the connection with the ADSI-OLEDB provider namecon.Provider = ''ADsDSOObject''con.Open Com.ActiveConnection = con Com.CommandText = ''<LDAP://DC=qiqinghua,DC=com>;'' & ...

前言  呵呵！ 这篇是我刚刚完成教案的翻版，为什么要写这篇东西呢？是因为当初参加ESS培训的时候，发现更深入的应用SMS，需要WMI的知识，然后想看看WMI，却发现要深入理解WMI，又事先要有点WSH脚本的经验，于是就转而看WSH，花了春节及以后的几天，写出了教案。于是，找盆盆的地盘，将东西贴出来，起名叫《跟我从头学WSH》，因为我就是从头开始学的。肯定要被各位大侠笑话了，大家就全当鼓励我吧。 现在，我正全力转向写WMI的教案，完成后，将全篇贴出。 第一章  介绍WSH 一，介绍WSH （1）首先， WSH不是一个文件，它是一个运行脚本的集合 Script file 能够运行在WSH环境中，WSH支持所有的32位操作系统 ...