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

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

1 个答案: