|
|
|
| 作者:未知 |
| 日期:2003-04-16 |
| 人气: |
| 投稿:Andy.m(转贴) |
| 来源:未知 |
| 字体:大 中 小 |
| 收藏:加入浏览器收藏 |
|
|
|
<%
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)整理制作,转载请说明出处!
|
|
|