I have an input box (nbtInputBox) whose value I want to include in an SQL statement. It seems that the value is being evaluated properly from the inputbox; however, the value from the field in the table is not (see immediate window result below) Help.
strGetFireSafety = "Select * from tblCompetencyData where txtLogin = " & Chr(34) & rsGetName!txtLogin & Chr(34) _
& " and txtProcedureNo = 'MAN-001'" _
& " and datediff('yyyy',tblCompetencyData!nbtEvalDate," & nbtInputBox & "
= 0"
Set rsGetFireSafety = db.OpenRecordset(strGetFireSafety)
Immediate Window:
?strGetFireSafety
Select * from tblCompetencyData where txtLogin = "CB415" and txtProcedureNo = 'MAN-001' and datediff('yyyy',tblCompetencyData!nbtEvalDate,1/1/00) = 0
strGetFireSafety = "Select * from tblCompetencyData where txtLogin = " & Chr(34) & rsGetName!txtLogin & Chr(34) _
& " and txtProcedureNo = 'MAN-001'" _
& " and datediff('yyyy',tblCompetencyData!nbtEvalDate," & nbtInputBox & "
Set rsGetFireSafety = db.OpenRecordset(strGetFireSafety)
Immediate Window:
?strGetFireSafety
Select * from tblCompetencyData where txtLogin = "CB415" and txtProcedureNo = 'MAN-001' and datediff('yyyy',tblCompetencyData!nbtEvalDate,1/1/00) = 0