QTP读取外部数据表的方法

Option Explicit

On Error Resume Next

Dim mywd,cnt
datatable.Import("E:\test.xls")
cnt=datatable.GetRowCount

Dim i
msgbox cnt
For i=1to cnt
datatable.SetCurrentRow(i)
mywd=datatable.Value("mywd",1)