Findfirst fails because data item has double quotes inside quotes..... 2

[Pack10]

I am running a find first and getting a syntax error on one of the values in the table.
The data item is Gilette "Boston" Stadium. For background, it dealing with expense items, so someone took someone to a game
and entered in Gilette "Boston" Stadium... but my findfirst is failing because of the double quotes.....how would I code this?

thanks

 

[SkipVought]

FindFirst based on what?

Please post your SQL.

 

[Pack10]

Background
------------
They have an expenses table and a table containing searching terms. I loop thru the expenses table looking for a matching search term
My code is failing on items that have double quotes inside the value ie...Gillette "Boston" Stadium


Do While st = 1

' store search value to be used in criteria
If Not IsNull(rsExpenses!Purpose) Then
strPurpose = rsExpenses!Purpose
End If

' ensure we are at the beginning of the table
rsSearchTerms.MoveFirst
rsSearchTerms.FindFirst "Term Like """ & strPurpose & "*"""

If rsSearchTerms.NoMatch = False Then
' I want to write that record to a table for reporting
Endif

 

[MajP]

Private Sub Command16_Click()
  Dim rs As DAO.Recordset
  Set rs = Me.Recordset
  Dim str As String
  str = Me.Text14
  str = Replace(str, """", """""")
  str = Replace(str, "'", "''")
  rs.FindFirst "txtFld = '" & str & "'"
End Sub

I have in my table
Smith
"Smith"
'Smith'

finds all of them

 

[Pack10]

thANKS , WILL TRY IN THE MORNING

 

[PHV]

Replace this:
rsSearchTerms.FindFirst "Term Like """ & strPurpose & "*"""
with this:
rsSearchTerms.FindFirst "Term Like '" & Replace(strPurpose, "'", "''") & "*'"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Pack10]

Brilliant... Worked great thank you

 

[dhookom]

Pack10,
One or more of these guys deserves a star.

Duane
Hook'D on Access
MS Access MVP

 

[Pack10]

Hi

I did it from my phone last night and just checked it. It didnt save. So I re-entered it.
This site is the best, and I will again send a small token of my appreciation.