Question

我正在尝试运行以下代码：

 Dim objShell  'Creates Windows Shell Object
   set objShell = Nothing

     objShell.run \\omserver\netlogon\Mater2kupdate.bat

它已运行好几年（当我们运行Windows 32位时）。但现在我们正在将操作系统更改为Windows 64位。当我运行相同的代码时，我收到一条错误消息：

Error message says Script: C:\Users\username\Desktop\filename.vbs Line:5 Char:4 Error: Object required Code: 800A01A8 Source: Microsoft VBScript runtime error

（我希望上传图片，以便您可以看到错误消息）。

我已经对此错误消息进行了一些搜索，看起来错误是因为我试图在64位计算机上运行代码。我已经尝试过如何写这个，所以它可以在32位或64位上运行，但我不了解任何足以使用它们的例子。我意识到我将不得不修改我找到的代码，因此它对我有用，但我知之甚少，无法弄明白。你能帮我吗？

谢谢。

Answer 1

这是一个细分

Dim objShell  'Creates Windows Shell Object - NO It declares a variable of the type Variant
set objShell = Nothing 'releases the object...but you never instantiated the object

 objShell.run \\omserver\netlogon\Mater2kupdate.bat -'will fail as objShell is nothing

你需要实例化Wscript.Shell然后你可以使用它的Run方法。

Dim objShell  'declare a variable to hold our Windows Shell Object
set objShell = CreateObject("WScript.Shell")

 objShell.run "\\omserver\netlogon\Mater2kupdate.bat"

需要帮助在32位和64位计算机上执行VBScript

1 个答案: