📄 show_lock.asp
字号:
<!--#include file="top.asp"-->
<!--#include file="ubb.asp"-->
<%
'=========================================================
' 随然日记本（多用户版） Version:3.0
' Date: 2004-11-15
' Script Written by 随然(dampure)
' 随然日记本演示地址：http://www.suiran.cn
'=========================================================
' Copyright (C) 2003,2004 真露无香. All rights reserved.
' Web: www.yongzi.com
' Diary:http://www.suiran.cn
'=========================================================
if request("action")="login" then
id=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from diary where id="&id
rs.open sql,conn,1,1
nr=replace(replace(replace(replace(replace(replace(rs("content"),"&","&"),"<","<"),">",">"),chr(13),"<br>"),chr(34),"""),chr(32)," ")
if rs("readpass")="" then
set rs2=server.createobject("adodb.recordset")
sql2="select * from admin where userid="&rs("userid")
rs2.open sql2,conn,1,1
pass=rs2("readpwd")
rs2.close
else
pass=rs("readpass")
end if
if pass=request("pass_diary") then
call content()
else
call infor()
end if
else
call login()
end if
sub login()
%>
<TABLE cellSpacing=0 cellPadding=0 width=617 height=18 align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD vAlign=top bgColor=#ffffff>
<TABLE borderColor=#e3e3e3 cellSpacing=0 borderColorDark=#e3e3e3
cellPadding=0 width=609 align=center bgColor=#ffffff border=1
bordercolorlight="#E3E3E3">
<TBODY>
<TR bgColor=#e6e6e6>
<TD bgColor=#e6e6e6><TABLE cellSpacing=0 cellPadding=0 width="90%" align=center border=0>
<TBODY>
<TR>
<TD vAlign=top bgColor=#ffffff> <FORM name=form1 action=show_lock.asp?action=login method=post>
<TABLE cellSpacing=0 cellPadding=6 width="85%" align=center
border=0>
<TBODY>
<TR>
<TD width="43%"> </TD>
<TD width="57%"><INPUT type=hidden value=<%=request("id")%> name=id>
</TD>
</TR>
<TR bgColor=#f5f5f5>
<TD width="43%"> <DIV align=right>请输入此则日记的阅读密码：</DIV></TD>
<TD width="57%"><INPUT class=input type=password size=15
name=pass_diary> </TD>
</TR>
<TR>
<TD width="43%"> <DIV align=right></DIV></TD>
<TD width="57%"><INPUT type=image height=21 src="images/tijiao.gif" width=74 border=0>
</TD>
</TR>
</TBODY>
</TABLE>
</FORM></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=2 width=609 align=center border=0>
<TBODY>
<TR bgColor=#e6e6e6>
<TD width="10%"></TD>
</TR>
</TBODY>
</TABLE></TD></TR>
<TR>
<TD bgColor=#ffffff height=16>
<TABLE cellSpacing=0 cellPadding=3 width=609 align=center bgColor=#9c9a9d
border=0>
<TBODY>
<!--#include file="foot.asp"-->
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
</DIV></TD></TR></TBODY></TABLE>
</BODY></HTML>
<%end sub%>
<%sub content()%>
<TABLE cellSpacing=0 cellPadding=0 width=617 align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width=609 align=center bgColor=#636562
border=0>
<TBODY>
<TR>
<TD>
</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=617 align=center border=0>
<TBODY>
<TR>
<TD vAlign=top align=middle bgColor=#ffffff>
<TABLE height=2 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=2>
<TD bgColor=#f7f7f7 height=2></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=609 align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD width=13>
<DIV align=left><FONT color=#996600 size=2></FONT></DIV></TD>
<TD width=402>
<DIV align=right><FONT color=#996600 size=2></FONT> </DIV></TD>
<TD width=118>
<DIV align=right><FONT color=#996600 size=2>阅读：<FONT
color=#999999><%=rs("hits")%> </FONT></FONT> </DIV></TD>
<TD width=18>
<DIV align=right></DIV></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top bgColor=#ffffff>
<TABLE cellSpacing=0 cellPadding=0 width=609 align=center border=0>
<TBODY>
<TR>
<TD><IMG height=17 src="images/line_top.gif" width=609></TD></TR>
<TR>
<TD vAlign=top height=134>
<TABLE cellSpacing=0 cellPadding=0 width=609 border=0>
<TBODY>
<TR>
<TD width=11 background=images/line_left.gif
height=180> </TD>
<TD vAlign=top width=584 height=180>
<TABLE cellSpacing=0 cellPadding=0 width=584 border=0>
<TBODY>
<TR>
<TD vAlign=center align=right width="13%"><IMG height=12
src="images/date.gif" width=49></TD>
<TD vAlign=bottom align=left width="25%"><FONT
color=#666666 size=2><%=rs("date")%></FONT></TD>
<TD vAlign=center align=right width="16%"><IMG height=12
src="images/weather.gif" width=86></TD>
<TD vAlign=bottom align=left width="8%"><FONT
face="Arial, Helvetica, sans-serif"><FONT color=#666666
size=2><%=rs("weather")%></FONT></FONT></TD>
<TD vAlign=center align=right width="9%"><IMG height=12
src="images/week.gif" width=54></TD>
<%
select case rs("week")
case 1
findweek="日"
case 2
findweek="一"
case 3
findweek="二"
case 4
findweek="三"
case 5
findweek="四"
case 6
findweek="五"
case 7
findweek="六"
end select
%>
<TD vAlign=bottom align=left width="29%"><FONT
color=#ffffff><FONT face="Arial, Helvetica, sans-serif"
size=2><FONT color=#999999><FONT color=#666666>星期 <%=findweek%>
</FONT></FONT></FONT></FONT></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=584 border=0>
<TBODY>
<TR>
<TD><IMG height=12 src="images/top.gif"
width=584></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=2 width=570 align=center
border=0>
<TBODY>
<TR>
<TD height=50>
<%
set rs3=server.CreateObject ("ADODB.Recordset")
rs3.open "select * from admin",conn,1,3
nickname=rs3("nickname")
rs3.close
%>
<DIV align=center><B><FONT
color=#666666><%=rs("title")%></FONT> </B><FONT
color=#996600> 作者：<%=nickname%></FONT>
</DIV></TD></TR>
<TR>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -