主頁 > 知識庫 > 飛云寫的防CC攻擊的ASP程序插件 打包下載

飛云寫的防CC攻擊的ASP程序插件 打包下載
熱門標(biāo)簽：咸陽銷售外呼系統(tǒng) 辦理400電話一年多少錢 離線電子地圖標(biāo)注軟件注冊 蘭州智能語音電銷機(jī)器人功能 寧夏怎么申請400電話 為什么外呼系統(tǒng)需要預(yù)存話費呢 外呼回?fù)芟到y(tǒng)圖片 常用地圖標(biāo)注范圍點 企數(shù)外呼系統(tǒng)能用多久
%
'==================
'飛云防CC攻擊ASP程序插件
'建議除必須修改的參數(shù)內(nèi)容外不要修改其他內(nèi)容
'如果需要反饋錯誤或提交意見,可以到落伍(IM286.COM)聯(lián)系 “正版飛云”
'==================

dim FYCC_19,FYCC_20,FYCC_21,FYCC_05
dim FYCC_18

FYCC_05=""
'CCLog.txt存放的路徑文件夾!需要手動創(chuàng)建!建議留空
'如果輸入,請在前面加上符號"/"

FYCC_18=1 
'防刷新CC攻擊關(guān)閉與啟動,1為啟動0為關(guān)閉

FYCC_17=1
'防刷新禁止IP功能關(guān)閉與啟動,1為啟動0為關(guān)閉

FYCC_19=10 
'每分鐘刷新次數(shù),將會出現(xiàn)提示

FYCC_20="http://www.163.com"
'被封IP后自動轉(zhuǎn)入的頁面,建議輸入存放病毒的網(wǎng)址!!!

FYCC_21=21
'惡意刷新幾次將禁止IP

dim realip,proxy
realip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
proxy = Request.ServerVariables("REMOTE_ADDR")
if realip = "" then
GetIp = proxy
else
GetIp = realip
end if

Sub FYCC_03()
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject") 
file = server.mappath(""FYCC_05"/CCLog.txt") 
if not fsoObject.fileexists(file) then 
fsoObject.createtextfile file,true,false 
end if
set tsObject = fsoObject.OpenTextFile(file,8) 
tsObject.Writeline " "GetIp"" 
Set tsObject = Nothing 
Set fsoObject = Nothing 
End Sub

if FYCC_18>0 then
if FYCC_17>0 then
if minute(now())>-1 and minute(now())4 then
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile=objFSO.CreateTextFile(Server.MapPath(""FYCC_05"/CCLog.txt"),True)
objCountFile.Write " "
objCountFile.Close
Set objCountFile=Nothing
Set objFSO = Nothing
end if
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject") 
file = server.mappath(""FYCC_05"/CCLog.txt") 
if not fsoObject.fileexists(file) then 
fsoObject.createtextfile file,true,false 
if err.number>0 then
response.write "您的空間不支持FSO，請同您的空間商聯(lián)系，或者查看相關(guān)權(quán)限設(shè)置"
response.end
end if
end if
Set objCountFile = fsoObject.OpenTextFile(Server.MapPath(""FYCC_05"/CCLog.txt"),1,True)
If Not objCountFile.AtEndOfStream Then fdata = objCountFile.ReadAll
Set objCountFile = Nothing 
if instr(fdata,""GetIp"")>0  then
response.write "您的IP["GetIp"]已經(jīng)被禁止!如需要解封,請聯(lián)系本站管理員或在下一個小時的前3分鐘內(nèi)再訪問本站"
response.end
end if
Set fsoObject = Nothing 
end if

if Session("FYCC_01")>FYCC_19 and minute(now())>Session("FYCC_02") then
Session("FYCC_01")=1
Session("FYCC_02")=minute(now())
elseif Session("FYCC_01")>FYCC_21-1 and minute(now())=Session("FYCC_02") then
if FYCC_17>0 and Session("FYCC_01")>FYCC_21-1 then
Call FYCC_03()
end if
response.redirect ""FYCC_20"" '建議輸入存放病毒的網(wǎng)址!!!
response.end
elseif Session("FYCC_01")>FYCC_19 and minute(now())=Session("FYCC_02") then
response.write "本站啟動防刷新功能,1分鐘內(nèi)只能翻"FYCC_19"頁,請在下一分鐘再刷新本頁面"
Session("FYCC_01")=Session("FYCC_01")+1
response.end
else
if Session("FYCC_01")="" then
Session("FYCC_01")=1
Session("FYCC_02")=minute(now())
else
if minute(now())>Session("FYCC_02") then
Session("FYCC_01")=1
Session("FYCC_02")=minute(now())
else
Session("FYCC_01")=Session("FYCC_01")+1
end if
end if
End if
end if
%>
本地下載

標(biāo)簽：鐵嶺 家電維修 咸陽 泰州 溫州 昌都 麗江 昆明

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《飛云寫的防CC攻擊的ASP程序插件 打包下載》，本文關(guān)鍵詞  飛云,寫的,防,攻擊,的,ASP,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《飛云寫的防CC攻擊的ASP程序插件 打包下載》相關(guān)的同類信息！
  • 本頁收集關(guān)于飛云寫的防CC攻擊的ASP程序插件 打包下載的相關(guān)信息資訊供網(wǎng)民參考！
    • 推薦文章