asp 获取参数值与sql安全过滤参数函数代码
来源：爱站网时间：2020-06-15编辑：网友分享
在程序的开发过程中，也有风险很大的操作，这就表示SQL注入有危险，今天爱站技术频道小编就来谈谈asp 获取参数值与sql安全过滤参数函数代码，但是这可以使代码变得安全简洁，感兴趣的朋友就随我们来了解吧！
在程序的开发过程中，也有风险很大的操作，这就表示SQL注入有危险，今天爱站技术频道小编就来谈谈asp 获取参数值与sql安全过滤参数函数代码，但是这可以使代码变得安全简洁，感兴趣的朋友就随我们来了解吧！
复制代码 代码如下:
'获取参数值
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 " 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注入，加强的防护。
其实爱站技术频道介绍的asp.net知识还有很多，上述的asp 获取参数值与sql安全过滤参数函数代码只是冰山一角，后续我们还会继续整理相关的技术资讯给大家。
