QTP加载外部文件函数VBS,三种方法比较
方式1:Executefile
方式2:加到QTP的Resorece
方式3:ExecuteGlobal方法
在比较之前先简明叙述一下使用方法,以给初学者由浅入深的理解
比如我们有一个函数Terry.vbs放在了C:盘下, 其中有如下函数(获取本机的IP地址):
Function GetIPAddr() Set bjWMI = GetObject("winmgmts://./root/cimv2") Set colIP = objWMI.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE") For Each IP In colIP temp = IP.IPAddress(0) Exit For Next GetIPAddr = temp End Function |