HQY 一个和谐有爱的空间

谢谢你的文章，看来这个迅雷对NAS下载的提升很大啊。我想试试，弄了半天还要邀请码...

「NAS」群晖迅雷内测版真香（解决3个任务限制，附邀请码）▼ 这次的内测版本，关闭迅雷后，不会有上传之类的后门行为，用下来下载速度真的香（非会员，速度轻松上100MB/s，没有限速），推荐给大家迅雷群晖内测版本安装▼ 安装比较简单，这次是以群晖套件安装的，注...

还有 49 人发表了评论加入28681人围观

感觉本网站还不错的，请主动关闭浏览器的广告屏蔽功能再访问本站，谢谢支持。

分享GitHub上一些m3u直播源集合大人学习资源：YanG-1989

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

hqy 发表于2023-09-05 浏览774 评论0

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

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

----Instance.vbs----

程序代码

Dim WMI,objs

Set WMI = GetObject("WinMgmts:")

Set objs = WMI.InstancesOf("Win32_Process")

For Each obj In objs

使用vb脚本让电脑自动加入域源码

hqy 发表于2023-09-04 浏览774 评论0

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

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

strComputer = "."

Dim WshNetwork

Dim strComputer

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

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