'******************************
'函数:formatquerystr(str)
'参数:str,sql语句
'作者:阿里西西
'日期:2007/7/13
'描述:格式化sql中的like字符串
'示例:<%=formatquerystr(str)%>
'******************************
function formatquerystr(str)
dim nstr
nstr = str
nstr = replace(nstr,chr(0),"")
nstr = replace(nstr,"'","''")
nstr = replace(nstr,"[","[[]")
nstr = replace(nstr,"%","[%]")
formatquerystr = nstr
end function
%>