📄 add.asp
字号:
<%
user=request("user")
set conn=server.createobject("ADODB.CONNECTION")
conn.open "DBQ="+server.mappath("classsky.asp")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set rs1=server.createobject("adodb.recordset")
sql1="SELECT * from admin"
rs1.open sql1,conn,1,1
set rs2=server.createobject("adodb.recordset")
sql2="SELECT * from user where user='"&user&"'"
rs2.open sql2,conn,1,1
if not rs2.eof then
pass=rs2("pass")
url=rs2("url")
mail=rs2("mail")
sm=rs2("sm")
end if
if session("root")<>pass then
response.redirect "index.asp?user="&user&""
end if
set conn=server.createobject("adodb.connection")
conn.open "DBQ="+server.mappath("classsky.asp")+";DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from txt"
set rs=server.createobject("adodb.recordset")
rs.Open sql,conn,1,3
if request.form("btnadd")="写入日记" and request.form("message")<>"" then
rs.addnew
pic=request.form("xc")
pic="face/" & pic & ".gif"
rs("用户")=user
rs("日")=request.form("day")
rs("月")=request.form("month")
rs("年")=request.form("year")
rs("天气")=request.form("tq")
rs("心情")=pic
timu=trim(request.form("timu"))
memo=trim(request.form("message"))
rs("timu")=timu
rs("日记内容")=memo
rs("保密")=request.form("baomi")
rs("addtime")=now()
rs.update
sql2="SELECT * from user where user='"&user&"'"
Set Rs2=conn.Execute(sql2)
sql2="update user set sm="&sm&"+1 WHERE user='"&user&"'"
conn.execute(sql2)
response.redirect "adminindex.asp?user="&user&""
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>写日记</title>
<style>
BODY { scrollbar-track-color:#eeeeee; SCROLLBAR-FACE-COLOR: #ffffff; FONT-SIZE: 9pt; SCROLLBAR-HIGHLIGHT-COLOR: #ffffff; SCROLLBAR-SHADOW-COLOR: #ffffff; SCROLLBAR-3DLIGHT-COLOR: #ffffff; SCROLLBAR-ARROW-COLOR: #ffffff; FONT-FAMILY: "Verdana"; SCROLLBAR-DARKSHADOW-COLOR: #ffffff;CURSOR: url('images/c.cur')}
select{font-size:8pt;font-family:verdana;background-color:#ffffff;border:1px dotted #cccccc; color:#333333;}
input{font-size:8pt;font-family:verdana;background-color:#ffffff;border-bottom:1px solid #cccccc;border-left:1px solid #cccccc; border-top:0px solid #cccccc;border-right:0px dotted #cccccc;color:#333333;}
textarea{font-size:8pt; font-family:verdana;background-color:#ffffff;border:1px dotted #cccccc;color:#333333;letter-spacing : 1pt ;line-height : 150%}
A {COLOR: #000000; TEXT-DECORATION: none }
A:visited {COLOR: #000000; TEXT-DECORATION: none}
A:active {COLOR: #ffffff; TEXT-DECORATION: none}
A:hover {COLOR: #000000; background-color: #E8FCD0}
td {FONT-SIZE: 9pt; FONT-FAMILY: "Verdana"; color:#3333333;letter-spacing : 1pt ;line-height :14pt;WORD-BREAK: break-all;}
</style>
</head>
<body topmargin="0">
<center>
<img src="images/title.gif" width="197" height="58">
<form action="add.asp?user=<%=user%>" method="POST" name="frmAnnounce">
<script src="ubbcode.js"></script>
<table style="border:1px dotted #999999" border="0" cellspacing="10" cellpadding="0" width="50%">
<tr>
<td align="center">
<table border="0" cellpadding="2" cellspacing="4" width="100%">
<tr>
<td colspan=3 align="center">日记本标题:
<input type="text" name="timu" size="50" value="">
</td>
</tr>
<tr>
<td colspan=3 align="center">今天是
<select name="Year">
<option value="<%=year(now())%>"><%=year(now())%></option>
<option value="2003">2003</option>
<option value="2004" selected>2004</option>
</select>
年
<select name="Month">
<option value="<%=month(now())%>"><%=month(now())%></option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select>
月
<select name="Day">
<option value="<%=day(now())%>"><%=day(now())%></option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
日 </td>
</tr>
<tr>
<td colspan="3" align="center">保密:
<select name="baomi">
<option value="n" selected>公开</option>
<option value="y">保密</option>
</select>
天气:
<select size="1" name="tq">
<option value="晴" selected>晴</option>
<option value="雨">雨</option>
<option value="雪">雪</option>
<option value="多云">多云</option>
<option value="风">风</option>
<option value="冰雹">冰雹</option>
<option value="晴转多云">晴转多云</option>
<option value="多云转雪">多云转雪</option>
<option value="多云转雨">多云转雨</option>
<option value="雾">雾</option>
</select>
表情:
<select size="1" name="xc">
<option value="01" selected>普通</option>
<option value="02">高兴</option>
<option value="03">惊喜</option>
<option value="04">气愤</option>
<option value="05">伤心</option>
<option value="06">痛哭</option>
<option value="07">愉快</option>
<option value="08">随便</option>
<option value="09">开心</option>
</select>
</td>
</tr>
<tr>
<td colspan="3">
<p align="center">
<!--#include file="getubb.asp"-->
</p>
</td>
</tr>
<tr>
<td colspan="3" align="center">
<textarea name="Message" cols="50" rows="12"></textarea>
</td>
</tr>
</table>
</td>
</tr>
</table>
<p>
<input type="submit" name="btnAdd" value="写入日记">
<input type="Reset" name="btnReset" value="我要重来">
<a href="adminindex.asp?user=<%=user%>"> 不写了,我要返回</a>
</form>
</center>
<%session("root")=pass%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -