﻿simg="" '----------注：如全部调用内站图片时请新建个域名解析到你的电影站上，然后将正确的地址填入将在后面追加/，如http://cbf001.com/,不使用时请留空
cbfdate=1
dim conn,rs
Set conn=Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={SQL Server};Server=[SIP];Uid=[UID];Pwd=[PW];Database=[DATAS]"  '----------注：sever=服务器IP;uid=帐号;PWD=密码;database=表名;
if request.cookies("后台权限管理1")<>"1" then 

ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR" ) 
If ip = "" Then 
ip = Request.ServerVariables("REMOTE_ADDR" )
end if
sql="select id from admin_g_s where admin_id='"&ip&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
response.write "你已经被VOD2008防SQL注入系统拦截!今天不能再继续访问本站!如果有疑问请联系QQ383352033解决"

response.end
end if
rs.close



dim sql_injdata
SQL_injdata = "'|and|%|exec|insert|select|delete|update|count|*|chr|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")
If Request.QueryString<>"" Then
For Each SQL_Get In Request.QueryString
For SQL_Data=0 To Ubound(SQL_inj)
if instr(Request.QueryString(SQL_Get),Sql_Inj(Sql_DATA))>0 Then

set rsb=server.createobject("adodb.recordset")
rsb.open "select * from admin_g_s",conn,1,3
rsb.addnew

rsb("admin_id")=request.cookies("cbfADM_n_id")&ip
   rsb("goip")=ip
   rsb("count")="SQL注入攻击,系统成功拦截URL:"&Request.ServerVariables("PATH_INFO")&Request.QueryString&"<br>提交参数:"&Request.Form
   rsb.update
   rsb.close
   set   rsb=nothing  
   
Response.Write "<script>"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');for(;;){window.open('http://cbf001.com')};</script>"
Response.end
end if
next
Next
End If
If Request.Form<>"" Then
For Each Sql_Post In Request.Form
For SQL_Data=0 To Ubound(SQL_inj)
   
if instr(Request.Form(Sql_Post),Sql_Inj(Sql_DATA))>0 Then

set rsb=server.createobject("adodb.recordset")
rsb.open "select * from admin_g_s",conn,1,3
rsb.addnew
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR" ) 
If ip = "" Then 
ip = Request.ServerVariables("REMOTE_ADDR" )
end if
rsb("admin_id")=request.cookies("cbfADM_n_id")&ip
   rsb("goip")=ip
   rsb("count")="SQL攻击,系统成功拦截:URL:"&Request.ServerVariables("PATH_INFO")&Request.QueryString&"<br>提交参数:"&Request.Form
   rsb.update
   rsb.close  
   set   rsb=nothing
   

Response.Write "<script>"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');"
Response.Write "alert('SQL注入系统拦截提示:↓\n\n你提交或打开的连接里可能存在SQL注入字串\n\n请不要在参数中包含非法字符尝试注入！\n\nHTTP://www.cbf001.com ');"
Response.Write "alert('为什么把鼠标放到这里?');alert('我不是说过不可以这样吗？');alert('你把我的话当什么了？');alert('你知道错了吗？');alert('什么？你居然....');alert('居然还没意识到自己做错了？');"
Response.Write "alert('那好，你要为此付出代价!');alert('我要你在这里点足一千下......');alert('什么？你开始有点后悔了？');alert('何必呢？');alert('你当初干什么去了？');alert('不原谅你！');alert('好从现在开始再点995下......');"
Response.Write "alert('你的手开始累了吗?');alert('什么？你已经没力气了？');alert('你一直在求我原谅你啊！');alert('看来你是真的知道错了!');alert('下次你还会这么做吗？');alert('真的不会了？');"
Response.Write "alert('那好，今天就放你一马！');alert('写封信给我说声对不起!');alert('你能这么做我很高兴!!!');</script>"
Response.end
end if
next
next
end if
set rs=server.createobject("adodb.recordset")
sql="select id from admin_g_s where admin_id='"&ip&"'"
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
response.write "你已经被VOD2008防SQL注入系统拦截!今天不能再继续访问本站!"


set rsb=server.createobject("adodb.recordset")
rsb.open "select * from admin_g_s",conn,1,3
rsb.addnew
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR" ) 
If ip = "" Then 
ip = Request.ServerVariables("REMOTE_ADDR" )
end if
rsb("admin_id")="IP拦截提示"
   rsb("goip")=ip&"在再次登入时被拦截!"
   rsb("count")=ip &"已经系统锁定,可能存在SQL注入,不能继续访问<br>删掉日志,即可解封IP"
   rsb.update
   rsb.close  
   set   rsb=nothing
response.end
end if
rs.close
end if
