QTP--SystemUtil对象
  SystemUtil对象的几个常用方法:
  1. "SystemUtil.Run"
  syntax:   SystemUtil.Run file,[params],[dir],[op],[mode]
  "file"    必须的,是你想要运行的文件的名称。
  "params"  可选,如果file参数中指定的是一个可执行文件,则可以使用params参数来指定该可执行文件的运行参数。
  "dir"     可选,应用程序或文件的默认目录。
  "op"      可选,将要被执行的动作。如果该参数值为空,则默认操作为open操作。
  "mode"    可选,指定应用程序打开时的显示模式。可以指定以下几种打开模式。默认模式是1。
  比方打开F盘为食谱的记事本:
  SystemUtil.run"notepad","F:食普.txt"
  或者打开网页:
  Dim strURL
  strURL="www.baidu.com"
  SystemUtil.Run "IEXPLORE.EXE",strURL
  2. "SystemUtil.BlockInput" and "SystemUtil.UnblockInput"
  syntax: SystemUtil.BlockInput
  SystemUtil.UnblockInput
  将这两句分别加在脚本的前后,脚本执行过程中将会避免键盘和鼠标的输入与点击干扰。
  3. "SystemUtil.CloseDescendentProcesses"
  syntax: SystemUtil.CloseDescendentProcesses
  这一句将会关闭由QTP打开的所有进程。

 

eg.
SystemUtil.BlockInput  '锁住键盘和鼠标。
SystemUtil.CloseDescendentProcesses '关闭以前由QTP打开的进程。
SystemUtil.Run "3.txt","","D:","open"  '打开D盘下名为“3.txt”的文件(这个文件存在)。
SystemUtil.Run "iexplore.exe","www.baidu.com","C:Program FilesInternet Explorer" '用IE打开百度网。
SystemUtil.UnblockInput '解锁。
function showMiniAd()
{
var vn = "tinfo";
var dataURL = "http://t.sohu.com/third/user.jsp?passport="+window._xpt+"&vn="+vn; new LinkFile(dataURL, { type: 'script', noCache: false, callBack: { variable: vn, onLoad: function(){ var data = eval("(" + vn + ")") if(data != null && data.status == 1){ var userLink = data.url; //var userLink = data.icon; $('miniAd').innerHTML = "我正在玩搜狐微博,快来“关注”我,了解我的新动态吧。
"+userLink+""; $('miniAd').show(); } },
onFailure: function(){} }});
}
showMiniAd();