不少网友对于QTP调用Java程序感到束手无策,实际上要调用Java程序是非常容易的。接下来songfun老师传授给大家武林绝技之六脉神剑。在演示这个例子前,请大家先造一个java程序(我以java计算器为例,源码见下),以方便观察调用结果。第一式:少商剑。特点:剑路雄劲,石破天惊。打开QTP,在QTP的Expert View中输入:InvokeApplication
"cmd /k cd c:\ && java Counter && exit"运行QTP,看看,打开了吗?第二式:商阳剑。特点:巧妙灵活,难以捉摸。在C盘上新建一个bat文件,取名为runjava.bat,在文件里面输入一段文本:cmd /k "cd c:\
&& java Counter && exit",然后保存下来。打开QTP,在QTP的Expert View中输入:SystemUtil.Run
"C:\runjava.bat"运行QTP,看看,打开了吗?第三式:中冲剑。特点:大开大阖,气势雄迈。打开QTP,在QTP的Expert View中输入:Dim oWshSet Wsh = CreateObject("WScript.Shell")oWsh.Exec "cmd /k cd c:\ && java Counter
&& exit"Set Wsh = Nothing运行QTP,看看,打开了吗?第四式:关冲剑。特点:以拙滞古朴取胜。在C盘上新建一个qfl文件,取名为runjava.qfl,在文件里面输入一段文本:CallJava "Counter"Sub CallJava(ByVal strJavaName)Dim oWshSet Wsh = CreateObject("WScript.Shell")oWsh.Run "cmd /k cd c:\ && java " &
strJavaName & " && exit"Set Wsh = NothingEnd Sub打开QTP,在QTP的Expert View中输入:ExecuteFile
"C:\runjava.qfl"运行QTP,看看,打开了吗?第五式:少冲剑。特点:轻灵婀娜,迅雷不及掩耳。安装QTP的Java Add-in,之后在Automation—Record
and Run Settings中出现了Java标签页。根据下图的内容设置即可(runjava.bat文件内容参照六脉神剑第二式)。