如何循环加入记录??
											VB+SQL+ListView1
    With ListView1
        For i = 1 To ListView1.ListItems.Count
            strQry = "INSERT INTO CheckOuts(username,sex) Values('" & .ListItems(.ListItems.Count).SubItems(1) & "','" & .ListItems(.ListItems.Count).SubItems(2) & "')"
            Call ExecuteSQL(strQry)
        Next
    End With
要怎么才能循环把ListView1中的记录一条一条自动加入到数据库中呢
[此贴子已经被作者于2006-4-10 14:59:58编辑过]



											
	    

	