Search results

I still receive the same error. Here's the newest evolution of code under that button: Private Sub Command400_Click() On Error GoTo Err_Command400_Click 'Button filters out records depending on the criteria entered in the search fields Dim strWhere As String Dim lngLen As Long Dim stDocName As...

I received a "SYNTAX ERROR - missing operator in query expression" statement that time

I'm not sure if this is what you meant... strWhere = "Report Like " '*" & frmKeyword & "*'" but when I run the search I still get all records rather than the parameters I enter into the text box.

That's what I thought. I actually created a new form (frmkeyword) with just the memo box (tboreport), but the form is linked to the tblreport . The form has a report button for the same report but it's just getting it to search the tblreport.fldreport based on the tboreport in frmkeyword and...

:). Hit me over the head and call me stupid. Do I create a query form? How do I set a variable to it? I have to create a second report and form?

I'm sure this is an easier issue, but I received an error. This is what I have in the button code Private Sub Command400_Click() On Error GoTo Err_Command400_Click 'Button filters out records depending on the criteria entered in the search fields Dim strWhere As String Dim lngLen As Long Dim...

I don't see any errors as of yet. I really appreciate you helping me on this. I'll be sure to give you due credit if this goes anywhere. (Now, of course, I have one last issue. I have a Keyword thread if you are interested).

I believe that did it! I'm going to run a series of tests to verify, and I'll let you know.

if that does work, that would be perfect. I wouldn't be looking for anything not checked.

Is there a way to tell the code to ignore act as if a section of the code isn't even there if the yes/no box is unchecked and move on to the next section? I tried doing it once as this -- IF isnull THEN GOTO a_btnreport_click ELSE IF isnotnull THEN store Where clause for report but it...

Hello, trying to revive this question.

I sent it.

I received a "Syntax Error in WHERE Clause". The debug says - SELECT * FROM TblReport WHERE

sorry it took a bit to respond. I've been watching the elections. I have the original still. I just created a 3rd back up and edited the back up. Should I leave everything except: Dim strWhere As String and remove: strWhere = Left$(strWhere, lngLen) or remove something else?

sure. just one second.

I believe it's in a standard module. I created it in 2007 by going to create>>module rather than entering a module into the form's script.

The module appears as this: Option Compare Database Dim strWhere As String is that what you were asking?

I'm a retard. I got this debug.print report - SELECT * FROM TableName WHERE I forgot to change TableName. I changed it and got this from the debug.print SELECT * FROM TblReport WHERE

I don't have a where clause in the vb code. It's in its own module.

without quotes around the rptIncident, I still receive the same debug error with quotes, I get: Run Time error 3145 Syntax error in where clause