Chapter 8 Building a SQL String
I'm trying to build a SQL String based on frmCriteria just like the book. As the book suggested, I wrote the following code for cmdApply_Click. But, nothing happens.
Can anyone help?
Private Sub cmdApply_Click()
Dim strSQL As String
If Not EntriesValid Then Exit Sub
If Not BuildSQLString(strSQL) Then
MsgBox "There was a problem building the SQL string"
Exit Sub
End If
MsgBox strSQL
CurrentDb.QueryDefs("qryExample").SQL = strSQL
End Sub
|