left.asp

功能强大的日记本实现管理写日记和真实的日记本一样带锁不会让别人看到你的隐私

<table width="96%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="25" align="center" bgcolor="#EEF79D" class="flashTitle">快速进入你的日记本</td>
      </tr>
      <tr>
        <td height="25" align="center"><form id="form2" name="form2" method="get" action="../diary.asp?id=form2.id.value" target="_blank">
          <table width="96%"  border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td height="30" align="center">&nbsp;您的 <span class="liuYanTitle"><strong>ID</strong></span> 号：
                  <input name="id" type="text" id="id" size="12" /></td>
            </tr>
            <tr>
              <td height="40" align="center"><input name="Submit2" type="submit" value="进入我的日记本" />
              </td>
            </tr>
          </table>
        </form>
        </td>
      </tr>
      <tr>
        <td height="25" align="center" bgcolor="#EEF79D" class="flashTitle">日 记 搜 索</td>
      </tr>
      <tr>
        <td><!-- Search Google -->
<center>
<form method="get" action="http://www.google.com/custom" target="google_window">
<table bgcolor="#ffffff">
<tr><td nowrap="nowrap" valign="top" align="left" height="32">
<a href="http://www.google.com/">
<img src="http://www.google.com/logos/Logo_25wht.gif" border="0" alt="Google" align="middle"></img></a>
<br/>
<input type="text" name="q" size="15" maxlength="255" value=""></input>
<input type="submit" name="sa" value="搜索"></input>
<input type="hidden" name="client" value="pub-7753774943472744"></input>
<input type="hidden" name="forid" value="1"></input>
<input type="hidden" name="ie" value="GB2312"></input>
<input type="hidden" name="oe" value="GB2312"></input>
<input type="hidden" name="cof" value="GALT:#9A2C06;GL:1;DIV:#33FFFF;VLC:D03500;AH:center;BGC:99CCFF;LBGC:CCE5F9;ALC:440066;LC:440066;T:336699;GFNT:223472;GIMP:223472;FORID:1;"></input>
<input type="hidden" name="hl" value="zh-CN"></input>
</td></tr></table>
</form>
</center>
<!-- Search Google -->
</td>
      </tr>
    </table>
      <table width="96%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td align="center" class="flashTitle"><script language="JavaScript" src="../avi.js"></script></td>
        </tr>
        <tr>
          <td height="25" align="center" bgcolor="#EEF79D" class="flashTitle">最 新 评 论</td>
        </tr>
		<%
		set rs=server.CreateObject("ADODB.Recordset")
		SQL = "select * from diary_PL order by PL_date desc"
		rs.open SQL,conn,1,1
		
		if not rs.eof then		 
			i=1	
			do while i<=13
			
		%>
        <tr>
          <td height="22" align="left"> <img src="image/arrow.gif" width="8" height="7" hspace="4"><a href="showdiary.asp?id=<%=rs("id")%>"><%=Left(rs("PL_body"),15)%></a></td>
        </tr>
		<%
			i=i+1
			rs.MoveNext
			if rs.eof then exit do end if	
			loop
		rs.close		 
		end if
		%>
      </table>
      <table width="96%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="25" align="center" bgcolor="#EEF79D" class="flashTitle">最 热 日 记</td>
        </tr>
        <%
		SQL = "select * from diary order by look_counter desc"
		rs.open SQL,conn,1,1
		
		if not rs.eof then		 
			i=1	
			do while i<=13
			
		%>
        <tr>
          <td height="22" align="left"><img src="image/arrow.gif" width="8" height="7" hspace="4"><a href="showdiary.asp?id=<%=rs("id")%>"><%=Left(rs("title"),15)%></a></td>
        </tr>
        <%
			i=i+1
			rs.MoveNext
			if rs.eof then exit do end if	
			loop
		rs.close		 
		end if
		%>
      </table>