[问题求助] VBS报错ActiveX component can't create object

lhjoanna

set ti = CreateObject("typelib.decoder")
list = Split("wshom.ocx;vbscript.dll;scrrun.dll;" _
& "shdocvw.dll;wscript.exe", ";")
searchword = InputBox("lease enter the command name you are looking for!")
for each library in list
    result = ti.Search(searchword, library)
    if not result="" then
        endresult = endresult & "(" & library & ")" & vbCrLf & result
    end if
next
MsgBox endresult
复制代码

lxzzr

我的可以用 何解？

[ 本帖最后由 lxzzr 于 2009-5-11 14:51 编辑 ]

123User27

回复 1# lhjoanna
我最近下载了一个微软的scriptomaticV2.0
也产生了这样的结果...
电脑问题？