fbs19871014 发表于 2010-3-17 15:53:26

请大家看看有什么问题，在线等待回复。（用excel导入到本地表中）

datastr="f:\\parameter.xls"
datatable.AddSheet ("testdata")
datatable.ImportSheet datastr,"sheet1","testdata"
For i=1 to datatable.GetSheet ("testdata").GetRowCount
'datatable.SetCurrentRow i
username=datatable.Value ("username","testdata")
password=datatable.Value ("password","testdata")
dialog("Login").WinEdit("Agent Name:").Set username
dialog("Login").WinEdit("Password:").Set password
Dialog("Login").WinEdit("Password:").TypemicReturn
Window("Flight Reservation").Close
Next

测霸 发表于 2010-3-17 15:57:26

你应该发到QTP版中去

nesic 发表于 2010-3-17 16:11:10

错误提示？

fbs19871014 发表于 2010-3-17 16:13:40

没有执行到excel里的数据，也没报错。

nesic 发表于 2010-3-17 16:29:56

应该是excel数据问题

fbs19871014 发表于 2010-3-17 16:36:47

代码没问题吗，数据应该没问题啊，你们平时是不是这样做的，我把用例，vbs脚本和录制的qtp脚本分开做的，就这么简单，其他的就没细分了。感觉还不行，效果不太好。

nesic 发表于 2010-3-17 16:49:32

修改一下多试几次，

liangxue2007518 发表于 2010-3-25 13:48:36

我试了一下你的代码每次循环只取到了Excel文件的第一行数据，增加一行代码即可
DataTable.SetNextRow
不知道是不是你的问题？
页: [1]
查看完整版本: 请大家看看有什么问题，在线等待回复。（用excel导入到本地表中）