RE:ListView a Base de datos?Como?
a ver si te sirve esto, lo he modificado un poco, en realidad yo lo utilizo para imprimir el listview, por lo que he modificado varias cosas y se supone que debería funcionar. Pruebalo con cuidado, yo no oo he probado y ten en cuanta que cada paso da de alta un registro nuevo y le realiza el update al final del bucle por cada linea del listview (cambia el listview4 y el adiodc1 por los tuyos).
For i = 1 To ListView4.ListItems.Count
adocd1.recordset.addnew
adodc1.recordset.fields("elprimercampo") = ListView4.ListItems(i) & ""
adodc1.recordset.fields("segundocampo") = ListView4.ListItems(i).SubItems(1) & ""
adodc1.recordset.fields("tercercampo") = ListView4.ListItems(i).SubItems(2) & ""
adodc1.recordset.update
Next i