WHERE clause

[fabiobarreto10]

Gentlemen, I have this code:

Dim Db As Database, Rs As Recordset, Sql As String
Set Db = CurrentDb
Set Rs = Db.OpenRecordset("SELECT CodPassosStatus, DataRealizada FROM TblPassosStatus WHERE CodProduto =" & CodProduto)

In the WHERE condition CodProduto Besides, how do I add CodPassosStatus = & CodPassosStatus.


I tried using AND, it did not work.
Thank you.

[pbaldy]

What exactly did you try? What is the data type of CodPassosStatus? You would have to restart the string after the first variable.

[fabiobarreto10]

Hello, pbaldy. I'm trying the following:


Dim db As Database, RS As Recordset, Sql As String
Set Db = CurrentDb
Set Rs = Db.OpenRecordset ("SELECT CodPassosStatus, DataRealizada FROM WHERE TblPassosStatus CodProduto =" & CodProduto AND CodPassosStatus = "& CodPassosStatus)


I try to only two conditions.
CodPassosStatus is integer. CodProduto a relationship for many CodPassosStatus.


Just have a syntax error in my condition, I am not able to identify.


Thank you.

[pbaldy]

Like I said, you have to restart the string:

Set Rs = Db.OpenRecordset ("SELECT CodPassosStatus, DataRealizada FROM WHERE TblPassosStatus CodProduto =" & CodProduto & " AND CodPassosStatus = " & CodPassosStatus)

[fabiobarreto10]

pbaldy, Perfect. Very, Very Thanks.

[pbaldy]

Happy to help!