Estoy tratando de llenar un DropListDown asi:
Código:
Dim cnn As New ADODB.Connection()
Dim rst As New ADODB.Recordset()
cnn.Open("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial " & _
"Catalog=Desarrollo;Data Source=PRSIST13;Use Procedure for Prepare=1;Auto Translate=True;Pa" & _
"cket Size=4096;Workstation ID=PRSIST13;Use Encryption for Data=False;Tag with column colla" & _
"tion when possible=False")
rst.Open("Select cdDescripcion, cdCodigo from centroDistribucion", cnn, _
ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly)
cobCentroDist.Items.Clear()
cobCentroDist.DataSource = rst
Do While Not rst.EOF
cobCentroDist.DataTextField = rst.Fields("cdDescripcion").Value
cobCentroDist.DataValueField = rst.Fields("cdCodigo").Value
rst.MoveNext()
Loop Pero me da el siguiente error:
An invalid data source is being used for cobCentroDist. A valid data source must implement either IListSource or IEnumerable.
Line 46: cobCentroDist.DataSource = rst
Alguien tiene alguna idea de lo que puede estar pasando?
--
Saludos,
Joe Peña