Selected Multiple values from a DropDownList

[tcadieux]

Using the below code, I continually get 1 for the value, when I know that each field has a unique value?


For Each Item In lbDist_list.Items
If Item.Selected Then

'Store the ID of the DisttributionList picked
iDistListID = lbDist_list.SelectedValue

'Send value to the Sub to create Relations
CreateAssociatedGroupsDistListEntry(iRecordId, iGroupNameID, iDistListID)
End If
Next 'i

[tcadieux]

Figured it out, it should have been
iDistListID = Item.value