asp防注入函数
作者:admin 日期:2007-11-07
Function ProtectSQL(sSql)
If ISNull(sSql) Then Exit Function
sSql=Trim(sSql)
If sSql="" Then Exit Function
sSql=Replace(sSql,Chr(0),"")
sSql=Replace(sSql,"'","‘")
sSql=Replace(sSql," ","")
sSql=Replace(sSql,"%","%")
sSql=Replace(sSql,"-","-")
ProtectSQL=sSql
End Function
If ISNull(sSql) Then Exit Function
sSql=Trim(sSql)
If sSql="" Then Exit Function
sSql=Replace(sSql,Chr(0),"")
sSql=Replace(sSql,"'","‘")
sSql=Replace(sSql," ","")
sSql=Replace(sSql,"%","%")
sSql=Replace(sSql,"-","-")
ProtectSQL=sSql
End Function
评论: 0 | 引用: 0 | 查看次数: 2331
发表评论
广告位