|
---总结DataTable从excel中读取数据的方法
Option explicit
Dim rowcount'存储数据总行数
Dim filepath'获取excel表格路径
Dim i'循环变量
filepath=pathfinder.Locate("webmail_option_preference_hintSendSuccess.xls")
datatable.Import(filepath)
rowcount=datatable.GetRowCount'统计行数
For i=0 to rowcount-1
datatable.GetCurrentRow '置当前行为活动行
send=datatable.Value("send")'这里Value("send")中的send为excel中的列名,是在设计测试数据时确定的
name1=datatable.Value("name1")'同上
。。。。。。
datatable.SetNextRow'下一行
我在运行该脚本时,到这一行datatable.Value("send")就取不出来了,
因为外部的Excel文件的列名是A,B,C,。。。。不能修改为"send"
就是“webmail_option_preference_hintSendSuccess.xls”的样子是什么样的呢?
或者有其他方式解决这个问题?
而用QTP自己的datatable的方式:DataTable("server", dtLocalSheet) 这样就没问题。 |
|