User Define Function

' Object pass karna jaroori hai
RegisterUserFunc "WebEdit","set", "mthd"

Browser("CASO Dashboard").Page("CASO Dashboard").WebEdit("WebEdit").set "copy"

Function mthd (obj, x)
Msgbox x
'
If x="copy" Then
Msgbox "Hi"
End If

' dim y
'
' y = obj.GetROProperty("value")
'
' Reporter.ReportEvent micDone, "previous value", y
'
' MySet=obj.Set(x)

End Function

UnRegisterUserFunc "WebEdit", "Set"