🚀 go-pugleaf

Hi,
I have a table containing 2 columns, the first is an ID column with random
numbers in Long Integer format.  The second is a text field containing
peoples names.

I am using a ListView object to display the names, howver the ADD method of
the ListView object wont let me display the names using the ID field as the
KEY, it keeps returning INVALID KEY.  Why??

The code is as follows:

'**************************************
'* Wnd is the name of the form
'* LstNames is the name of the ListView Control
'* *************************************


Dim list As ListItem
Set rs = New Recordset
rs.Open "contact", db, adOpenForwardOnly, adLockPessimistic   '*open the
contact table*
Do
    Set list = Wnd.LstNames.ListItems.Add(, rs("contact_id") ,
rs("key_contact"))
Loop While Not rs.EOF

any help would be appreciated
Adam