Ayuda por favor con List View

CESAR
15 de Septiembre del 2004
tengo un problema con el list view al momento de guardar datos desde un list view no guarda todo si solo la el ultima Registro como hago aqui esta el codigo

Dim Y As Integer
For Y = 0 To c.ListItems.Count - 1
d.Recordset.AddNew
With cursos.SelectedItem
detalle.Recordset.Fields("codcurso") =x..Text
d.Recordset.Fields("dato") = .SubItems(4)
de.Recordset.Update
d.Refresh
End With
Next Y

O hay otra manera de guardar datos de un list view a una base de datos estoy trabajndo con adoc

mvallejos
15 de Septiembre del 2004
Sácale la parte de

With cursos.SelectedItem

Ya que por más que recorras los items con un bucle, el item seleccionado siempre es el mismo.

Saludos