⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 这次自已做的美工,可能很难看,但主要是为提高效率,这次全部生成了静态,只有一个链接查看最新文章的列表没有生成,因为我觉得没必要生成,浪费空间大小,那是一个很少用到的功能!这次去掉了很多功能,这个版本主
💻 ASP
字号:
<!--#include file="setep.asp"-->
<html><head>
<title><%=chcopy%><%=chaddr%> </title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv=<%=chaddr%> content=no-cache> 
<meta name="KEYWORDS" content="<%=k_meta%>">
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
	color: #000000;
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-image: url();
}
a {
	font-size: 12px;
	color: #FF66CC;
}
a:link {
	text-decoration: none;
	color: #000000;
}
a:visited {
	text-decoration: none;
	color: #333333;
}
a:hover {
	text-decoration: none;
	color: #990000;
}
a:active {
	text-decoration: none;
	color: #FF0000;
}
.style3 {
	color: #FFFFFF;
	font-weight: bold;
	font-size: 14px;
}
.style4 {color: #FFFFFF}
-->
</style><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>

<script language="javascript">
window.open("广告.asp","","")
</script>

<body>
<script src="ips.asp"></script>
<table width="800" height="60" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr><td background="images/webtop_bg.gif" width="332"><%=k_logo%></td>
<td  background="images/webtop_bg.gif" width="455"><%=k_banner%></td></tr></table>
<table width="800" border="1" align="center" cellpadding="0" cellspacing="0">
  <tr><% set rsfen=conn.execute("select id,art_type from art_type where sid=-1 order by pid")
%>    <td width="100%" height="25" align="left" background="images/22.gif" bgcolor="#FFCC00">&nbsp;&nbsp;&nbsp;<a href="index.htm">首页</a>
    <% do while not rsfen.eof %> | <a href="artical/<%=rsfen("id")%>/1.htm"><%=rsfen("art_type")%></a><% rsfen.movenext 
loop %></td>
  </tr>
</table>
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td scope="col"><%=k_sg%></td>
  </tr>
</table>

<table width="800" height="460" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#F9C250">

  <tr>
    <td width="182" height="458" valign="top" bgcolor="#DCEDDA"><table width="100%" height="280"  border="0" cellpadding="0" cellspacing="0">
    <tr>
     <td height="50" valign="top"><TABLE width="182" border=0>
          <TBODY>
            <TR> 
              <TD height="30" bgColor=#CC9900><STRONG> 数据统计</STRONG></TD>
            </TR>
            <TR> 
              <TD width="182" bgColor=#f2f3f7> 
                <table width="100%"  border="0" bgcolor="#DCEDDA">
						  <%
						  dim zw,zc,jw,zzw
						  zw=conn.execute("select count(*) from art_file")(0)
						  zc=conn.execute("select count(*) from goods")(0)
						  jw=conn.execute("select count(*) from art_file where arttime=#"&date()&"#")(0)
						  zzw=conn.execute("select count(*) from art_file where arttime=#"&date()-1&"#")(0)
						  %>
                            <tr>
                              <td height="30"><strong>总文章数:</strong><%=zw%></td>
                            </tr>
							   <tr>
                              <td height="30"><strong>总产品数:</strong><%=zc%></td>
                            </tr>
							   <tr>
                              <td height="30"><strong>今日文章数:</strong><font color="red"><%=jw%></font></td>
                            </tr>
							   <tr>
                              <td height="30"><strong>昨日文章数:</strong><%=zzw%></td>
                            </tr>
							
                    </table>
                
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD height=1></TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <SPAN style="LINE-HEIGHT: 13pt"></SPAN><SPAN style="LINE-HEIGHT: 13pt"> 
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD height=1></TD>
                    </TR>
                  </TBODY>
                </TABLE>
              </SPAN></TD>
            </TR>
          </TBODY>
</TABLE><TABLE width="182" border=0>
          <TBODY>
            <TR> 
              <TD height="30" bgColor=#CC9900><STRONG> 最新文章</STRONG></TD>
            </TR>
            <TR> 
              <TD bgColor=#f2f3f7><SPAN style="LINE-HEIGHT: 13pt"> 
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY> <%
						 set rs=conn.execute("select top 15 * from art_file order by id desc")
						 do while not rs.eof
						 %>
                    <TR> 
                      <TD height=15 bgcolor="#DCEDDA"><img src="images/Point.gif" width="12" height="9"><a href='news/<%=rs("type")%>/<%=rs("filename")%>' title="<%=rs("title")%>" target="_blank"><%=left(rs("title"),13)%></a></TD>
                    </TR><%
					rs.movenext
					loop
					rs.close
					set rs=nothing
					%>
                  </TBODY>
                </TABLE>
              
          
              
                </SPAN></TD>
            </TR>
          </TBODY>
        </TABLE>
        </td>
      </tr>
	  <tr>
     <td height="225" valign="top"><TABLE width="182" border=0>
          <TBODY>
            <TR> 
              <TD height="30" bgColor=#CC9900><STRONG> 热点文章</STRONG></TD>
            </TR>
            <TR> 
              <TD bgColor=#f2f3f7><SPAN style="LINE-HEIGHT: 13pt"> 
                <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY><% 
	set new2=conn.execute("select top 15 * from art_file order by tick desc")
		do while not new2.eof %>
                     <TR> 
                      <TD height=15 bgcolor="#DCEDDA"><img src="images/article_common.gif"><a href='news/<%=new2("type")%>/<%=new2("filename")%>' title="<%=new2("title")%>" target="_blank"><%=left(new2("title"),13)%></a></TD>
                    </TR><%
					new2.movenext
					loop
					new2.close
					set new2=nothing
					%>
                  </TBODY>
                </TABLE>
           
                
                </SPAN></TD>
            </TR>
          </TBODY>
        </TABLE></td>
      </tr>
    </table></td><td width="612" valign="top" bgcolor="#E2E1CF"><table width="610" height="29"  border="1" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC" bgcolor="#999999">
 <form name="search" method="post" action="search.asp"> 
 <tr>   <td width="606" scope="col">      &nbsp;文章搜索:
<input type="text" name="search">
      <select name="seaguan" id="seaguan">
        <option value="" selected>综合搜索</option>
        <option value="author">作者</option>
        <option value="artical">内容</option>
        <option value="title">标题</option>
      </select>
      
      <input type="submit" name="Submit" value=" 搜 索 ">
      <a href="index_fen.htm">文章分类</a> <a href="news.asp" target="_blank">最新文章</a> </td>
  </tr></form>
</table><table width="100%">
	
					 <%
						set rsy=conn.execute("select id,art_type from art_type where sid=-1 order by pid")
						while not rsy.eof
						%>
					<tr>
					<% for i=1 to 2
					if  rsy.eof then %>
					<td width="50%"></td>
					
					<% else %>
					<td width="50%" height="166" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
					<tr><% id1=rsy("id") %><td width="78%" height="30" bgcolor="#BABACB">&nbsp;<img src="images/arr.gif">&nbsp;<b><a href='artical/<%=id1%>/1.htm' target="_blank"><font color="#cc0000"><%=rsy("art_type")%></font></a></b></td><td width="22%" align="center"  bgcolor="#babacb"><strong>发表时间</strong></td>
					</tr>
					  <% set rsy1=conn.execute("select top 10 * from art_file where type="&id1&" or type in(select id from art_type where sid="&id1&") order by id desc") 
		  do while not rsy1.eof
		  %>
					<tr>
            <td height="15"><img src="images/article_elite.gif" width="9" height="15"><a href=news/<%=rsy1("type")%>/<%=rsy1("filename")%> title=<%=rsy1("title")%> target="_blank"><%=left(rsy1("title"),17)%></a>&nbsp;</td><td align="center">[<%=rsy1("arttime")%>]</td>
          </tr>
							<% rsy1.movenext
		loop
		rsy1.close
		set rsy1=nothing
		%>
					</table></td>
					
					   <% rsy.movenext
						 end if
						 next
						 %> 
				  </tr><% wend %></table></td>
  </tr>
</table>
<table width="800" border="1" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>   <td height="12" colspan="2"><table width="100%" height="62"  border="0" align="right" cellpadding="0" cellspacing="0">
         <TBODY> <tr>
            <td bordercolor="#ECE9D8" bgcolor="#0A468F"><div align="center" class="style4"><span class="style3">Copyright @ <%=chtime%>&nbsp; <%=chaddr%> <%=chcopy%>版权所有<br>
                    公司地址:<%=chcom%> 电话:<%=chtel%> 邮编:<%=chyou%><br>
                  email:<%=chemail%></span><br>
</div></td>
          </tr></TBODY>
</table></td></tr></table></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -