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

📄 index.asp

📁 结合了某度和AH的个人主页 功能比较完整
💻 ASP
字号:
<!--#include file="conn.asp" -->
<!--#include file="ubbcode.asp" -->
<%

set rs=server.CreateObject("adodb.recordset")
sql="select * from dairy order by id desc"
rs.open sql,conn,1,3
%>

<html>

<head>
<title>==== 个人主页 ====</title>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta content="Microsoft FrontPage 6.0" name="GENERATOR">
<meta content="FrontPage.Editor.Document" name="ProgId">
<style type="text/css">body         { scrollbar-arrow-color: #b78c68; scrollbar-track-color: #582410; 
               scrollbar-base-color: #582410; scrollbar-dark-shadow-color: 
               #582410 }
</style>
<style title type="text/css">td           { font-weight: normal; font-size: 9pt; line-height: normal; font-style: normal; 
               font-variant: normal }
a            { color: #ffffff; text-decoration: none }
a:link       { color: #471b0a; text-decoration: none }
a:visited    { color: #86540c; text-decoration: none }
a:active     { text-decoration: none }
a:hover      { color: #cea772; text-decoration: underline }
</style>
<bgsound src loop="infinite">
</head>

<body text="#471b0a" vlink="#ffffff" link="#ffffff" bgcolor="#67331f" background="../img/dnacebg2.jpg" topmargin="0">

<div align="center">
  <center>
  <table width="614" height="436" border="0" cellpadding="0" cellspacing="10" bgcolor="#E4C59A">
  <tr><td></td></tr>
      <tr>
        <td valign="center" width="634" height="436">
          <div align="center">
            <table width="600" height="178" border="0" cellpadding="0" cellspacing="0" bgcolor="#E4C59A">
              <tbody>
                <tr>
                  <td width="600" height="99">
                    <p align="center">
      <img border="0" src="img/bgtop.jpg" width="580" height="100"></p>
                  </td>
                </tr>
              <center></center>
                <center>
                <tr>
                  <td width="600" height="37">
                    <table border="0" width="100%" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="12%" align="center"><a href="../index.asp"><img border="0" src="img/index.gif" align="absmiddle" width="50" height="20"></a></td>
                        <td width="12%" align="center"><a href="index.asp"><img border="0" src="img/rj.gif" align="absmiddle" width="50" height="20"></a></td>
                        <td width="12%" align="center"><a href="../pic/index.asp"><img border="0" src="img/xc.gif" align="absmiddle" width="50" height="20"></a></td>
                        <td width="12%" align="center"><a href="../music/index.asp"><img border="0" src="img/y.gif" align="absmiddle" width="50" height="20"></a></td>
                        <td width="13%" align="center"><a href="../new/index.asp"><img src="../img/wen.jpg" width="50" height="20" border="0" align="absmiddle"></a></td>
                        <td width="13%" align="center"><a href="../down/index.asp"><img src="../img/xia.jpg" width="50" height="20" border="0" align="absmiddle"></a></td>
                        <td width="13%" align="center"><a href="../guestbook/index.asp"><img border="0" src="img/gb.gif" align="absmiddle" width="50" height="19"></a>
                        <td width="13%" align="center"><a href="../link/index.asp"><img src="../img/link.gif" width="50" height="20" border="0" align="absmiddle"></a></td>
                      </tr>
                    </table>
                  </td>
                </tr>
                <tr>
                  <td width="600" height="21">
                    <div align="center">
                      <center>
                      <table border="0" width="580" cellspacing="0" cellpadding="0">
                        <tr>
    <td width="600" height="172" align="center" bordercolor="#FFFF99"><table width="500" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="left"><%=now()%></td>
          <td align="right">&nbsp;</td>
        </tr>
      </table>
      <%
	  whichpage=Trim(Request.QueryString("page"))
	  if whichpage="" then
	  page=1
	  else
	  page=whichpage
	  end if
	  if rs.bof and rs.eof then
	  response.Write("还没有日记呢,请添加日记先!")
	  else
	  rs.pagesize =5
      total  = rs.RecordCount
      mypagesize=rs.pagesize
      rs.absolutepage = page
	  pagec=rs.pagecount

	  %>
    <p>
      <br>
      </p>
      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="31">
        <tr>
          <td height="31" width="530"> <font color="#67331F"><strong>心情日记:</strong>记录我的心情点滴......</font> </td>
        </tr>
      </table>
      <!--#include file="content.asp" -->      
	  <p>      
	  <br>
      <br> 
	        
    </td>
                        </tr>
                        
                        <tr>
                          <td width="100%">
                            <p align="center"></td>
                        </tr>
                      </table>
                      </center>
                    </div>
                  </td>
                </tr>
                <tr>
                  <td width="600" height="21">
                    <table border="0" width="100%" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="100%" align="center">&nbsp;</td>
                      </tr>
                      <tr>
                        <td width="100%" align="center"></td>
                      </tr>
                      <tr>
                        <td width="100%" align="center"></td>
                      </tr>
                    </table>
                  </td>
                </tr>
                </tbody>
            </table>
          </div>
        </center></td>
      </tr>
    </tbody>
  </table>
  </center>
</div>

</body>

</html>

⌨️ 快捷键说明

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