<% dim FYCC_19,FYCC_20,FYCC_21,FYCC_05 dim FYCC_18 FYCC_05="" 'CCLog.txt存放的路径文件夹!需要手动创建!建议留空 '如果输入,请在前面加上符号"/" FYCC_18=1 '防刷新CC攻击关闭与启动,1为启动0为关闭 FYCC_17=1 '防刷新禁止IP功能关闭与启动,1为启动0为关闭 FYCC_19=10 '每分钟刷新次数,将会出现提示 FYCC_20="http://www.163.com" '被封IP后自动转入的页面,建议输入存放病毒的网址!!! 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,请同您的空间商联系,或者查看相关权限设置" 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&"]已经被禁止!如需要解封,请联系本站管理员或在下一个小时的前3分钟内再访问本站" 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&"" '建议输入存放病毒的网址!!! response.end elseif Session("FYCC_01")>FYCC_19 and minute(now())=Session("FYCC_02") then response.write "本站启动防刷新功能,1分钟内只能翻"&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 %> 官方最新版本—寒流魔域
 
 
 
 

使用专用登陆器不可以正常登陆的请   下载寒流魔域专用客户端     [内含登陆器+客户端]

客服咨询QQ
QQ 854845280
官方地址
www.66io.com

 美女玩家
十区 11月9日晚上6点火暴开放!
[介绍] 上线送 3级VIP、无限MS、魔魂+12套装,人物等级!
[介绍] 加入官方超酷骑宠、10多只新宝宝超帅、完善抽奖系统!
[公告] 与官方同步,太古阵法、圆桌骑士、异能者、军团战、PK赛、骑宠拉力赛、家族占领等...
[公告] 游戏快速指南】新手上线送3级VIP,环保练功里免费开3宠、抽奖处可抽到魔魂+17~+20的装备、新宝宝、升级卷、TQ礼包2700魔石卷等很多实用东西!MS商店添加开4宠的中级圣兽结晶
[公告] 【MS狂爆】请打高于人物 或宝宝等级的怪物!否则爆率很低!满地6星,8星XO、2700MS卡、绝对超爽玩法!不变态仿官方!
[介绍] 环保练功NPC可【免费开3宠】//MS商店【宝宝蛋】点 [全部物品]后注意点[翻页]选择N多宝宝蛋等待您的认领!

[介绍] 强列建议在海岛,冰封走廊,打怪爆率更高

[公告] 请使用魔域[3963]以上版本,然后下载本站登陆器即可
查看更多游戏列表请将鼠标移到箭头上 →
[简介] 寒流魔域客户端为[3967]以上的端可正常游戏
[简介] 帐号相关问题查询,请点击[帐号查找]
[简介] 永久不出售全属性装备!纯净仿官方最新版本!
[简介] 开放4,5,6,7级VIP专属地图! 开放255级
[简介] 开放所有地图暴彩色卡,BOSS暴,XO,特球!
[简介] 海岛、冰封为普通玩家打宝的地图,爆出,XO,特球
 为什么升到255级,下面显示最高等级了?
 进游戏为什么黑屏,花屏,白屏 或者 在帐号验证那进不去?
 军团站和PK大赛有奖励吗?
 为什么255级以后好友经验不能领取?
 服务器每天几点维护?
 普通玩家可以带四宠的吗?
 为什么MS商店买不到999朵花?
 

 
抵制不良游戏,拒绝盗版游戏 注意自我保护,谨防受骗上当
适度游戏怡情,沉迷游戏伤身 合理安排时间,享受健康生活
寒流魔域 版权所有 www.66io.com
Copyright 2008-2020 © Thunder Corporation All Right Reserved

本站及所有相关程序,均收集自互联网,如果侵犯到您的利益,请及时告知我们!本站不承担任何法律及连带责任!

本站为『寒流魔域』唯一官方网站 www.66io.com
  尊敬的玩家:
  您好!
  欢迎来到寒流魔域最新版本体验游戏乐趣!
  寒流魔域为官方同步的客户端[3967]无需下载任何补丁,下载寒流魔域登陆器即可,官方网站 www.66io.com 联系QQ 854845280!
  清爽夏日从今天开始,欢迎更多的玩家进入『寒流魔域』,寒流魔域精彩无限,寒流魔域有您更精彩!寒流魔域有您更美好!

寒流魔域网络 www.66io.com