QTP函数,函数库和VBScript脚本_files

1.函数
1)自定义函数 Insert|Function Definition Generator,例子如下:
'@Description Calculate Total price
'@Documentation Total=Price*Tk_No
Public Function Ticket_Total(Price, Tk_No)
       ' TODO: add function body here
            Ticket_Total=Price*Tk_No
End Function
2)自定义 -注册到一个对象方法的函数 : Insert|Function Definition Generator,例子如下:
'@Description Define a object and Reg to the method of object
Public Function Reg_Object
       ' TODO: add function body here
End Function
RegisterUserFunc "ActiveX", "Click", "Reg_Object", True


2.函数库, 使用详情如下
1)定义函数库 File->new->Function Library
2)保存为函数库文件 *.qfl
3)关联函数库


3.使用ExectueFile 执行VBScript脚本
ExecuteFile函数可用于执行制定的VBScript脚本文件 ,并且一旦脚本文件运行起来后 ,脚本文件中的函数都可以直接调用 .例子如下: