您现在的位置是：网站首页> 编程资料编程资料

ASP 非法字符过滤函数_应用技巧_

2023-05-25 132人已围观

简介 ASP 非法字符过滤函数_应用技巧_

<% 
 '==============================================================检查提交数据合法性 
 Function CheckInput() 
  '--------定义部份------------------ 
  Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr,Kill_IP,WriteSql 
  '自定义需要过滤的字串,用 "|" 分隔 
  Fy_In = "'|;|and|(|)|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare" 
   
   
  Fy_Inf = split(Fy_In,"|") 
  '--------POST部份------------------ 
  If Request.Form <> "" Then 
   For Each Fy_Post In Request.Form 
    For Fy_Xh = 0 To Ubound(Fy_Inf) 
     If Instr(LCase(Request.Form(Fy_Post)),Fy_Inf(Fy_Xh)) <> 0 Then 
      Echo "alert('请不要在参数中包含非法字符！');history.go(-1);" 
      Response.End 
     End If 
    Next 
   Next 
  End If 
  '---------------------------------- 
   
  '--------GET部份------------------- 
  If Request.QueryString <> "" Then 
   For Each Fy_Get In Request.QueryString 
    For Fy_Xh = 0 To Ubound(Fy_Inf) 
     If Instr(LCase(Request.QueryString(Fy_Get)),Fy_Inf(Fy_Xh)) <> 0 Then 
      Echo "alert('请不要在参数中包含非法字符！');history.go(-1);" 
      Response.End 
     End If 
    Next 
   Next 
  End If 
 End Function 
 %>

上一篇：保证asp叶面一定不会出现乱码 UTF8_ASP基础_

下一篇：ASP FSO文件处理函数大全_应用技巧_

您现在的位置是：网站首页> 编程资料编程资料

ASP 非法字符过滤函数_应用技巧_

相关内容

点击排行

本栏推荐

猜你喜欢