Visual Basic 6 - da listview a db

buona giornata, il mio nuovo problema è estrarre tutti i campi di una listview e pertarli in un db .

grazie sono disperato!!!!!!!!!!!!!

Dim k As Integer
Dim ins
Dim j As Integer
Dim lista As ListItem
For k = 1 To ListView1.ListItems.Count
ins = ListView1.ListItems(k)
For j = 1 To ListView1.ListItems(k).ListSubItems.Count
ins = ListView1.ListItems(k).SubItems(j)
Next
Next

' cmdSql = "insert into XXX (pippo) values ('" XXXX?XXXX "')"

quindi? dov'é il problema?

fatti un for per estrarre tutti gli item e per ognuno lancia un'insert da sql...