计算机管理示例脚本
删除软件
在线激活 Windows
配置系统启动延时
关闭本地计算机
更改计算机帐号属性
离线激活 Windows
计算机管理示例脚本
删除软件
描述
卸载使用 Windows Installer 安装的假定软件程序。
脚本代码
\`\`\`vb
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery _
("Select * from Win32_Product Where Name = 'Personnel database'")
For Each objSoftware in colSoftware
objSoftware.Uninstall()
Next
\`\`\`
在线激活 Windows
描述
使用在线方法来激活 Windows。需要 Windows XP 或 Windows Server 2003、以及活动的 Internet 连接。
脚本代码
\`\`\`vb
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & _
"{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colWindowsProducts = objWMIService.ExecQuery _
("SELECT * FROM Win32_WindowsProductActivation")
For Each objWindowsProduct In colWindowsProducts
objWindowsProduct.ActivateOnline()
Next
\`\`\`
配置系统启动延时
描述
将计算机配置为在启动时自动加载默认操作系统之前等待 10 秒钟(而不是默认的 30 秒钟)。
脚本代码
\`\`\`vb
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & _
"{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colStartupCommands = objWMIService.ExecQuery _
("SELECT * FROM Win32_ComputerSystem")
For Each objStartupCommand In colStartupCommands
objStartupCommand.SystemStartupDelay = 10
objStartupCommand.Put_
Next
\`\`\`
关闭本地计算机
描述
关闭本地计算机。
脚本代码
\`\`\`vb
Set colOperatingSystems = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
ObjOperatingSystem.Win32Shutdown(1)
Next
\`\`\`
更改计算机帐号属性
描述
演示如何通过脚本来更改 Active Directory 中的计算机帐号的位置属性。
脚本代码
\`\`\`vb
Set objComputer = GetObject _
("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=com")
objComputer.Put "location", "Building 37, Floor 2, Room 2133"
objComputer.SetInfo
\`\`\`
离线激活 Windows
描述
使用离线方法来激活 Windows。需要 Windows XP 或 Windows Server 2003、以及一个有效的激活编号。
想得到的如下的内容:
# 计算机管理示例脚本
## 删除软件
##### 描述
卸载使用 Windows Installer 安装的假定软件程序。
##### 脚本代码
\`\`\`vb
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery _
("Select * from Win32_Product Where Name = 'Personnel database'")
For Each objSoftware in colSoftware
objSoftware.Uninstall()
Next
\`\`\`
## 在线激活 Windows
##### 描述
使用在线方法来激活 Windows。需要 Windows XP 或 Windows Server 2003、以及活动的 Internet 连接。
##### 脚本代码
\`\`\`vb
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & _
"{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colWindowsProducts = objWMIService.ExecQuery _
("SELECT * FROM Win32_WindowsProductActivation")
For Each objWindowsProduct In colWindowsProducts
objWindowsProduct.ActivateOnline()
Next
\`\`\`
## 配置系统启动延时
##### 描述
将计算机配置为在启动时自动加载默认操作系统之前等待 10 秒钟(而不是默认的 30 秒钟)。
##### 脚本代码
\`\`\`vb
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & _
"{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colStartupCommands = objWMIService.ExecQuery _
("SELECT * FROM Win32_ComputerSystem")
For Each objStartupCommand In colStartupCommands
objStartupCommand.SystemStartupDelay = 10
objStartupCommand.Put_
Next
\`\`\`
## 关闭本地计算机
##### 描述
关闭本地计算机。
##### 脚本代码
\`\`\`vb
Set colOperatingSystems = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
ObjOperatingSystem.Win32Shutdown(1)
Next
\`\`\`
## 更改计算机帐号属性
##### 描述
演示如何通过脚本来更改 Active Directory 中的计算机帐号的位置属性。
##### 脚本代码
\`\`\`vb
Set objComputer = GetObject _
("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=com")
objComputer.Put "location", "Building 37, Floor 2, Room 2133"
objComputer.SetInfo
\`\`\`
## 离线激活 Windows
##### 描述
使用离线方法来激活 Windows。需要 Windows XP 或 Windows Server 2003、以及一个有效的激活编号。
Vim 命令:
let arr=getline(1, 146) | for i in arr | call cursor(147,0) | call cursor(search(i),0) | s/^/# / | endear
命令 | 描述 |
---|---|
geltine(1,146) | 将1-146读取到list |
call cursor(search(i),0) | 跳转到list包含的项目中 |
for i in array....endfor | 循环 |
# 计算机管理示例脚本
# 删除软件
# 在线激活 Windows
# 配置系统启动延时
# 关闭本地计算机
# 更改计算机帐号属性
# 离线激活 Windows
# 配置 WMI 设置
# 获取操作系统属性
# 复制Active Directory计算机帐号
# 执行计算机对象的跨域迁移
# 执行系统还原
# 创建系统还原点
# TechNet 脚本中心: 创建映像副本
# 创建映像副本存储区
# 启用终端服务密码提示
# 创建映像副本
# # 确定计算机上的本机时间
# 确定计算机上的 UTC 时间
# 获取上次系统恢复的结果
# 安装卷
# 使用 WMI 枚举环境变量
# 查看全部现有的还原点
# 查看系统还原配置值
# 配置默认的 WMI 命名空间
# 创建计算机帐号
# 为用户创建计算机帐号
# 删除计算机帐号
# 确定与格林尼治标准时间(Greenwich Mean Time)的时区偏移量
# 禁用 Global Catalog Server
# 禁用完全系统还原
# 启用 Global Catalog Server
# 启用完全系统还原
# 枚举计算机上的所有卷影副本存储区域
# 枚举允许的视频控制器分辨率
# 枚举典型的 COM 类设置
# 枚举组件类
# 枚举计算机帐号属性
# 在 Active Directory 中枚举计算机帐号
# 枚举计算机启动命令
# 枚举计算机启动选项
# 枚举 DCOM 应用程序设置
# 枚举设备内存地址
# 枚举 DMA 信道信息
# 枚举已安装的热修复程序
# 枚举已安装或已宣告的组件和应用程序
# 枚举已安装软件
# 枚举已安装软件的特性
# 枚举 Internet Explorer LAN 设置
# 枚举 Internet Explorer 安全区域设置
# 枚举 Internet Explorer 摘要设置
# 枚举 IRQ 设置
# 枚举内存设备
# 枚举主板设备
# 枚举即插即用签署的驱动程序
# 枚举程序组
# 枚举恢复配置选项
# 枚举策略设置的结果集
# 枚举策略管理模板文件的结果集
# 枚举策略审核策略的结果集
# 枚举策略 GPO 的结果集
# 枚举策略组策略扩展状态的结果集
# 枚举策略组策略链接的结果集
# 枚举策略管理的作用域的结果集
# 枚举策略安全性事件日志设置的结果集 (Boolean)
# 枚举策略安全性事件日志设置的结果集 (Numeric)
# 枚举策略安全性设置的结果集 (Boolean)
# 枚举策略安全性设置的结果集 (Numeric)
# 枚举策略系统服务的结果集
# 枚举策略用户特权权限的结果集
# 枚举 RSOP 应用程序管理策略设置
# 枚举 RSOP 会话
# 枚举卷影副本提供程序
# 枚举 WMI 设置
# 枚举所有的域控制器
# 枚举计算机主板属性
# 枚举计算机总线属性
# 枚举桌面监视器属性
# 枚举桌面设置
# 枚举键盘属性
# 枚举并行端口属性
# 枚举物理内存属性
# 枚举即插即用设备
# 枚举定点设备属性
# 枚举端口连接器属性
# 枚举处理器信息
# 枚举 ProgID
# 枚举注册表属性
# 枚举串行端口配置信息
# 枚举串行端口属性
# 枚举声卡属性
# 枚举开始菜单项
# 枚举开始菜单程序组
# 枚举系统插槽属性
# 枚举计算机的启动配置属性
# 枚举物理内存配置
# 枚举视频控制器属性
# 识别全局编录服务器
# 识别计算机机箱类型
# 识别计算机角色
# 识别使用服务的计算机角色
# 识别 FSMO 角色
# 识别最新安装的服务包
# 识别操作系统
# 识别 Windows 产品激活状态
# 识别处理器类型
# 识别域控制器
# 在远程计算机上安装软件
# 在本地计算机上安装软件
# 库存计算机硬件
# 将计算机加入域
# 修改恢复配置选项
# 移动计算机帐户
# 删除软件
# 重命名计算机帐户
# 重命名计算机和计算机帐户
# 重新设置计算机帐户密码
# 检索电池信息
# 检索缓存内存信息
# 检索计算机风扇信息
# 检索当前显示配置
# 检索有关应用程序所用的二进制文件的信息
# 检索 Internet Explorer 缓存设置
# 检索 Internet Explorer COM 对象设置
# 检索 Internet Explorer 连接设置
# 检索 Internet Explorer 文件版本信息
# 检索内存阵列信息
# 检索调制解调器信息
# 检索主板设备信息
# 检索 PCMCIA 控制器信息
# 检索端口资源信息
# 检索便携式电池信息
# 检索卷影副本设置
# 检索 SMBIOS 信息
# 检索系统信息
# 检索显示控制器配置
# 检索 Internet Explorer 连接摘要
# 检索默认的 WMI 命名空间
# 返回 Active Directory 系统信息
# 搜索计算机帐户
# 设置系统恢复配置值
# 关闭本地计算机
# 取消 Windows Activation 通知
# 升级软件
# 使用 WMI 枚举计算机中的快捷方式
网友评论