ASP предотвращает GET, POST впрыскивание и серверные атаки, а также записывает IP

Рекомендуется: ASP заменяет последний бит IP -адреса на код экземпляра Asterisk
Сначала сохраните IP -адрес в базе данных, а затем выньте его. Эффект, как показано на рисунке: код выглядит следующим образом: % 'Source ipstr = rs (cip) ipstr = split (ipstr ,.,-1,1) ipstrout = ipstr (0) .ipstr (1) .ipstr (2).* Response.write ipstrout %.

<%

'Предотвратить Get, Post Invection и серверная атака

«Можно использовать этот файл, чтобы включить файл, который необходимо отметить. Давайте объясним, что почтовые атаки и атаки здесь не обязательно атаки. Пожалуйста, обратите внимание на их использование в английской версии.

'Feng Xu модифицирован

session.abandon ()

Dim fxjt111_attack_post, fxjt111_attack_get, fxjt111_attack_system

fxjt111_attack_post = "/atatic.txt" 'Attack Record FXJT111_Attack_post - это имя файла записи после атаки.

fxjt111_attack_get = "/atatic.txt" 'fxjt111_attack_get - это имя файла записи Get Attack

fxjt111_attack_system = "/atatch_system.txt" 'fxjt111_attack_system - это имя файла записи системной атаки

Dim fy_post, fy_get, fy_in, fy_inf, fy_xh, fy_db, fy_dbstr

Fy_in = "'' ★; ★ и ★ exec ★ Вставка ★ выберите ★ Удалить ★ Обновление ★ count ★*★%★ chr ★ mid ★ Master ★ усечение ★ char ★ Объявление"

'-----------------------------------

Fy_inf = split (fy_in, "★")

'-------------------------------------------------------------------------------------------------------------------------

Если запрос.form <> "" Тогда

Для каждого fy_post в reffer.form

Для fy_xh = 0 to ubound (fy_inf)

Если instr (lcase (request.form (fy_post)), fy_inf (fy_xh)) <> 0 then

'Записная атака начинается

Dim validentry_post

Valididentry_post = true

Если нет isempty (session ("login_post")), то validentry_post = false

Если validentry_post тогда

Const forAppending_post = 8

Const create_post = true

Dim fso_post

Dim ts_post

Dim myfilename_post

'Dim Strlog

Dim strtime_post, strip_post, strurll_post, strwords_post

Myfilename_post = server.mappath (fxjt111_attack_post)

Установить fso_post = server.createObject ("scripting.filesystemobject")

Установите ts_post = fso_post.opentextfile (myfilename_post, forappending_post, create_post)

strip_post = request.servervariables ("remote_addr") & ""

if Strip_post = "" Тогда

strip_post = request.servervariables ("http_x_forwarded_for") & ""

конец, если

'strurll_post = request.servervariables ("http_referer")

strwords_post = request.servervariables ("Query_string")

strime_post = now ()

Поделиться: код конверсии полной ширины полной ширины
преобразование JavaScript: Script /**************************Описание параметра:*Str: строка, которая будет преобразована*Флаг: Марк, от 0 и половины до полного, и от 0 до половины до полного*Тип возвращаемого значения: строка ******************************* / Функция dbc2sbc (str, flag) {var i; var result = ''; если (