Функция обнаружения троянов изображений ASP. Поскольку FSO не может прочитать содержимое клиентского файла, он может открыть файл для проверки содержимого только после его загрузки на сервер. Принцип троянского коня: злоумышленники используют такие инструменты, как генератор троянских коней изображений ASP, для объединения обычного изображения и файла троянского коня ASP в файл изображения (т. е. наносящий вред веб-сайту).
Код ASP вставляется после кодирования изображения. Хотя изображение по-прежнему может отображаться нормально, содержимое и размер файла были изменены), а затем загрузите это изображение с помощью функции загрузки файлов, предоставляемой веб-сайтом.
' изображения метода, тем самым достигая цели загрузки троянского коня ASP.
' Метод предотвращения: поскольку этот троян представляет собой комбинацию изображения и трояна, перед загрузкой изображения необходимо проверить содержимое файла. Если содержимое файла является незаконным (то есть содержит вредоносный код),
' запрещено загружать, тем самым блокируя источник троянской атаки. Это первый шаг троянской атаки. Он очень важен и должен быть заблокирован.
'********************************************** * **************************
Скопируйте код кода следующим образом:
'Начинать------------------------------------------------ -------------------------------------------------- --------------------------
функция CheckFileContent(FileName)
dim ClientFile, ClientText, ClientContent, DangerString, DSArray, AttackFlag, k
установите ClientFile=Server.CreateObject(Scripting.FileSystemObject)
set ClientText=ClientFile.OpenTextFile(Server.MapPath(FileName),1)
ClientContent=LCase(ClientText.ReadAll)
установить ClientText=ничего
установить ClientFile=ничего
AttackFlag=ложь
DangerString=.getfolder|.createfolder|.deletefolder|.createdirectory|.deletedirectory|.saveas|wscript.shell|script.encode|server.|.createobject|execute|activexobject|language=|include|filesystemobject|shell.application
DSArray=split(DangerString,|)
для k=0 в UBound(DSArray)
if InStr(ClientContent,DSArray(k))>0 then 'Определить, содержит ли содержимое файла символы опасных операций. Если да, файл необходимо удалить.
AttackFlag=истина
выход для
конец, если
следующий
CheckFileContent=Флаг атаки
конечная функция
'Конец------------------------------------------------ -------------------------------------------------- --------------------------