📄 index.asp

📁 日记本（多用户版）V3.0 主要功能： 1、日记本基本功能：添加、修改日记等。 2、日记加密：当日记添加时
💻 ASP
📖 第 1 页 / 共 3 页
字号:
上一页 1 23

do while not (rs.eof or err)

%>
              <TR>
                      <TD width=187> <div align="left"><IMG height=5 
                  src="images/dot_04.gif" width=5>&nbsp;<FONT color=#cc6600>推荐：</FONT><A target=_blank href="diary.asp?user=<%=rs("user")%>">《<%=rs("title")%>》</A></div></TD>
                <TD width=181>
                  <DIV align=left>作者：<A target=_blank href="diary.asp?user=<%=rs("user")%>"><%=rs("nickname")%></A></DIV></TD></TR>

<%
rs.movenext
loop 
rs.close
set rs = nothing
end if
%>

</TBODY></TABLE></TD>
          <TD width="30%">
            <DIV align=center><IMG src="images/a_06.jpg"></DIV></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#e3e4e3 
border=0>
  <TBODY>
  <TR>
    <TD bgColor=#c6c7c6>
      <TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
        <TBODY>
        <TR>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=爱情在线" 
            target=_blank><FONT color=#ffffff>爱情在线</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=亲情宽带" 
            target=_blank><FONT color=#ffffff>亲情宽带</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=友情互联" 
            target=_blank><FONT color=#ffffff>友情互联</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=生活彩屏" 
            target=_blank><FONT color=#ffffff>生活彩屏</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=感悟共享" 
            target=_blank><FONT color=#ffffff>感悟共享</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=情绪下载" 
            target=_blank><FONT color=#ffffff>情绪下载</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=往事备份" 
            target=_blank><FONT color=#ffffff>往事备份</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=旅途浏览" 
            target=_blank><FONT color=#ffffff>旅途浏览</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=职场扫描" 
            target=_blank><FONT color=#ffffff>职场扫描</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=学海冲浪" 
            target=_blank><FONT color=#ffffff>学海冲浪</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=琐事录入" 
            target=_blank><FONT color=#ffffff>琐事录入</FONT></A></DIV></TD>
          <TD>
            <DIV align=center><A 
            href="leibie_more.asp?leibie=无类存储" 
            target=_blank><FONT 
      color=#ffffff>无类存储</FONT></A></DIV></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD vAlign=top height=252>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD>&nbsp;</TD>
          <TD>&nbsp;</TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width="96%" align=center border=0>
        <TBODY>
        <TR>
          <TD height=44>
            <TABLE cellSpacing=0 cellPadding=0 width="94%" align=center 
            bgColor=#efefef border=0>
              <TBODY>
			        <TR bgcolor="#DEDBDE"> 
                      <TD colspan="2"> 
                        <div align="left"><img src="images/count.gif" width="244" height="28"></div></TD>
                    </TR>
              <TR>
                      <TD width="40%"><IMG height=144 
                        src="images/special_14.jpg" width=201 
                        border=0></TD>
                      <TD width="60%"> 
                        <TABLE cellSpacing=0 cellPadding=4 width=261 align=center 
                  border=0>
                          <TBODY>
                            <TR>
                              <TD><TABLE cellSpacing=0 cellPadding=0 width="90%" align=center border=0>
                                  <TBODY>
                                    <TR> 
<%
set rscount1=server.createobject("adodb.recordset")
sql="select * from admin"
rscount1.open sql,conn,1,1
usernum=rscount1.recordcount

set rscount2=server.createobject("adodb.recordset")
sql="select * from diary"
rscount2.open sql,conn,1,1
diarynum=rscount2.recordcount

set rscount3=server.createobject("adodb.recordset")
sql="select * from say"
rscount3.open sql,conn,1,1
saynum=rscount3.recordcount
%>
                                      <TD><FONT color=#993333>注册人数：<%=usernum%>人</FONT><BR>
                                        <FONT color=#993333>日记总数：<%=diarynum%>篇</FONT><BR>
                                        <FONT color=#993333>日记评论：<%=saynum%>条</FONT></TD>
                                    </TR>
                                    <TR> 
                                      <TD height=19></TD>
                                    </TR>
                                    <TR> 
                                      <TD height=19>日记查询：</TD>
                                    </TR>
                                    <TR> 
                                      <TD height=18> <FORM name=search action="diary_search.asp" method=post target="_blank">
                                          <TABLE height=24 cellSpacing=0 cellPadding=0 width="100%" border=0 
            boder="0">
                                            <TBODY>
                                              <TR> 
                                                <TD><select id=select name="pl">
                                                    <option 
                    value="title" selected>日记题目</option>
                                                    <option 
                    value="diary">日 记 本</option>
                                                    <option 
                    value="user">用户昵称</option>
                                                  </select></TD>
                                              </TR>
                                              <TR> 
                                                <TD><INPUT id=keyword maxLength=40 size=16 name="se"> 
                                                  <INPUT type=submit value=搜索 name=Submit></TD>
                                              </TR>
                                            </TBODY>
                                          </TABLE>
                                        </FORM></TD>
                                    </TR>
                                  </TBODY>
                                </TABLE></TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD></TR></TBODY></TABLE></TD></TR>
</TBODY></TABLE></TD>
    <TD vAlign=top width=276 height=252>
      <TABLE cellSpacing=0 cellPadding=0 width=270 bgColor=#f7f7f7 border=0>
        <TBODY>
        <TR>
          <TD bgColor=#ffffff>&nbsp;</TD></TR>
        <TR>
          <TD><IMG height=28 src="images/biao_04.gif" 
            width=244></TD></TR>
        <TR>
          <TD>
            <TABLE cellSpacing=0 cellPadding=2 width=264 align=center 
              border=0>
                  <TBODY>

<%
set rs=server.createobject("adodb.recordset")
sql="select * from admin where mybest=1 order by userid desc"
rs.open sql,conn,1,1

if rs.eof and rs.bof then
%>

                    <TR> 
                      <TD width=10> <DIV align=center><IMG height=5 
                  src="images/dot_04.gif" width=5></DIV></TD>
                      <TD width=242><FONT color=#cc6600>暂时还没有自荐日记本！</FONT></div></TD>
                    </TR>

<%
else

do while not (rs.eof or err)

%>

                    <TR> 
                      <TD width=10> <DIV align=center><IMG height=5 
                  src="images/dot_04.gif" width=5></DIV></TD>
                      <TD width=144><A target=_blank href="diary.asp?user=<%=rs("user")%>">《<%=rs("title")%>》</A></div></TD>
                      <TD width=98><A target=_blank href="diary.asp?user=<%=rs("user")%>"><%=rs("nickname")%></A></TD>
                    </TR>

<%
rs.movenext
loop 
rs.close
set rs = nothing
end if
%>

                  </TBODY>
                </TABLE></TD></TR>
</TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#e3e4e3 
border=0>
  <TBODY>
  <TR>
    <TD bgColor=#e3e4e3>
      <TABLE cellSpacing=0 cellPadding=0 width="94%" align=center border=0>
        <TBODY>
        <TR>
          <TD width="12%"><FONT color=#993333><B>动态统计——</B></FONT></TD>
          <TD width="30%"><FONT color=#993333>注册人数：<%=usernum%>人</FONT></TD>
          <TD width="29%"><FONT color=#993333>日记总数：<%=diarynum%>篇</FONT></TD>
          <TD width="29%"><FONT color=#993333>日记评论：<%=saynum%>条</FONT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD height=2><IMG height=3 src="images/blank_01.gif" 
      width=778></TD></TR>
  <TR></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=3 width=778 align=center border=0>
  <TBODY>
  <TR bgColor=#cccccc>
    <TD width="99%">
<iframe width="768" height="40" border=0 marginWidth=0 frameSpacing=0 marginHeight=0 frameBorder=0 noResize marginwidth="0" name="sense" scrolling="no" src="links/links.asp" width="88"></iframe>

</TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD height=2><IMG height=3 src="images/blank_01.gif" 
      width=778></TD></TR>
  <TR></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#e3e4e3 
border=0>
  <TBODY>
  <TR>
    <TD bgColor=#999999>
      <TABLE cellSpacing=0 cellPadding=0 width="94%" align=center border=0>
        <TBODY>
        <TR>
          <TD width="100%"><DIV align=center><FONT color=#ffffff 
            size=2>这里不需要喧嚣，只是想给您一个安静的写日记的空间和心情……</FONT></DIV></TD>
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD bgColor=#636562>
      <DIV align=center><FONT color=#ffffff>2003—2004 All Rights Reserved by 
      真露无香 <a href="http://www.suiran.cn" target="_blank"><FONT color=#ffffff>随然日记本</FONT></a> 程序：<a href="http://www.suiran.cn" target="_blank"><FONT color=#ffffff>随然</FONT></a> </FONT></DIV></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=770 align=center border=0>
  <TBODY>
  <TR>
    <TD>
    </TD></TR></TBODY></TABLE></BODY></HTML>
上一页 1 23
⌨️ 快捷键说明

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