FileName String The full path of the Excel table from which you want to import a sheet.
SheetSource Variant The name or index of the sheet in the file that you want to import. Index values begin with 1.
翻译: sheetSource 变量类型 你想导入的文件中的sheet名,或序列号. 序列号值从1开始;
SheetDest Variant The name or index of the sheet in the Data Table that you want to replace with the SheetSource. Index values begin with 1.
朋友...建议你看看QTP里的HELP文件吧
有谁能帮帮我啊.....苦呢啊作者: lingxin5013 时间: 2008-7-17 15:51
你在试下 我实验了下是可以的
datatable.ImportSheet "D:\PSCI项目\考生\9001系列.xls",1,2作者: flying-kite 时间: 2008-7-17 15:54
没有问题啊,我用DataTable.importSheet "D:\TestResult.xls",1,1 运行成功!作者: lingxin5013 时间: 2008-7-17 15:54
去检查下你的datatable表中是否有第4个sheet
应该是这个地方错了
SheetSource Variant The name or index of the sheet in the file that you want to import. Index values begin with 1.
Sheet来源: 变量类型 你想导入文件中的Sheet名,或序号; 序号值从1开始;
SheetDest Variant The name or index of the sheet in the Data Table that you want to replace with the SheetSource. Index values begin with 1.
想要替换的Sheet(这里是个人感觉是指Run-Time DataTable中的Sheet) 变量类型 DataTable中, 你想要替换掉的Sheet名或其序号; 序号值也是从1开始计;
If Dialog("Login").Dialog("Flight Reservations").Exist Then
ActResult = Dialog("Login").Dialog("Flight Reservations").Static("Password must be at least 4 characters long").GetROProperty("text")
Dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click
else
Window("Flight Reservation").WaitProperty "visible", True, 10000
ActResult = Window("Flight Reservation").GetROProperty("text")
End If
If ExpResult = ActResult Then
DataTable.Value("PassOrNot",2)="PASS"
DataTable.Value("ActResult",2)=ActResult
Reporter.ReportEvent micPass, "LoginChk", "LoginChk is OK"
Else
DataTable.Value("PassOrNot",2)="Failure"
DataTable.Value("ActResult",2)=ActResult
Reporter.ReportEvent micFail, "LoginChk", "LoginChk is Not Ok"
End If
'