📄 index.asp
字号:
<TR>
<TD align=middle> <TABLE cellSpacing=2 cellPadding=0 width="99%" border=0>
<TBODY>
<TR>
<TD align=middle width=32> <TABLE cellSpacing=0 cellPadding=0 width=20 border=0>
<TBODY>
<TR>
<TD align=middle><IMG height=50
src="images/dushi.gif"
width=19></TD>
</TR>
</TBODY>
</TABLE></TD>
<TD vAlign=top width=175> <TABLE cellSpacing=1 cellPadding=2 width="96%"
border=0>
<TBODY>
<TR>
<TD><A
href="leibie_more.asp?address=北京"
target=_blank>北京</A> <A
href="leibie_more.asp?address=上海"
target=_blank>上海</A> <A
href="leibie_more.asp?address=天津"
target=_blank>天津</A> <A
href="leibie_more.asp?address=重庆"
target=_blank>重庆</A> <A
href="leibie_more.asp?address=安徽"
target=_blank>安徽</A></TD>
</TR>
<TR>
<TD><A
href="leibie_more.asp?address=甘肃"
target=_blank>甘肃</A> <A
href="leibie_more.asp?address=福建"
target=_blank>福建</A> <A
href="leibie_more.asp?address=广东"
target=_blank>广东</A> <A
href="leibie_more.asp?address=广西"
target=_blank>广西</A> <A
href="leibie_more.asp?address=贵州"
target=_blank>贵州</A> </TD>
</TR>
<TR>
<TD><A
href="leibie_more.asp?address=海南"
target=_blank>海南</A> <A
href="leibie_more.asp?address=河北"
target=_blank>河北</A> <A
href="leibie_more.asp?address=河南"
target=_blank>河南</A> <A
href="leibie_more.asp?address=南京"
target=_blank>南京</A> <A
href="leibie_more.asp?address=西安"
target=_blank>西安</A></TD>
</TR>
<TR>
<TD><A
href="leibie_more.asp?address=湖北"
target=_blank>湖北</A> <A
href="leibie_more.asp?address=湖南"
target=_blank>湖南</A> <A
href="leibie_more.asp?address=四川"
target=_blank>四川</A> <A
href="leibie_more.asp?address=其他"
target=_blank>其他省市</A></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD align=middle width=32> </TD>
<TD> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE> </TD>
<TD width=22 height=20><IMG height=160
src="images/kuang_rb.gif"
width=22></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=249 border=0>
<TBODY>
<TR>
<TD vAlign=top><IMG height=11
src="images/kuang_bottom.gif"
width=249></TD></TR></TBODY></TABLE></TD>
<TD vAlign=top width=563 height=474>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=528 align=center border=0>
<TBODY>
<TR>
<TD width="76%">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width="49%"><IMG height=22
src="images/biao_01.gif" width=154></TD>
<TD width="51%"><A
href="diary_more.asp"
target=_blank><IMG height=17 alt=更多公开日记
src="images/more.gif" width=50
border=0></A></TD></TR></TBODY></TABLE></TD>
<TD width="76%"> </TD></TR>
<TR>
<TD vAlign=center width="76%">
<TABLE cellSpacing=0 cellPadding=0 width=380 align=center
border=0><TBODY>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 8 * from diary where lock=1 order by id desc"
rs.open sql,conn,1,1
do while not (rs.eof or err)
if len(rs("title"))>12 then
title=left(rs("title"),12)&"......"
elseif rs("title")="" then
title=left(rs("content"),12)&"......"
else
title=rs("title")
end if
set rs2=server.createobject("adodb.recordset")
sql="select * from admin where userid="&rs("userid")
rs2.open sql,conn,1,1
nickname=rs2("nickname")
user=rs2("user")
nowtime=rs("date")
writeday=cstr(month(nowtime))+"-"+cstr(day(nowtime))
%>
<TR>
<TD width=11><FONT style="FONT-FAMILY: webdings"
color=#800000>4</FONT> </TD>
<TD width=197><A
href="show_diary.asp?id=<%=rs("id")%>"
target=_blank><%=title%></A></TD>
<TD width=116>
<DIV align=center><A
href="diary.asp?user=<%=user%>"
target=_blank><%=nickname%></A></DIV></TD>
<TD width=56>
<DIV align=center><FONT color=#999999><%=writeday%></FONT></DIV></TD></TR>
<%
rs.movenext
loop
rs.close
set rs = nothing
%>
</TBODY></TABLE></TD>
<TD vAlign=center width="76%">
<DIV align=center><A
href="diary_more.asp"
target=_blank><IMG
src="images/a_01.jpg"
border=0></A></DIV></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=6 src="images/line_02.gif"
width=528></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=528 align=center border=0>
<TBODY>
<TR>
<TD width="24%">
<DIV align=center></DIV></TD>
<TD width="76%">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width="73%"><IMG height=22
src="images/biao_02.gif" width=162></TD>
<TD width="27%"><A
href="best_more.asp"
target=_blank><IMG height=17 alt=更多优秀日记
src="images/more.gif" width=50
border=0></A></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD width="24%">
<DIV align=center><IMG
src="images/a_05.jpg"></DIV></TD>
<TD width="76%">
<TABLE cellSpacing=0 cellPadding=0 width=380 align=center
border=0><TBODY>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 8 * from diary where lock=1 order by best desc, id desc"
rs.open sql,conn,1,1
do while not (rs.eof or err)
if len(rs("title"))>12 then
title=left(rs("title"),12)&"......"
elseif rs("title")="" then
title=left(rs("content"),12)&"......"
else
title=rs("title")
end if
set rs2=server.createobject("adodb.recordset")
sql="select * from admin where userid="&rs("userid")
rs2.open sql,conn,1,1
nickname=rs2("nickname")
user=rs2("user")
nowtime=rs("date")
writeday=cstr(month(nowtime))+"-"+cstr(day(nowtime))
%>
<TR>
<TD width=11><FONT style="FONT-FAMILY: webdings"
color=#800000>4</FONT></TD>
<TD width=197><A
href="show_diary.asp?id=<%=rs("id")%>"
target=_blank><%=title%></A></TD>
<TD width=116>
<DIV align=center><A
href="diary.asp?user=<%=user%>"
target=_blank><%=nickname%></A></DIV></TD>
<TD width=56>
<DIV align=center><FONT color=#999999><%=writeday%></FONT></DIV></TD></TR>
<%
rs.movenext
loop
rs.close
set rs = nothing
%>
</TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=6 src="images/line_02.gif"
width=528></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=528 align=center border=0>
<TBODY>
<TR>
<TD width="70%">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width="73%"><IMG height=22
src="images/biao_03.gif" width=191></TD>
<TD width="27%"><A
href="tuijian_more.asp"
target=_blank><IMG height=17 alt=更多推荐日记本
src="images/more.gif" width=50
border=0></A></TD></TR></TBODY></TABLE></TD>
<TD width="30%"> </TD></TR>
<TR>
<TD width="70%">
<TABLE cellSpacing=0 cellPadding=0 width=320 align=center
border=0><TBODY>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from admin where best=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
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -