求助：测试过程中报缺少对象: '[string: "outmsg"]'
在脚本回放过程中报这样错误：缺少对象: ''
Line (13): "outputvalue=datatable("outmsg".dtlocalsheet)'将实际输出值赋予变量outputvalue".
脚本如下：
Dim i'定义行号
Dim outputvalue'定义读取系统实际操作的提示信息
Dim istatus'定义读取系统预期操作的提示信息
For i = 1 to datatable.GetSheet("Action1").GetRowCount
Browser("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").Page("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").WebEdit("email").Set DataTable("username", dtLocalSheet)
Browser("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").Page("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").WebEdit("password").SetSecure DataTable("password", dtLocalSheet)
Browser("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").Page("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").WebButton("登录人人网").Click
Browser("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").Page("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").Output CheckPoint("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同")'插入文本输出点
outputvalue=datatable("outmsg".dtlocalsheet)'将实际输出值赋予变量outputvalue
istatus=datatable("status".dtlocalsheet)'将预期输出值赋予变量istatus
If outputvalue<>istatusThen
reporter.ReportEvent 1,"登录功能测试"," 预期值为："+istatus+" ，实际值为"+outputvalue
End If
datatable.GetSheet("Action1").SetNextRow'获取Action1的下一行数据
Next
'进入系统
Browser("人人网，中国领先的实名制SNS社交网络。加入人人网，找到老同").Page("人人网 - 江子").Link("退出").Click outputvalue=datatable("outmsg".dtlocalsheet)'将实际输出值赋予变量outputvalue又没有把你的实际结果输入到datatable中？
outputvalue=datatable("outmsg".dtlocalsheet)'将实际输出值赋予变量outputvalue
msgbox outputvalue
istatus=datatable("status".dtlocalsheet)'将预期输出值赋予变量istatus
msgbox istatus
吧这两个值输出来看看，有没有值 outputvalue=datatable("outmsg", dtlocalsheet)
应该用逗号? 回复 3# zhulifu
果然是，好的原因，调试后运行顺利
3Q 回复 2# yidao8808
前边错误调试后发现是这两行代码中("outmsg",dtlocalsheet)'敲错符号了是，号，
outputvalue=datatable("outmsg",dtlocalsheet)'将实际输出值赋予变量outputvalue
istatus=datatable("status",dtlocalsheet)'将预期输出值赋予变量istatus
修改后继续运行后发现outmsg没有输出？？？
页:
[1]
