Forum Discussion
Ravik
12 years agoSuper Contributor
Hi Lee,
I achieved same functionality using below code (comman function) try this, it may help you.-
I achieved same functionality using below code (comman function) try this, it may help you.-
Function SelectDropDown(ddl_objName, objVal)
Dim ddlItems,ddlItems1, item
If ddl_objName.Enabled Then
ddlItems = ddl_objName.wItemList
ddlItems1 = Split(ddlItems, ";")
for each item in ddlItems1
If objVal = (aqConvert.VarToStr(item))Then
ddl_objName.Keys(aqConvert.VarToStr(item))
Else
log.Message("Item not found in list")
End If
Exit For
Next
End If
End Function