qtp - 将 Excel 文件导入 QTP 时，我收到以下消息“操作失败，因为应用程序正忙”？

Question

这是代码，

dim q_app
Set q_app=createobject ("Quicktest.application")
q_app.Launch
q_app.new
q_app.Visible =true
msgbox (" opens")
call q_app.Test.DataTable.Importsheet ("C:\xlfile.xls",1,1)
q_app.Test.DataTable.export ("C:\name-runtime.xls")
msgbox("opens")
q_app.Test.SaveAs("C:\testedxlfile")
q_app.Visible=true
q_app.Quit
Set q_app = nothing

我跳过了这一步，它再次显示第 7 行中的一般错误。

谢谢维涅什

Answer 1

QTP 的自动化应该用于从外部驱动测试。当我将您编写的代码放在.vbs它正常运行的独立文件中时，从 QTP 内部运行它时，我确实收到了应用程序繁忙错误，因为它是用来构建一个可以运行的测试而不是修改数据当前正在运行的测试表。

如果要修改当前的测试就简单多了，直接使用DataTable测试中的对象即可（无需创建QTP对象）

DataTable.ImportSheet "C:\xlfile.xls", 1, 1