[RESOLVED] Invalid Qualifier

[minitech]

I'm not sure where to post this, it's VBA for an Access Database.

I have this in a code section, and it's selecting "text" in the function's code and highlighting the function declaration, telling me that it has an "Invalid Qualifier".

Private Function Escape(ByVal text As String) As String
    Escape = text.Replace("'", "{QUOT}").Replace(vbCrLf, "{CRLF}").Replace(vbCr, "{CR}").Replace(vbLf, "{LF}")
End Function

Is this the right place to post?

[si_the_geek]

Thread moved to "Office Development/VBA" forum (the Database forum is for issues with the database side of things)

You seem to be trying to write VB.Net code... the replace function should be like this:

Escape = Replace(text, "'", "{QUOT}")

To replace multiple items either use multiple lines like that, or nest the calls (eg: Escape = Replace(Replace(text, "'", "{QUOT}"),vbCrLf, "{CRLF}") ).

[minitech]

It works! Thanks!