1、如果电脑上未按照QTP自动化测试软件，请先对软件进行安装，也就是常说的搭建测试环境，测试环境搭建好以后继续下面的操作。
2、安装完成后在桌面找到QTP自动化测试软件的图标，双击运行自动化测试工具，如下图：
3、接着会弹出一个对话框，对话框中有3个选择项，分别为：active X、visual Basic、web三个选项，这里小编是全部选上的因为对本次做的事情没有影响，读者下来可以查阅资料。然后点击【OK】按钮。
4、点击【OK】按钮后自动化测试QTP就会进入工具的控制台主界面，耐心等待吧。
5、界面展开后，点击下图红色方框选中的【NEW】即新建一个测试脚本。
6、在脚本中输入如下代码：systemutil.Run"C:\Documents and Settings\Administrator\桌面\SQLyog\SQLyogEnt.exe" ’***使用工具打开特定位置的程序，如打开下图中的测试工具
7、print "SQLyogEnt.exe is Running:" & FindProcess("S求溻皑恰QLyogEnt.exe") '*****这个print 语句很重要必须保留！判断判断应用是否开启后的结果*******Function FindProcess(ByVal ProcessName) FindProcess= False Set Shell = CreateObject("WScript.Shell") Set ShellResult = Shell.Exec("TaskList") While Not ShellResult.StdOut.AtEndOfStream If Instr(UCASE(ShellResult.StdOut.ReadLine),UCASE("SQLyogEnt.exe")) Then'判断进程中是否包含“SQLyogEnt.exe”这个进程 FindProcess = True systemutil.CloseProcessByName("SQLyogEnt.exe")'如果进程中包含这个进程就关闭 Exit Function End If Wend End Function'****打开应用程序 wait 5 Dim wshShell Set wshShell =CreateObject("WScript.Shell") wshShell.SendKeys "{ENTER}"'
8、下面是脚本运行后的测试脚本运行报告，报告中全部操作通过，脚本运行成功。
