Count number of checkboxes & set them ON.

Dim obj,AllObj

Set obj= description.Create()
obj("html tag").value = "input"
obj("type").value=("checkbox")
Set obj= browser(" Browser Name").Page("Page Name").ChildObjects(obj)
AllObj=obj.count
msgbox Allobj
For i = 0 to Allobj -1
Allobj(i).set"on"
Next