Kaydet (Commit) 32cad25f authored tarafından Jean-Pierre Ledure's avatar Jean-Pierre Ledure

Access2Base - FIX Sql errors when apostrophe in table names

Correct replacement of square brackets by quoting string
üst 8010f473
......@@ -1851,7 +1851,7 @@ Const cstSingleQuote = "'"
End If
vSubStrings() = Split(psSql, cstSingleQuote)
For i = 0 To UBound(vSubStrings)
If (i Mod 2) = 0 Then ' Only even substrings are parsed for square brackets
If (i Mod 2) = 0 Or (i = UBound(vSubStrings)) Then ' Only even substrings are parsed for square brackets. Last substring is parsed anyway
vSubStrings(i) = Join(Split(vSubStrings(i), "["), sQuote)
vSubStrings(i) = Join(Split(vSubStrings(i), "]"), sQuote)
End If
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment