UFT基础_调用外部函数多种方法以及动态库

最新推荐文章于 2021-08-02 23:12:23 发布

tjjingpan

最新推荐文章于 2021-08-02 23:12:23 发布

阅读量1.1k

点赞数

分类专栏： QTPUFT系列

本文链接：https://blog.youkuaiyun.com/tjjingpan/article/details/78532950

版权

QTPUFT系列专栏收录该内容

10 篇文章

订阅专栏

本文介绍三种在Unified Functional Testing (UFT)中调用外部文件的方法，并通过一个具体的函数应用示例展示了如何进行顺序执行及外部函数调用。此外，还介绍了如何通过加载动态库来实现特定功能。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

'三种调用方法
方法1：
'ExecuteFile "D:\UserData\My Documents\Unified Functional Testing\sum.vbs"
'Call sum(2,3)

方法2：
'LoadFunctionLibrary "D:\UserData\My Documents\Unified Functional Testing\sum.vbs"
'sum 2,3

方法3：
'这种形式用的多
'ExecuteFile "D:\UserData\My Documents\Unified Functional Testing\Library1.qfl"
'sum 2,3


'#############顺序执行#################################################################
'flyfrom_a = Array("Denver","Frankfurt","London","Los Angeles","Paris","Portland","San Francisco","Seattle","Sydney","Zurich")
'Set flyfrom_i= Window("Flight Reservation").WinComboBox("Fly From:")
'
'
'For i = 0 To flyfrom_i.GetItemsCount-1
'    If flyfrom_i.GetItem (i)=flyfrom_a(i) Then
'    print i&" is right"
'else
'    print i&" is wrong"
'End If
'
'Next
'###################################################################################

'###############重构函数，外部调用函数################################################
'Sub flyfrom (flyfrom_i,flyfrom_a)
'   For i = 0 To flyfrom_i.GetItemsCount-1
'       If flyfrom_i.GetItem (i)=flyfrom_a(i) Then
'           print i&" is right"
'       else
'       print i&" is wrong"
'       End If
'Next
'End Sub

'比对数组
'flyfrom_a = Array("Denver","Frankfurt","London","Los Angeles","Paris","Portland","San Francisco","Seattle","Sydney","Zurich")
'
'Set flyfrom_i= Window("Flight Reservation").WinComboBox("Fly From:")

'加载外部函数
'ExecuteFile "D:\UserData\My Documents\Unified Functional Testing\flyfrom.vbs"
'
'调用函数
'Call flyfrom(flyfrom_i,flyfrom_a)
#######################################################################################
'调用动态库
Set a=DotNetFactory.CreateInstance("ClassLibrary2.Class1","D:\UserData\My Documents\Unified Functional Testing\ClassLibrary2.dll")
msgbox a.sum(2,3)