index.asp

安全中心整站系统是一个网络安全类整站系统。由七个模块组成

<!--#include file="dbkillercnect.asp"-->
<!--#include file="sqlfiltrate.asp"-->
<%module=request("module")
act=request("act")
typeid=request("type")
id=request("id")

sql="select * from "&front0&"settings"
set settings=conn.execute(sql)

hot_size=settings("se_hot_size")
sitename=settings("se_sitename")
en_name=settings("se_en_name")
sh_name=settings("se_sh_name")	
sendmail=settings("se_sendmail")
siteurl=settings("se_siteurl")
beian=settings("se_beian")
copyright=settings("se_copy")


function SqlStr( data ) 
if data="" then data=" " else:end if 
SqlStr = replace( data, "'", "''" ) 
SqlStr = replace( SqlStr, "&", "&amp;" ) 
SqlStr = replace( SqlStr, " ", "&nbsp;" ) 
SqlStr = replace( SqlStr, "<", "&lt;" )
SqlStr = replace( SqlStr, ">", "&gt;" ) 
SqlStr = replace( SqlStr, VbCr, "<br>" ) 
SqlStr = replace( SqlStr, "'", "'" ) 
SqlStr = replace( SqlStr, CHR(34), "&quot;" ) 
end function

function SqlStr_1( data )
if data="" then data="&nbsp;" else:end if 
SqlStr_1 = replace( data, "'", "''" ) 
SqlStr_1 = replace( SqlStr_1, "&amp;", "&" ) 
SqlStr_1 = replace( SqlStr_1, "&nbsp;", " " ) 
SqlStr_1 = replace( SqlStr_1, "&lt;", "<" )
SqlStr_1 = replace( SqlStr_1, "&gt;", ">" ) 
SqlStr_1 = replace( SqlStr_1, "<br>",VbCr  ) 
SqlStr_1 = replace( SqlStr_1, "'","'"  ) 
end function

function SqlStr_2( data )
if data="" then data="&nbsp;" else:end if 
SqlStr_2 = replace( data, "&nbsp;", " " ) 
end function

function time00()
time00=time
if time00>="00:00:00" and time00<"05:00:00" then welcome="深夜了，请注意休息。" else:end if
if time00>="05:00:00" and time00<"07:00:00" then welcome="早上好，" else:end if
if time00>="07:00:00" and time00<"12:00:00" then welcome="上午好，" else:end if
if time00>="12:00:00" and time00<"13:00:00" then welcome="中午好，" else:end if
if time00>="13:00:00" and time00<"18:00:00" then welcome="下午好，" else:end if
if time00>="18:00:00" and time00<"23:59:59" then welcome="晚上好，" else:end if
response.write welcome
end function


function userip()
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
if userip="" then userip=Request.ServerVariables("REMOTE_ADDR") else:end if
response.write userip
end function

function proxy()
if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
response.write "您是使用IP为"&Request.ServerVariables("REMOTE_ADDR")&"的代理服务器访问的。"
else:end if
end function

function finish()
if module="" or module="links" then co_lor="#F1F1EB" else co_lor="#FFFFFF":end if%>
<p></p><p align="center">完成</p><p></p>
<FORM name=loading>
<DIV align=center>
<P style="MARGIN: 0px; WORD-SPACING: 0px; TEXT-INDENT: 0px"><INPUT style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; FONT-WEIGHT: bolder; PADDING-BOTTOM: 0px; COLOR: #000000; BORDER-TOP-STYLE: none; PADDING-TOP: 0px; FONT-FAMILY: Arial; BORDER-RIGHT-STYLE: none; BORDER-LEFT-STYLE: none; BACKGROUND-COLOR: <%=co_lor%>; BORDER-BOTTOM-STYLE: none" size=45 name=chart>
<BR><INPUT style="BORDER-RIGHT: medium none; BORDER-TOP: medium none; BORDER-LEFT: medium none; COLOR: #000000; BORDER-BOTTOM: medium none; FONT-FAMILY: Arial; BACKGROUND-COLOR: <%=co_lor%>; TEXT-ALIGN: center" size=45 name=percent>
<SCRIPT>var bar = 0  
var line = "||" 
var amount ="||" 
count() 
function count(){ 
bar= bar+2 
amount =amount + line 
document.loading.chart.value=amount 
document.loading.percent.value=bar+"%" 
if (bar<99) 
{setTimeout("count()",50);} 
else 
{window.location = "<%if module="" then response.write "index.asp" else response.write "index.asp?module="&module:end if%>";} 
}</SCRIPT>
<p>3秒钟后自动返回列表</p>		  
<p><a href="<%if module="" then response.write "index.asp" else response.write "index.asp?module="&module:end if%>">若浏览器未跳转请点此返回到列表</a></p>
<%end function

'===================================Articles===================================
if module="articles" then
'=================Addnew=================
if act="addnew_finish" then
if request.form("title")="" or request.form("type")="" or request.form("from")="" or request.form("user")="" or request.form("content")="" then%>
<script>alert("请将每一项填写完整"); history.back(-1)</script>	 
<%nonull=1
else:end if%>
<%ar_title=SqlStr(request.form("title"))
typeid=SqlStr(request.form("type"))
ar_from=SqlStr(request.form("from"))
ar_user=SqlStr(request.form("user"))
ar_content0=SqlStr(request.form("content"))

sql_addnew="insert into "&front0&"articles(ar_title,typeid,ar_from,ar_user,ar_content0,ar_time00) values('"&ar_title&"',"&typeid&",'"&ar_from&"','"&ar_user&"','"&ar_content0&"','"&date()&"')"
if nonull<>1 then
connn.execute(sql_addnew)
else:end if
else:end if
else:end if
%>
<%
if id<>0 then
sql_title="select * from "&front0&"articles where id="&id
set rs_t_ar=conn.execute(sql_title)
sql_title="select * from "&front0&"tools where id="&id
set rs_t_to=conn.execute(sql_title)
sql_title="select * from "&front0&"holes where id="&id
set rs_t_ho=conn.execute(sql_title)
sql_title="select * from "&front0&"exploits where id="&id
set rs_t_ex=conn.execute(sql_title)
sql_title="select * from "&front0&"releases where id="&id
set rs_t_re=conn.execute(sql_title)
else:end if

if module="" then
title0="——"&en_name
class0="checked"
else:end if

if module="articles" then
title0="->安全文档"
class1="checked"
else:end if

if module="tools" then 
title0="->安全工具"
class2="checked"
else:end if

if module="holes" then 
title0="->安全漏洞"
class3="checked'"
else:end if

if module="exploits" then 
title0="->漏洞利用"
class4="checked" 
else:end if

if module="releases" then 
title0="->"&sh_name&"作品"
class5="checked" 
else:end if

if module="studio" then 
title0="->"&sh_name&"工作室"
class6="checked" 
else:end if

if module="forums" then 
title0="->"&sh_name&"社区"
class7="checked" 
else:end if

if module="about" then 
title0="->关于我们"
class8="checked" 
else:end if

'=============================title front=============================
if id<>0 then
if module="" then title1="——"&en_name else:end if
if module="articles" then title1=rs_t_ar("ar_title")&"-" else:end if
if module="tools" then title1=rs_t_to("to_name")&"-" else:end if
if module="holes" then title1=rs_t_ho("ho_name")&"-" else:end if
if module="exploits" then title1=rs_t_ex("ex_name")&"-" else:end if
if module="releases" then title1=rs_t_re("re_name")&"-" else:end if
else:end if
%>
<html>
<title><%=title1%><%=sitename%><%=title0%></title>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="scc,scccn,<%=sitename%>,网络安全,<%=sh_name%>,SCC,S.C.C,bluephantom">
<meta http-equiv="MSThemeCompatible" content="Yes">
<link rel="shortcut icon" href="/favicon.ico">
<link href="images/scc.css" type=text/css rel=stylesheet>
<script language="JavaScript1.2">
scores = new Array(20);var numTotal=0;NS4 = (document.layers) ? 1 : 0;IE4 = (document.all) ? 1 : 0;ver4 = (NS4 || IE4) ? 1 : 0;if (ver4) {    with (document) {        write("<STYLE TYPE='text/css'>");        if (NS4) {            write(".parent {position:absolute; visibility:visible}");            write(".child {position:absolute; visibility:visible}");            write(".regular {position:absolute; visibility:visible}")        }        else {            write(".child {display:none}")        }        write("</STYLE>");    }}function getIndex(el) {    ind = null;    for (i=0; i<document.layers.length; i++) {        whichEl = document.layers[i];        if (whichEl.id == el) {            ind = i;            break;        }    }    return ind;}function arrange() {    nextY = document.layers[firstInd].pageY +document.layers[firstInd].document.height;    for (i=firstInd+1; i<document.layers.length; i++) {        whichEl = document.layers[i];        if (whichEl.visibility != "hide") {            whichEl.pageY = nextY;            nextY += whichEl.document.height;        }    }}function initIt(){    if (!ver4) return;    if (NS4) {        for (i=0; i<document.layers.length; i++) {            whichEl = document.layers[i];            if (whichEl.id.indexOf("Child") != -1) whichEl.visibility = "hide";       }        arrange();    }    else {        divColl = document.all.tags("DIV");        for (i=0; i<divColl.length; i++) {            whichEl = divColl(i);            if (whichEl.className == "child") whichEl.style.display = "none";        }    }}function expandIt(el) {	if (!ver4) return;    if (IE4) {        whichEl1 = eval(el + "Child");		for(i=1;i<=numTotal;i++){			whichEl = eval(scores[i] + "Child");			if(whichEl!=whichEl1) {				whichEl.style.display = "none";			}		}        whichEl1 = eval(el + "Child");        if (whichEl1.style.display == "none") {            whichEl1.style.display = "block";        }        else {            whichEl1.style.display = "none";        }    }    else {        whichEl = eval("document." + el + "Child");		for(i=1;i<=numTotal;i++){			whichEl = eval("document." + scores[i] + "Child");			if(whichEl!=whichEl1) {				whichEl.visibility = "hide";			}		}        if (whichEl.visibility == "hide") {            whichEl.visibility = "show";        }        else {            whichEl.visibility = "hide";        }        arrange();    }}onload = initIt;
</script>
</head>
<body>

<table width='100%' height='80' border='0' cellpadding='1' cellspacing='1' bgcolor='#004E98'>
  <tr>
  <td bgcolor='#004E98' nowrap></td>
  <td bgcolor='#004E98' width='100%' align='center'>
	<img src='images/scccn.gif' width="212" height="40"> </td>
  </tr>
</table>

<div class='pixs2'></div>
<div align='center' class='heads'>
<a href='index.asp' title='返回主页' class='<%=class0%>'>主页</a>
<a href='index.asp?module=articles' title='安全文档' class='<%=class1%>'>安全文档</a>
<a href='index.asp?module=tools' title='安全工具' class='<%=class2%>'>安全工具</a>
<a href='index.asp?module=holes' title='安全漏洞' class='<%=class3%>'>安全漏洞</a>
<a href='index.asp?module=exploits' title='漏洞利用' class='<%=class4%>'>漏洞利用</a>
<a href='index.asp?module=releases' title='<%=sh_name%>作品' class='<%=class5%>'><%=sh_name%>作品</a>
<a href='index.asp?module=studio' title='工作室' class='<%=class6%>'>工作室</a>
<a href='index.asp?module=forums' title='<%=sh_name%>社区' class='<%=class7%>'><%=sh_name%>社区</a>
<a href='index.asp?module=about' title='关于我们' class='<%=class8%>'>关于我们</a>
</div>
<div class="bar"></div>
<%if module="forums" then
if fdoor<>0 then%>
<td><p align=center><%=sh_name%>论坛暂时关闭！！！</p></td></tr>
</table>
</td>
</tr>
</table>
<p><center>
<%else%>
<script>window.location="<%=forums%>"</script>
<%end if
else:end if

if module="" then
dim strsql,rs_ar,i,type_1,title_1,type_2,title_2
strsql="select * from "&front0&"articles order by id desc"
set rs_ar=conn.execute(strsql)
strsql="select * from "&front0&"tools order by id desc"
set rs_to=conn.execute(strsql)
strsql="select * from "&front0&"holes order by id desc"
set rs_ho=conn.execute(strsql)
strsql="select * from "&front0&"exploits order by id desc"
set rs_ex=conn.execute(strsql)
strsql="select * from "&front0&"releases order by id desc"
set rs_re=conn.execute(strsql)
strsql="select * from "&front0&"links"
set rs_li=conn.execute(strsql)
%>
<DIV class=2emboxs>
<DIV class=2emborder>
<P></P></DIV>
<DIV class=content>
<TABLE cellSpacing=0>
  <TBODY>
  <TR>
    <TD align=left width="100%"><IMG height=15 src="images/welcome.gif" 
      width=16 border=0>&nbsp; <%time00()%>欢迎来自<%userip()%>的朋友来到<%=sh_name%>主页！<%proxy()%> 
</TD>
    <TD noWrap>
<%'<IMG height=16 src="images/irc.gif" width=16 border=0>&nbsp;在线交流%>
      &nbsp;&nbsp;&nbsp;<IMG height=16 src="images/add.gif" width=16 
      border=0>&nbsp;<a href="index.asp?module=articles&act=addnew">发表文章</a> 
      &nbsp;&nbsp;&nbsp;<IMG height=15 src="images/enter.gif" width=16 
      border=0>&nbsp;<a href="index.asp?module=forums">进入社区</a> 
    </TD></TR></TBODY></TABLE></DIV></DIV><br>
<TABLE class=position cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD class=left>
<DIV class=boxs>
<DIV class=border>
<P><%=sh_name%>作品</P></DIV>
<DIV class=content>
<FIELDSET class=main><LEGEND><STRONG>作品发布</STRONG></LEGEND>
<P></P>
<%
i=0
do while i<6 and not rs_re.eof
i=i+1

title_re=mid(rs_re("re_name"),1,re_word_1)
if mid(rs_re("re_name"),re_word_1+1,1)<>"" then title_red="......" else title_red="":end if
%>
<P><IMG src="images/releases.gif" width="12" height="16">
<%if rs_re("typeid")="" or rs_re("id")="" then
else
%>
<a href="index.asp?module=releases&act=view&type=<%=rs_re("typeid")%>&id=<%=rs_re("id")%>"><%=title_re&title_red%></a></P>
<%end if
rs_re.movenext
loop
%>
</FIELDSET> 
      <FIELDSET class=main><LEGEND><STRONG>项目发布</STRONG></LEGEND>
      <P></P>
<%=settings("se_project")%>
</FIELDSET> </DIV></DIV></TD>
    <TD class=main>
      <TABLE cellSpacing=1 cellPadding=0 width="95%" align=center 
      bgColor=#004E98 border=0>
        <TBODY>
        <TR>
          <TD vAlign=top bgColor=#ffffff>
            <TABLE height=150 cellSpacing=0 cellPadding=0 width="100%" 
            align=center border=0>
              <TBODY>
              <TR>
                <TD background=images/line.gif bgColor=#1176B0 height=30>
                  <DIV class=caption>文档更新</DIV></TD></TR>
              <TR>
                <TD vAlign=top bgColor=#ffffff height=100>
                  <TABLE cellSpacing=0 cellPadding=1 width="100%" align=center 
                  bgColor=#ffffff border=0>
                    <TBODY>
                    <TR>
                      <TD vAlign=top bgColor=#ffffff>
                    <TR>
<%
i=0
do while i<6 and not rs_ar.eof
i=i+1

type_1=rs_ar("typeid")
if type_1=1 then title_1="安全技术" else:end if
if type_1=2 then title_1="漏洞分析" else:end if
if type_1=3 then title_1="工具介绍" else:end if
if type_1=4 then title_1="系统知识" else:end if
if type_1=5 then title_1="网络知识" else:end if
if type_1=6 then title_1="安全防护" else:end if
if type_1=7 then title_1="原创天空" else:end if
if type_1=8 then title_1="本站公告":end if	  

title_ar=mid(rs_ar("ar_title"),1,ar_word_1)
if mid(rs_ar("ar_title"),ar_word_1+1,1)<>"" then title_ard="......" else title_ard="":end if
%>
<TD noWrap width="10%">·[&nbsp;<A title="所在分类: <%=title_1%>" 
href="index.asp?module=articles&type=<%=rs_ar("typeid")%>"><%=title_1%></A>&nbsp;]</TD>
<TD align=left width="60%">&nbsp;&nbsp;
<%if rs_ar("typeid")="" or rs_ar("id")="" then
else
%>
<A 
title="完整标题: <%=rs_ar("ar_title")%>" 
href="index.asp?module=articles&act=view&type=<%=rs_ar("typeid")%>&id=<%=rs_ar("id")%>"><%=title_ar&title_ard%></A><%end if%></TD>
<TD noWrap width="20%"><%=rs_ar("ar_user")%></TD>
<TD noWrap width="10%"><%=rs_ar("ar_time00")%>&nbsp;&nbsp;</TD></TR>
<%
rs_ar.movenext