51Testing软件测试论坛

标题: 登陆的自动化代码出现错误 [打印本页]

作者: fangyiye    时间: 2009-1-5 13:26
标题: 登陆的自动化代码出现错误
出现错误信息提示。
Line (14): "Browser("亿芯工程样片零售网").Page("亿芯工程样片零售网").WebEdit("password").SetSecure DataTable("password", dtLocalSheet)".

Dim  i '定义行号
Dim outputvalue '读取系统实际的提示信息
Dim istatus '定义读取系统预期提示信息的变量


For i=1to datatable.GetSheet("Action1").getrowcount




       
Browser("亿芯工程样片零售网").Page("亿芯工程样片零售网").WebEdit("username").Set DataTable("username", dtLocalSheet)
Browser("亿芯工程样片零售网").Page("亿芯工程样片零售网").WebEdit("password").SetSecure DataTable("password", dtLocalSheet)
Browser("亿芯工程样片零售网").Page("亿芯工程样片零售网").WebButton("submit").Click



utputvalue=datatable("outmsg",dtlocalsheet)   '将实际输出值赋予变量 outputvalue
istatus=datatable("statue",dtlocalsheet) '将与其输出值赋予变量istatus





If  outputvalue<>istatus Then
         reporter.ReportEvent 1,"登陆功能测试","预期值为:"+status+",实际值为:“+outputvalue"
End If

datatable.GetSheet("Action1").setnextrow '获取action1中的下一行 数据


Next



Browser("亿芯工程样片零售网").Page("会员中心首页 - 亿芯工程样片零售网").Link("退出").Click
作者: tiger_86    时间: 2009-1-5 14:22
俺不知道你这个 点击推出以后 到达的是那个页面了
第一感觉就是:这个脚本可以运行一遍!
作者: david208    时间: 2009-1-5 14:39
utputvalue=datatable("outmsg",dtlocalsheet)   '将实际输出值赋予变量 outputvalue
作者: happychap    时间: 2009-1-5 15:12
写脚本,最好在脚本的最开始写上Option Explicit,避免因变量笔误而造成的错误结果。
作者: fangyiye    时间: 2009-1-5 15:59
标题: 登陆的自动化代码出现错误图片
附图
作者: david208    时间: 2009-1-5 17:26
Browser("亿芯工程样片零售网").Page("亿芯工程样片零售网").WebButton("submit").Click
你的图怎么又变“登录”了?
作者: fangyiye    时间: 2009-1-6 09:42
这个错误是因为没有输入密码找不到对象,这个提示是个弹出式的窗口。弹出窗口没有建对象化,有没有人做过相关的自动化测试呢

[ 本帖最后由 fangyiye 于 2009-1-6 10:14 编辑 ]
作者: fangyiye    时间: 2009-1-7 09:19
我录制的是能够成功登陆的。那个是输入不正确的弹出的提示框
作者: zhangxinnow    时间: 2009-1-7 09:38
建议好好看看出错信息,发出的资料不完全,无法分析。找不到对象是没有加入对象库,在对象库添加一下对象。
作者: fangyiye    时间: 2009-1-7 13:23
是的。都晕了




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2