利用GetObject("WinMgmts:")获取系统信息

用WMI对象列出系统所有进程:

----Instance.vbs----

程序代码

Dim WMI,objs

Set WMI = GetObject("WinMgmts:")

Set objs = WMI.InstancesOf("Win32_Process")

For Each obj In objs

在企业用户中，一大部分用户都加入了域，用于公司的安全管理。加入域对于管理比较方便。但是新增的设备或者用户如何快速的加入已知的域呢？很简单，看代码：

set objShell=wscript.createObject("wscript.shell")

strComputer = "."

Dim WshNetwork

Dim strComputer

Set WshNetwork = WScript.CreateObject("WScript.Network")

Windows借助脚本实现自动化加域 说到自动加域，我们作为一个运维管理员来说，是必须要掌握了的 ，通过脚本提高管理员的工作效率，一般可以将自动加域脚本(前提是需要将脚本加密，内部有明文账户及密码)通过共享的方式然后用户手动执行，前一段时间领导也有这个需求，所以就总了一些，分享给有需要的。 一般分为两步，首先是计算更改计算机名，其次就是加域了；最后是需要将用户增加到管理员组中，保证用户有足够的权限进行操作。 首先是修改计算机名：执行会提示当前的计算机名，然后输入新的计算机名，单击确认即可；

https://forsenergy.com/zh-cn/gpmc/html/187307c1-94b3-422b-bb7e-e14a8aa03bd3.htm#

背景

我们都知道规模稍微大一点的企业公司为了便于计算机的管理，

可能都上了微软的域控制器，那么肯定就会存在这么一个问题，

不断的会有计算机加入或者是退出域控制器，

而这个过程实在是太繁琐了，需要不断的重复以下操作

1、右键点击“此电脑”，选择属性

2、在出现的界面中，“计算机名、域和工作组设置”中点击“更改设置”

https://download.csdn.net/download/leaf541568990/85218701

初学AARDIO，写个日常使用的小工具练手，名字暂时就叫DomainHelper吧。

　加域工具是一款功能强大的系统一键加域和退域软件，可以轻松帮助用户修改电脑计算机名，生成不同的计算机名前缀。且加域工具还支持设置域名，操作方便，简化了用户的日常工作，有效提高用户的工作效率。

加域助手

https://blog.kikiw.cn/index.php/archives/24/