I cannot get the query to run with either single quotes or double quotes.

Question

I cannot get the query to run with either single quotes or double quotes.

Maxine Nietz 1

In a table, OrderHistory, PONo is a text field; PID is an autonumber (key) field. POS is a text box on a form POSearchF.

I have the following code:

Dim lsql As DAO.Recordset

Set lsql = "SELECT ORderHistory.PID, OrderHistory.PONo FROM OrderHIstory WHERE (((OrderHIstory.PONo) Like '' & [Forms]![POSearchF]![POS] & ''));"

I cannot get the query to run with either single quotes or double quotes.

Deleted

This comment has been deleted due to a violation of our Code of Conduct. The comment was manually reported or identified through automated detection before action was taken. Please refer to our Code of Conduct for more information.

1 answer

Your answer

Deleted

This comment has been deleted due to a violation of our Code of Conduct. The comment was manually reported or identified through automated detection before action was taken. Please refer to our Code of Conduct for more information.

Answer 1

Karl Donaubauer 3,191

Hi,

It could e.g. look like this:

Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String

Set db = Currentdb
strSQL = "SELECT PID, PONo FROM OrderHistory WHERE PONo = '" & Forms!POSearchF!POS & "'"
Set rs = db.OpenRecordset(strSQL, dbOpenDynaset)

Servus
Karl
Access Forever, News, DevCon
Access-Entwickler-Konferenz AEK

0 comments

Share via

I cannot get the query to run with either single quotes or double quotes.

1 answer

Your answer