51Testing软件测试论坛

标题: ActiveX 部件不能创建对象: 'scrīpting.FileSystemObject' [打印本页]

作者: 026300 时间: 2012-5-3 17:22
标题: ActiveX 部件不能创建对象: 'scrīpting.FileSystemObject'
使用了一段代码：
Function ShowFolderList(folderspec)
Dim fso, f, f1, fc, s
Set fso = CreateObject("scrīpting.FileSystemObject")
Set f = fso.GetFolder(folderspec)
Set fc = f.Files
For Each f1 in fc
s = s & f1.name
s = s & "<BR>"
Next
ShowFolderList = s
End Function

但运行时提示：
ActiveX 部件不能创建对象: 'scrīpting.FileSystemObject'
Line (13): "Set fso = CreateObject("scrīpting.FileSystemObject")".

使用了网上提供的重新注册scrun.dll和在注册表的scrīpting.FileSystemObject中增加everyone和guest的权限并重启IIS，都没有成功（还专门装了个IIS

），急求解决方法

作者: lifreshman0626 时间: 2012-5-4 09:40
Set fso = CreateObject("scrīpting.FileSystemObject")
你这个CreateObject("scr 后面的那个字母是啥啊，应该是字母i，下面的代码即可
Set fso = CreateObject("scripting.FileSystemObject")

作者: 026300 时间: 2012-5-4 12:40

Set fso = CreateObject("scrīpting.FileSystemObject")
你这个CreateObject("scr 后面的那个字母是啥啊， ...
lifreshman0626 发表于 2012-5-4 09:40

我倒，还真是这个问题，多谢多谢

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)