How to change script for checkbox from Dropdown list

[mufiani]

Hi,
I have a VB script for Dropdown list which select the values (yes or no) from the Data table. but the requirement changed the Dropdown list to Check box. for an example : yes I have to check , else uncheck.

I have attached my script for Dropdwon list. If anyone can help me how to change this script to check box for same scenario?

Code:

Set oWebList = Description.Create
oWebList ("name").value = "XYZ" & i
oWebList ("name").RegularExpression = false
oWebList ("html tag").value = "SELECT"
Disabled=Browser("Browser").Page("Drivers").WebList(oWebList).GetROProperty ("disabled")
If  Disabled = "0" Then
Browser("Browser").Page("Drivers").WebList(oWebList).Select Datatable.Value ("Order" & i, dtlocalSheet)      
End If

Scenario: every time I add new driver I will get this dropdown list for each drive, hence my script have a loop for adding each driver and selecting Dropdown list value for each driver.

I am using QTP 9.5

[rajeshwar]

Try implementing your logic around this

Code:

If Strcomp ("Yes",Datatable.Value ("Order" & i, dtlocalSheet),1) = 0   Then
        flag = "ON"
        Else
        flag = "OFF"
    End If

If Disabled = "0" Then
    Browser("..").Page("..").WebCheckBox("..").Set  flag
End If

[mufiani]

Thank You so much for help. It works fine.....