mybest.asp

日记本（多用户版）V3.0 主要功能： 1、日记本基本功能：添加、修改日记等。 2、日记加密：当日记添加时

<!--#include file="conn.asp"-->
<style type="text/css">
<!--
td,textarea,body{
    font-size:9pt;
	}
table{
	background-color: #ffffff;
	border-top: 1px solid #cccccc;
	border-right: 1px solid #666666;
	border-bottom: 1px solid #666666;
	border-left: 1px solid #cccccc;
}
input{
	background-color: #efefef;
	border-top: 1px solid #cccccc;
	border-right: 1px solid #666666;
	border-bottom: 1px solid #666666;
	border-left: 1px solid #cccccc;
}
.small{font-size:8pt}
-->
</style>

<%
Server.ScriptTimeout=5000
On Error Resume Next 

set rs=server.createobject("adodb.recordset")
sql="select * from diary where userid="&session("userid")
rs.open sql,conn,1,1
diarynum=rs.recordcount
rs.close

if diarynum<10 then
response.write "<font color=#FF0000>你的日记总数不足10篇，不能推荐自己的日记本。</font>"
response.end

else

    conn.execute("update admin set mybest="&request("best")&" where userid="&session("userid"))

%>

<TABLE cellSpacing=0 cellPadding=0 width=300 align=center border=0>
  <TBODY>
  <TR>
    <TD vAlign=top bgColor=#ffffff height=16>
      </TD>
    </TR>
  <TR>
    <TD vAlign=top bgColor=#ffffff>
<center>自荐日记本设置成功！程序将自动刷新上一页！</center>
<script>opener.window.location.reload()</script>
<meta http-equiv='refresh' content='2;URL=javascript:window.close()'>
</TD></TR></TBODY></TABLE>

<%end if%>