‘**********************************************************************************************
‘Properties Object
'Purpose - To add, edit, remove, and retrieve properties and values to or from the properties object during run session.
‘Properties collection object is an extension for Description Object. With the help of properties object, you can add a property which is used by other description object
‘**********************************************************************************************
Public Function funcProperties()
‘Creating Description Object with common properties of links
Set objDescLink = Description.Create()
objDescLink ("micclass").Value = "Link"
objDescLink ("html tag").value="A"
Set objDescLink1 = Description.Create()
objDescLink ("innertext").Value = "About Gmail"
objDescLink ("innerhtml").value="About Gmail "
objDescLink1.Add objDescLink(0) ‘The properties index start from 0
End Function
‘**********************************************************************************************
No comments:
Post a Comment