Missing Criteria 1

[ksimmsa]

I’m trying to update the coding for a report. I am having problems with the coding on the form. I have it broken down by certain criteria and they are all working, but one and I can seem to figure this one out. It looking up a number field and I am using the following syntax:

If Me!ChooseQuitCode = True Then
If stLinkCriteria <> "" Then stLinkCriteria = stLinkCriteria & " and "
stLinkCriteria = stLinkCriteria & "[dbo_customers.QuitCode] = " & "#" & ((Me!ChooseQuitCode)) & "#"
End If


Thanks in advance for you help.

 

[HarleyQuinn]

Using the #'s signifies a DATE value.

You could try enclosing your value in '

e.g.

stLinkCriteria = stLinkCriteria & "[dbo_customers.QuitCode] = [red]'[/red]" &  ((Me!ChooseQuitCode)) & "[red]'[/red]"

Hope this helps

HarleyQuinn
---------------------------------
Get the most out of Tek-Tips, read FAQ222-2244 before posting.

 

[ksimmsa]

Thanks, HarleyQuinn, but now i;m getting a the following error: data type mismatch in criteria expression. Also how do i close out this thread?

thanks again.

 

[PHV]

Get rid of the single quotes if QuitCode is defined as numeric.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[ksimmsa]

I changed it to:
If Me!ChooseQuitCode = True Then
If stLinkCriteria <> "" Then stLinkCriteria = stLinkCriteria & " and "
stLinkCriteria = stLinkCriteria & "[dbo_customers.QuitCode] =" & ((Me!ChooseQuitCode))
End If

and it is not recognizing it.

thanks.....I do i close out the thread?

 

[PHV]

If Me!ChooseQuitCode = True
Is dbo_customers.QuitCode a Boolean field ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[ksimmsa]

dbo_customers.QuitCode is a string field.

 

[PHV]

So, you have some logical inconsistency in your criteria.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[ksimmsa]

PHV, thanks. How do i close the tread?

 

[ksimmsa]

Thanks, i got it

If Me!ChooseResultCode = True Then
If stLinkCriteria <> "" Then stLinkCriteria = stLinkCriteria & " and "
stLinkCriteria = stLinkCriteria & "[dbo_customers.QuitCode] = " & ((Str(Trim(Me![SpecificResultCode]))))
End If