数据库查询中的特殊字符的问题

", "" & chr(124) & "", 0)
End Function 
有了上面几个函数后，当你在执行一个sql前，请先使用
SQL = "SELECT * FROM SecurityLevel WHERE UID="" & SQLFixup(UserID) & """
SQL = SQL & " AND PWD="" & SQLFixup(Password) & """

……