51Testing软件测试论坛

标题: 自定义函数问题，高手请进 [打印本页]

作者: 383270701 时间: 2011-7-2 22:17
标题: 自定义函数问题，高手请进
自己编写的函数能够像QTP自身的函数一样弹出函数的相关信息，如参数类型和个数?

作者: 383270701 时间: 2011-7-3 11:58
自己顶起没人用过吗?

作者: 17800455 时间: 2011-7-4 09:40
本帖最后由 17800455 于 2011-7-4 10:52 编辑

。。。。。。。。。。。。。

作者: prince198509 时间: 2011-7-4 09:43
回复 1# 383270701

Public Function WebEdit_SetValue(obj_Page,strName,strInValue)
If strInValue <> "" Then
Set obj_WebEdit = Description.Create()
obj_WebEdit ("micclass").value = "WebEdit"
obj_WebEdit ("name").value= strName
obj_Page.WebEdit(obj_WebEdit).Set strInValue
End If
End Function
RegisterUserFunc "Page","WebEdit_SetValue","WebEdit_SetValue"

使用RegisterUserFunc 为某个对象重载个函数可以的

通过Browser("xxxx").Page("xxxx").就会出现这个函数的定义及参数等

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)