how to script this

[manishbhalshankar]

Hi Jenny,
Can't this can be done by If -- ElseIf:

In datatable add a column by name CheckBoxName and enter the name of checkbox you want to tag.
e.g.: party A, party B.....so on.

Code:

If DataTable("CheckBoxName", dtGlobalSheet) = "party A" Then
   ChkName = "dcmtptyFlag"
ElseIf DataTable("CheckBoxName", dtGlobalSheet) = "party B" Then
   ChkName = "dcmtptyFlag$0"
ElseIf DataTable("CheckBoxName", dtGlobalSheet) = "party C" Then
   ChkName = "dcmtptyFlag$1"
End If

Browser("JUSTICEMAX_2").Page("JUSTICEMAX").WebCheckBox("dcmtptyFlag").SetTOProperty "name", ChkName
Browser("JUSTICEMAX_2").Page("JUSTICEMAX").WebCheckBox("dcmtptyFlag").Set "ON"