rem 检查sql字符串中是否有单引号，有则进行转化
function CheckStr(str)
dim tstr,l,i,ch
l=len(str)
for i=1 to l
ch=mid(str,i,1)
if ch="@#" then
tstr=tstr+"@#"
end if
tstr=tstr+ch
next
CheckStr=tstr
end function
%>
以上资料由动网先锋(http://www.aspsky.net)整理制作，转载请说明出处！
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/
