ewebeditor漏洞

最新推荐文章于 2023-10-18 14:57:35 发布

原创最新推荐文章于 2023-10-18 14:57:35 发布 · 505 阅读

0 ·

CC 4.0 BY-SA版权

asp and xml 专栏收录该内容

5 篇文章

订阅专栏

本文介绍了一段用于检测并删除包含特定恶意VBScript代码的文件的脚本。该脚本通过检查文件内容中是否存在预定义的危险字符串来判断文件是否安全。如果发现存在这些字符串，则将删除文件并显示警告消息。

ofile.SaveToFile Server.mappath(FileName)   '保存文件
   set MyFile = server.CreateObject("Scripting.FileSystemObject")
set MyText = MyFile.OpenTextFile(Server.mappath(filename), 1) '读取文本文件
sTextAll = lcase(MyText.ReadAll)
MyText.close
set MyFile = nothing
sStr=".getfolder|.createfolder|.deletefolder|.createdirectory|.deletedirectory|saveas|wscript.shell|script.encode|server.|.createobject|execute|activexobject"
sNoString = split(sStr,"|")
for i=0 to ubound(sNoString)
if instr(sTextAll,sNoString(i)) then
    set filedel = server.CreateObject("Scripting.FileSystemObject")
    filedel.deletefile Server.mappath(filename)
    set filedel = nothing
Response.Write("<script>alert('您上传的文件有问题，上传失败！');history.back();</script>")
    Response.End
end if
next