sub preventrefresh()
dim refreshtime,isrefresh
refreshtime = 10 '防止重新整理時間,單位(秒)
isrefresh = 1 '是否使用防重新整理功能,0=否,1=是
if isrefresh = 1 then
if (not isempty(session("refreshtime"))) and refreshtime > 0 then
if datediff("s", session("refreshtime"), now()) < refreshtime then
response.write "
本頁面起用了防重新整理機制,請不要在"&refreshtime&"秒內連續重新整理本頁面
正在開啟頁面,請稍後……"
response.end
else
session("refreshtime") = now()
end if
else session("refreshtime") = now()
end if
end if
end sub
ASP通用防注
一般加到conn.asp資料庫連線裡就可以了。dim mq nosqlhack allstr,mq nosqlhack str,mq nosqlhack comeurlget,mq nosqlhack comeurlpost,mq nosqlhack get,mq nosqlhack post,mq...
nginx防惡意重新整理
今天公司惡意重新整理 導致系統速度緩慢,通過配置nginx來解決 nginx 配置 http配置 limit conn zone binary remote addr zone totalconnlimitzone 10m 同乙個ip控制最大連線數 limit req zone binary rem...
通用asp防注入程式
防注入把它加到conn裡這樣就ok了 dim sql injdata sql injdata and exec insert select delete update count chr mid master truncate char declare sql inj split sql injda...