www.gusucode.com > 维六酷博客管理系统 1.1源码程序 > article.asp

    <!-- #include file="conn.asp" -->
<!--#include file="include.asp"-->
<!-- #include file="inc/function.asp" -->
<!--#include file="inc/asppage.asp"-->
<%
Dim categoryStr,cid
cid=RequestQueryNum("cid")
Set rs=conn.Execute("Select top 8 * From notebookcategory order by cindex desc, id asc")
Do While Not rs.eof
	categoryStr=categoryStr&"<a href='?cid="& rs("id") &"'class=""STYLE2"">"
	If cid=rs("id") Then
		categoryStr=categoryStr&"<strong class=""white"">"
	End If
	categoryStr=categoryStr&rs("category")
	If cid=rs("id") Then
		categoryStr=categoryStr&"</strong>"
	End If
	categoryStr=categoryStr&"</a>&nbsp;&nbsp;"
rs.MoveNext
Loop
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>日志 文章 <%=siteName%></title>
<link href="css/css.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
body {
	background-color: #000000;
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
body,td,th {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 12px;
	color: #FFFFFF;
}
.STYLE2 {color: #CCCCCC;}
.STYLE3 {font-family: "宋体"}
.STYLE4 {font-size: 10px}

-->
</style>
</head>

<body>
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td align="right"><img src="images/aboutme_r1_c6.jpg" width="276" height="55" border="0" usemap="#Map2"><map name="Map2"><area shape="rect" coords="144,26,211,43" href="default.asp"><area shape="rect" coords="212,26,266,42" href="link.asp"></td>
  </tr>
  <tr>
    <td align="right"><table width="100%" height="294" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td><table width="61%" height="230" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><img src="images/Article_r1_c2.jpg" width="507" height="14"></td>
          </tr>
          <tr>
            <td height="193" valign="top" background="images/xian.jpg">
			<table width="91%" height="164" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td height="57" colspan="2" align="left" valign="top"><img src="images/Article_r2_c3.jpg" width="164" height="57"></td>
              </tr>
              <tr>
                <td height="15" colspan="2" align="left"><span class="STYLE2">&nbsp;&nbsp;&nbsp;&nbsp;<%=categorystr%></span></td>
              </tr>
              <tr>
                <td width="53%" height="184" valign="top"><table width="98%" border="0" cellpadding="0" cellspacing="0">
                    <tr>
					<%
					cid=RequestQueryNum("cid")
					If cid<>0 Then
						sql="Select * From notebook Where categoryid="& cid &" order by top desc,id desc"
					Else 
						sql="Select * From notebook order by top desc,id desc"
					End If
					Set mypage=new xdownpage   '创建对象
					mypage.getconn=conn    '得到数据库连接
					mypage.getsql=sql
					mypage.pagesize=14    '设置每一页的记录条数据为5条
					set rs=mypage.getrs()    '返回Recordset
					for i=1 to mypage.pagesize 
						If rs.eof Then
							Exit for
						End If 
						posttime=rs("posttime")
					%>
                      <td align="left" height="20" width="50%"><span class="STYLE3">· </span><a href="articleshow.asp?id=<%=rs("id")%>" class="white" target="_blank"><%=strtrim(rs("title"),24)%></a>&nbsp;&nbsp;<span class="STYLE4">(<%=Year(posttime)%>-<%=Month(posttime)%>-<%=Day(posttime)%>) </span></td>
					 <%
					 If i Mod 2 = 0 then%>
					 </tr> <tr>
					 <%
					 End If
					 rs.MoveNext
					 Next
					 %>
					 </tr>
					 <tr><td colspan="2" align="center"><%mypage.showpage() %></td></tr>
					</table>
				</td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td><img src="images/Article_r4_c2.jpg" width="507" height="23"></td>
          </tr>
        </table></td>
        <td width="38%"><img src="images/Article_r3_c8.jpg" width="386" height="267"></td>
      </tr>
    </table></td>
  </tr>
  <tr>
    <td>
	<table width="100%" border="0" cellspacing="0" cellpadding="0">
	<tr><td height="8"></td></tr>
      <tr>
        <td width="44%" rowspan="3" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="67%"><img src="images/Article_r5_c1.jpg" width="292" height="143"></td>
            <td width="33%" rowspan="2"><img src="images/Article_r5_c5.jpg" width="145" height="256"></td>
          </tr>
          <tr>
            <td><img src="images/Article_r6_c1.jpg" width="292" height="113"></td>
            </tr>
        </table></td>
        <td width="56%" ><img src="images/Articlemuen.jpg" width="563" height="60" border="0" usemap="#Map"></td>
      </tr>
      <tr>
        <td><img src="images/aboutme2_r1_c1.jpg" width="563" height="93"></td>
      </tr>
      <tr>
        <td><img src="images/aboutme2_r3_c1.jpg" width="563" height="103"></td>
      </tr>
    </table></td>
  </tr>
</table>

<map name="Map">
<area shape="rect" coords="20,24,80,52" href="aboutme.asp">
<area shape="rect" coords="85,16,145,47" href="Article.asp">
<area shape="rect" coords="156,17,230,47" href="Multimedia.asp">
<area shape="rect" coords="238,22,296,52" href="photo.asp">
<area shape="rect" coords="307,30,381,54" href="tool.asp">
<area shape="rect" coords="398,25,465,51" href="book.asp">
</map></body>
</html>