51Testing软件测试论坛

标题: ActiveX component [打印本页]

作者: mustwangrong 时间: 2008-2-21 10:22
标题: ActiveX component
运行下面代码会报:ActiveX component can't create object: 'scripting.FileSystemObject'
Dim fso, MyFile
Set fso = CreateObject("scrīpting.FileSystemObject")
Set MyFile = fso.CreateTextFile("C:\logfile.txt", True)
MyFile.WriteLine ("PB=All Products")
MyFile.WriteLine ("PB<>All Products")
MyFile.Close
我QTP已经装了ActiveX Add-In,setting也设置了
IE设置问题?但是我不是OS admin,不能对IE的安全设置

作者: xiaonan 时间: 2008-2-21 10:26
这段代码是完成创建文本对象，写文本的内容的操作，跟你IE设置啊搭什么噶？不能创建对象，说明你的系统参数缺少了对象

作者: xiaoyaoke 时间: 2008-2-21 10:29
scrīpting改成Scripting试试，并且很同意xiaonan的话，不理解为什么扯到IE设置去，貌似和IE设置没有关系

[ 本帖最后由 xiaoyaoke 于 2008-2-21 10:31 编辑 ]

作者: gavin.chen 时间: 2008-2-21 10:32
Dim fso, MyFile
Set fso = CreateObject("scripting.filesystemobject")
Set MyFile = fso.CreateTextFile("C:\logfile.txt", True)
MyFile.WriteLine ("PB=All Products")
MyFile.WriteLine ("PB<>All Products")
MyFile.Close

参数大小写问题。
Set fso = CreateObject("scripting.Filesystemobject")
改为
Set fso = CreateObject("scripting.filesystemobject")就行了

作者: mustwangrong 时间: 2008-2-21 10:37
标题: 回复 2# 的帖子
不搭噶
能不能具体说说看?缺少什么DLL之类的?

[ 本帖最后由 mustwangrong 于 2008-2-21 13:53 编辑 ]

作者: microtester 时间: 2008-2-21 10:53
显然是你脚本的语法错了。

4楼已经把脚本给你改好了，直接拿回家用吧。

作者: mustwangrong 时间: 2008-2-21 11:13
问题解决,谢谢Gavin和各位帮忙
这样我期待中的问题终于出现了
permission denied
[attach]39282[/attach]

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