有关脚本的一个问题，大家进来看看！！！

Question

这是一个.VBS的文件里面的全部代码，运行后出现“无法创建名为WScript.shell的对象”请问是什么原因，谢谢了！！！Dim OperationRegistry 
Set OperationRegistry=WScript.CreateObject("WScript.Shell") 
Dim Read_Data1,Read_Data2 
Read_Data1=OperationRegistry.RegRead("HKCR\Software\Microsoft\Windows\CurrentVersion\Policies\system") 
Read_Data2=OperationRegistry.RegRead("HKCR\Software\Microsoft\Windows\CurrentVersion\Policies\system") 
MsgBox "Default=" & Read_Data1 & " value=" & Read_Data2

Answer 1

Set OperationRegistry=WScript.CreateObject("WScript.Shell") 把这一句改成 Set OperationRegistry=CreateObject("WScript.Shell")

Answer 2

在win2k下的VB中使用
  Set OperationRegistry=CreateObject("WScript.Shell")
没有错。在VBS中如何就不得而知了