10-27-2009, 05:57 PM
First I thought of retriving all the default values and store into an excel,then To set the values and click on reset button.
Again store al the current values into an another excel,then comparing two excel sheets
''Create a Description object to help retrieve all WebEdit objects in a specific page.
Again store al the current values into an another excel,then comparing two excel sheets
''Create a Description object to help retrieve all WebEdit objects in a specific page.
Code:
Set oDesc = Description.Create()
oDesc("micclass").Value = "WebEdit"
''Retrieve all WebEdit objects from this page.
Set EditCollection = .Frame(setFrame("admin")).ChildObjects(oDesc)
NumberOfEdits = EditCollection.Count
For i = 0 To NumberOfEdits - 1
CurrentValue = EditCollection(i).GetROProperty("text")
Next