51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2626|回复: 5
打印 上一主题 下一主题

[原创] qpt课程学习中遇到问题了

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2005-12-5 18:35:04 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
在qpt学习的课程中,我参考老师的例子,放到自己的本机上运行,报错,提示:
ActiveX 部件不能创建对象: 'Scripting.FileSyetemObject'
Line (17): "Set Fso = CreateObject("Scripting.FileSyetemObject")".
但是我又看不出问题在哪里,老师的例子中也是那样写的。

请问这段代码的问题究竟在什么地方??

Dim Fso,TheFile,ReadString
Dim iPos,iLen
Dim TestNumerOne,TestNumerTwo

Const ForReading=1


Set Fso = CreateObject("Scripting.FileSyetemObject")
Set TheFile=Fso.OpenTextFile("E:\测试\代码练习\计算器加法用例.txt",ForReading,false)

do while TheFile.AtEndOfLine <> true
        ReadString=TheFile.ReadLine

        iPos=instr(1,ReadString,",",1)
        iLen=Len(ReadString)
        TestNumerOne=Left(ReadString.iPos-1)
        TestNumerTwo=Right(TeadString.iLen-iPos)

       
    '点击按钮1
     Window("计算器_2").WinButton(TestNumerOne).Click
     Window("计算器_2").WinButton("+").Click
     Window("计算器_2").WinButton(TestNumerTwo).Click
     Window("计算器_2").WinButton("=").Click
     Window("计算器_2").Close

       
Loop

TheFile.Close

Set TheFile=Nothing
Set Fso=Nothing
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2005-12-5 18:36:38 | 只看该作者
按说老师写的没错。
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2005-12-5 18:39:33 | 只看该作者
想必是你和老师机器的环境不一样。
这个东东说来话长了。

你用得什么系统啊??
另外你.....算了,慢慢说吧。呵呵。要问的比较多。

或许你的机器上禁用这个对象。

另外....这个错误是谁报出来了?
MI的QTP,还是MS的windows啊??

MS去MS问。呵呵:)
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2005-12-5 18:52:42 | 只看该作者
我用的是Win2000系统,错误是MI的QTP报出来的。这个应该跟系统没有关系吧,QPT会挑系统吗?或者说在配置QTP时,需要什么设置吗?我在按照时都是默认选项进行安装的。
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2005-12-6 09:48:47 | 只看该作者
我觉得你应该回去问你的老师!
有时候出现问题有很多种!
像LOVETEST6说得对!
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2005-12-6 09:50:38 | 只看该作者
报的是什么错误呢?
把你的截图法上来,
如果你认为是QTP报的。那你应该在QTP里面能够找到答案的。

本帖子中包含更多资源

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

x
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-14 21:02 , Processed in 0.071188 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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