Visual Basic - ListView y ADO

Life is soft - evento anual de software empresarial
 
Vista:

ListView y ADO

Publicado por Sergio (13 intervenciones) el 10/09/2007 21:15:06
Hola. necesito cargar un listview con un recordset y no lo consigo, me baje de la red un vbp ejemplo y funciona perfectamente, pero cuando lo copia a mi proyecto me tira un error: NO COINCIDEN LOS TIPO (err.numbre=13).
Si en lugar del ListView uso un ListBox se completa, no es un problema de bdd

Les paso el codigo
======================================
Private Sub Command1_Click()

Dim LST As ListItem
Dim cnot As ADODB.Connection
Dim rsSemaforo As ADODB.Recordset

Set cnot = New ADODB.Connection
cnot.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Sergio\global\NOT\OT.mdb;Persist Security Info=False"
cnot.Open

Set rsSemaforo = New ADODB.Recordset
rsSemaforo.Open "Select * From semaforo", cnot, adOpenDynamic, adLockOptimistic

ListView1.ListItems.Clear
While rsSemaforo.EOF = False
Set LST = ListView1.ListItems.Add(, , rsSemaforo(0))
LST.SubItems(1) = rsSemaforo(1)
LST.SubItems(2) = rsSemaforo(2)
LST.SubItems(3) = rsSemaforo(3)
LST.SubItems(4) = rsSemaforo(4)
rsSemaforo.MoveNext
Wend
cnot.Close
End Sub
===========================================
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ListView y ADO

Publicado por fede (189 intervenciones) el 11/09/2007 20:22:55
fijate que los campos no esten nulos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar