• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    asp 判断上传文件中是否存在危险代码
    复制代码 代码如下:

    %
    function CheckFileContent(FileName)
    dim ClientFile,ClientText,ClientContent,DangerString,DSArray,AttackFlag,k
    set ClientFile=Server.CreateObject("Scripting.FileSystemObject")
    set ClientText=ClientFile.OpenTextFile(Server.MapPath(FileName),1)
    ClientContent=LCase(ClientText.ReadAll)
    set ClientText=nothing
    set ClientFile=nothing
    AttackFlag=false
    DangerString=".getfolder|.createfolder|.deletefolder|.createdirectory|.deletedirectory|.saveas|wscript.shell|script.encode|server.|.createobject|execute|activexobject|language=|include|filesystemobject|shell.application"
    DSArray=split(DangerString,"|")

    for k=0 to UBound(DSArray)

    if InStr(ClientContent,DSArray(k))>0 then '判断文件内容中是否包含有危险的操作字符,如有,则必须删除该文件。
    AttackFlag=true
    exit for
    end if

    next

    CheckFileContent=AttackFlag
    end function

    If CheckFileContent("0.jpg")=true then
    Response.Write "危险"
    else
    Response.Write "安全"
    end if
    %>
    您可能感兴趣的文章:
    • ASP如何检测某文件夹是否存在,不存在则自动创建
    • ASP检查文件与目录是否存在的函数代码
    • asp判断某个文件是否存在的函数
    上一篇:asp 取一个数的整数 但不是四舍五入,只要有小数,就取大于这个数的整数
    下一篇:asp 获取url函数小结
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    asp 判断上传文件中是否存在危险代码 asp,判断,上传,文件,中,是否,