南京网络公司 南京软件开发     南京网络公司
南京软件开发   咨询热线:025-83692298
短信平台
短信平台
首页:平台应用 > 建站知识 > 南京网站建设 asp获取参数值与sql安全过滤参数函数代码
联系我们
地址: 南京市江宁区胜太路99号608室
(南岸瑞智NR99文化创意产业园)
邮箱: 1218153373@qq.com
电话: 025-83692298
邮编: 210018

南京网站建设 asp获取参数值与sql安全过滤参数函数代码

发布时间:2013/2/4 发布者:admin 浏览次数:3044
'获取参数值
Function getForm(element,ftype)
Select case ftype
case "get"
getForm=trim(request.QueryString(element))
case "post"
getForm=trim(request.Form(element))
case "both"
if isNul(request.QueryString(element)) then getForm=trim(request.Form(element)) else getForm=trim(request.QueryString(element))
End Select
getForm=replace(getForm,CHR(34),""")
getForm=replace(getForm,CHR(39),"'")
End Function
'主要功能就是获取参数值,比直接用request("element")要安全很多


'过滤参数
Function filterPara(byVal Para)
filterPara=preventSqlin(Checkxss(Para))
End Function

Function preventSqlin(content)
dim sqlStr,sqlArray,i,speStr
sqlStr="<|>|%|%27|'|''|;|*|and|exec|dbcc|alter|drop|insert|select|update|delete|count|master|truncate|char|declare|where|set|declare|mid|chr"
if isNul(content) then Exit Function
sqlArray=split(sqlStr,"|")
for i=lbound(sqlArray) to ubound(sqlArray)
if instr(lcase(content),sqlArray(i))<>0 then
select case sqlArray(i)
case "<":speStr="<"
case ">":speStr=">"
case "'","""":speStr="""
'case ";":speStr=";"
case else:speStr=""
end select
content=replace(content,sqlArray(i),speStr,1,-1,1)
end if
next
preventSqlin=content
End Function
'上面的参数过滤函主要是防止sql注入,加强的防护。
本文关键字:南京网站建设 南京网络公司

[返回首页]  [返回上一页]  
欲了解详细业务,请拨打咨询热线:(电话:15805153373,025-83692298,销售专线:83692298 传真:025-83692298 联系人:张经理)
南京网站建设导航  © 2004-2013 By 南京标杆科技有限公司 Bg, All Rights Reserved 苏ICP备09046710号  网站地图 XML导航
公司地址:南京市江宁区胜太路99号南岸瑞智608室 Email:1218153373@qq.com
特别声明:本站新闻内容仅供参考,部分内容来自互联网,如果侵犯了您的权益,请告知我们,欢迎您提供意见和建议!
友情链接: 南京网络公司