检查SQL字符串中是否有单引号,有则进行转化.
类别: ASP教程
<%
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
%>
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
%>
- 上一篇: 使用组件搜索
- 下一篇: 判断文章中文字符数量
-= 资 源 教 程 =-
文 章 搜 索