VBScript 卸载未找到任何内容

VBScript 卸载未找到任何内容

我开始使用标准卸载脚本,但它不起作用,所以我决定看看它是否能找到任何程序,但似乎没有。它在 Windows 7 上有效,但在我需要使用它的另一台 Windows 2003 服务器上无效。我以本地管理员身份登录,

下面的脚本产生了错误:

Line: 4
Char: 1
Error: 0x80041010
Code: 80041010
Source: (null)

代码:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery ("Select * from Win32_Product")
For Each objSoftware in colSoftware
    MsgBox("hi")
Next

答案1

您看到的错误代码是“无效类”。Server 2003 默认不包含 WMI 的 MSI 提供程序。

WMI 组件的操作系统可用性

Windows Server 2003: Windows Installer 提供程序(也称为 MSI 提供程序)作为可选 Windows 组件包含在 CD 中,您可以使用它进行安装控制面板. 可选安装 Windows Installer 提供程序可确保与 Windows XP 和 Windows 2000 功能集的向后兼容性。

您需要从

  • “添加删除 Windows 组件”
    • “管理和监控工具”
      • “WMI Windows 安装程序提供程序”

在此处输入图片描述

相关内容