I'm trying to insert/save data in the database from Listview:

The code I use:
Code:
For i = 0 To ListView3.ListItems.Count - 1
        With ListView3
        cn.Execute "insert into tempclientPurchases (baseID,invoiceno,pcode,ID,dateout,productdesc,qty,unit,discount,price,amt,salereport,type) values (" & .ListItems(i).Text & ",'" _
        & .ListItems(i).SubItems(1) & "'," & .ListItems(i).SubItems(2) & "," & .ListItems(i).SubItems(3) & ",#" _
        & .ListItems(i).SubItems(4) & "#,'" & .ListItems(i).SubItems(5) & "'," & .ListItems(i).SubItems(6) & ",'" _
        & .ListItems(i).SubItems(7) & "'," & .ListItems(i).SubItems(8) & "," & .ListItems(i).SubItems(9) & "," _
        & .ListItems(i).SubItems(10) & "," & .ListItems(i).SubItems(11) & "," & .ListItems(i).SubItems(12) & ")"
        End With
    Next i
I get Out of bounds error