Hi People,

I have a ADO recordset i want to open as follows:

sql1 = "select * from Receipts where Custname ='Jack'"
rs.CursorLocation = adUseClient
rs.CursorType = adOpenForwardOnly
rs.LockType = adLockReadOnly
rs.Open sql1, cn

The code above works fine. I'm trying to be more flexible and give the user a text box to provide the own name to search. So I have a textbox called txtCustname.
I modify my code to the following:
sql1 = "select * from Receipts where Custname =txtCustname.txt "
rs.CursorLocation = adUseClient
rs.CursorType = adOpenForwardOnly
rs.LockType = adLockReadOnly
rs.Open sql1, cn

I get the error msg "No value given for one or more required parameters" with rs.Open sql1,cn highlighted.

Where am I getting lost? Thanks for all your replies.

Modify the following:

sql1 = "select * from Receipts where Custname =txtCustname.txt "

with:

sql1 = "select * from receipts where custname = '" & txtCustname.txt & "'"

You need to put single quotes around strings.

Perfect! That Worked. Thank You!