showing all records

Hi,

I figured out how do display an individual record from a database. I CANT FIGURE OUT HOW TO SHOW ALL THE RECORDS IN THE SAME WAY!Private

Sub cmdGet_Click()
Dim sName As String
sName = InputBox$("Please enter your name:")
Set RS = DB.OpenRecordset("SELECT * FROM Contact WHERE Name = '" & sName & "'", dbOpenDynaset)
txtName = "" & RS!Name
txtPhone = "" & RS!Phone
txtNotes = "" & RS!Notes
RS.Close
End Sub

Help!

Aknighter

Try a grid instead of a text box. Set your grid's datasource to your recordset using ado and you're good to go!