Originally Posted by osemollie
I'm using AdoRs as my recordset object. Change that to your recordset object name.VB Code:
Dim MyItem As ListItem Do While Not AdoRs.EOF Set MyItem = ListView1.ListItems.Add(, , AdoRs.Fields.Item("movieid").Value) MyItem.SubItems(1) = AdoRs.Fields.Item("movietitle").Value MyItem.SubItems(2) = etc 'until all movies in recordset are added AdoRs.MoveNext Loop




Reply With Quote