⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 add.asp

📁 一个极好的学生日记管理程序
💻 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="写入日记">
      &nbsp;&nbsp;
      <input type="Reset" name="btnReset" value="我要重来">
      &nbsp; &nbsp;&nbsp;<a href="adminindex.asp?user=<%=user%>"> 不写了,我要返回</a> 
  </form>
</center>
<%session("root")=pass%>
</body>

</html>

⌨️ 快捷键说明

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