Code:
Private Sub txtHomePhone_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
KeyAscii = 0
Dim strSQL As String
strSQL = "SELECT *From Customer Where (HomePhone = txtHomePhone)"


rsOrderInfo!LastName = txtLastName

txtLastName.SetFocus
End If
End Sub


I am Trying to find the match to a home phone number that the user enters and show the results.I have never used SQL and would be thankful for help

Thanks
Paul

------------------