<%
'***********************************
'Função: formatQuerystr (STR)
'Argumentos: STR, Declaração SQL
'Autor: Alixi
Data: 2007/7/13
'Descrição: formato como string em sql
'Exemplo: <%= formatQuerystr (str)%>
'***********************************
FunctionFormatQueryStr (STR)
DIMNSTR
NSTR = STR
NSTR = Substitua (NSTR, Chr (0), "")
NSTR = Substitua (NSTR, "'", "' '")
NSTR = Substitua (NSTR, "[", "[[]")
NSTR = Substitua (NSTR, "%", "[%]")
formatQuerystr = nstr
Função final
%>