QTP调用外部.vbs函数的方法比较

发表于:2010-7-30 13:05

字体: | 上一篇 | 下一篇 | 我要投稿

 作者:未知    来源:51Testing软件测试网采编

  方式1:Executefile

  方式2:加到QTP的Resorece

  方式3:ExecuteGlobal方法

  在比较之前先简明叙述一下使用方法,以给初学者由浅入深的理解

  比如我们有一个函数Wally.vbs放在了C:盘下,其中有如下函数(获取本机的IP地址):

FunctionGetIPAddr()
SetobjWMI=GetObject("winmgmts://./root/cimv2")
SetcolIP=objWMI.ExecQuery("Select*fromWin32_NetworkAdapterConfigurationwhereIPEnabled=TRUE")
ForEachIPIncolIP
temp=IP.IPAddress(0)
ExitFor
Next
GetIPAddr=temp
EndFunction


  方式1的使用方法:

  直接在QTP中打:

  Executefile"c:\wally.vbs"

  随后就可以引用wally.vbs中的任意函数了,如msgboxGetIPAddr()

  方式2的使用方法:

  点击QTP菜单的File->Settings->Resources,之后添加wally.vbs到QTP的resource中

  随后就可以引用wally.vbs中的任意函数了,如msgboxGetIPAddr()

  方式3的使用方式:

  ExecuteGlobal是VBS的函数而非QTP特有的函数,ExecuteGlobal的功能可以引入其它vbs文件的函数,就和C++的include,Java的import一样。使用范例:

dimfso:setfso=createobject("scripting.filesystemobject")
executeglobalfso.opentextfile("c:\wally.vbs",1).readall
setfso=nothing

  大家可以看到其实它是把wally.vbs全部读入内存中

  随后就可以引用wally.vbs中的任意函数了,如msgboxGetIPAddr()

21/212>
《2023软件测试行业现状调查报告》独家发布~

精彩评论

  • 819longjiayan
    2012-2-15 10:14:01

    如果我调用wally.vbs,查找里面的函数,没有我要调用的函数,那怎么写入呢

关注51Testing

联系我们

快捷面板 站点地图 联系我们 广告服务 关于我们 站长统计 发展历程

法律顾问:上海兰迪律师事务所 项棋律师
版权所有 上海博为峰软件技术股份有限公司 Copyright©51testing.com 2003-2024
投诉及意见反馈:webmaster@51testing.com; 业务联系:service@51testing.com 021-64471599-8017

沪ICP备05003035号

沪公网安备 31010102002173号