jotabe Level: Big Cheese
 Registered: 26-06-2003 Posts: 23
|
Re: Listview
I got it. It is the property subitems from listview. Just for instance :
For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i).Checked = True Then
a = a + 1
Set MyRs = New ADODB.Recordset
MyRs.Open "MyTable", conn, adOpenKeyset, adLockOptimistic
MyRs.Find "MyField=" & ListView1.ListItems(i).SubItems(1), 0, adSearchForward, 1
' here goes other commands.....and so on
End If
Next
Even so, thanks all.
JotaBeBR
|