• Home
 · 
• Databases/Data Access/DAO/ADO
 · 
• SQLFix

SQLFix

Corrects for reserved SQL characters in SQL queries. This will correct your SQL statement if an apostrophe or 'pipe' character is in the SQL query. It is a better fix than the SQL functions which replace ' with '' because those will actually still fail in certain situations (such as in FindFirst commands).

Inputs
Bad SQL statement as string

Returns
Proper SQL Statement as string

Rate SQLFix

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Public Function SQL_Fix(ByVal sSQL as string) as string
  Dim sTempSQL as string
  'replace apostrophes
  sTempSQL = Replace(sSQL, "'", "' & Chr(39) & '")
  'replace pipe symbols
  SQL_Fix = Replace(sTempSQL, "|", "' & Chr(124) & '")
End Function