51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2967|回复: 6
打印 上一主题 下一主题

[原创] ActiveX component

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-2-21 10:22:22 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
运行下面代码会报: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的安全设置
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2008-2-21 10:26:36 | 只看该作者
这段代码是完成创建文本对象,写文本的内容的操作,跟你IE设置啊搭什么噶?不能创建对象,说明你的系统参数缺少了对象
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2008-2-21 10:29:58 | 只看该作者
scrīpting改成Scripting试试,并且很同意xiaonan的话,不理解为什么扯到IE设置去,貌似和IE设置没有关系

[ 本帖最后由 xiaoyaoke 于 2008-2-21 10:31 编辑 ]
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2008-2-21 10:32:13 | 只看该作者
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")就行了
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2008-2-21 10:37:04 | 只看该作者

回复 2# 的帖子

不搭噶
能不能具体说说看?缺少什么DLL之类的?

[ 本帖最后由 mustwangrong 于 2008-2-21 13:53 编辑 ]
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2008-2-21 10:53:18 | 只看该作者
显然是你脚本的语法错了。

4楼已经把脚本给你改好了,直接拿回家用吧。
回复 支持 反对

使用道具 举报

该用户从未签到

7#
 楼主| 发表于 2008-2-21 11:13:22 | 只看该作者
问题解决,谢谢Gavin和各位帮忙
这样我期待中的问题终于出现了
permission denied

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

x
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-27 12:35 , Processed in 0.072167 second(s), 29 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表