📄 jiaoliou_send.asp
字号:
<!--#include file="open.asp" -->
<!--#include file="inc/md5.inc" -->
<%self_name="jiaoliou_send.asp"%>
<%
doing=request.querystring("doing")
if doing="login" then '用户登录
user_id=trim(request.form("user_id"))
pass=trim(request.form("pass"))
if user_id<>"" and pass<>"" and instr(user_id,"'")=0 and instr(user_id,"&")=0 then
pass=ucase(md5(pass))
str="select * from user_teacher where teacher_user='"&user_id&"' and teacher_pass='"&pass&"'"
set rs=conn.execute(str)
if not rs.eof then
session("zzteacher")=true
session("name")=rs("teacher_name")
if rs("teacher_class")="超级管理员" then session("zzadmin")=true end if
else
str="select * from user_student where 学籍号='"&user_id&"' and 密码='"&pass&"'"
set rs=conn.execute(str)
if not rs.eof then
session("zzstudent")=true
session("student_id")=user_id
session("name")=rs("姓名")
session("student_bj")=rs("班级")
end if
end if
end if
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head><!--#include file="inc/css.css" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留溪在线考试(发表学习经验)</title>
</head>
<body topmargin="1">
<!--#include file="top.asp" -->
<!--#include file="menu.asp" -->
<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#ff99cc" bgcolor="#edebdb">
<%if session("zzteacher")=true or session("zzstudent")=true then%>
<tr>
<td height="20" class="unnamed12"><div align="center">用户已登录 用户类别：
<%if session("zzstudent")=true then%>
学生 学籍号：<%=session("student_id")%> 姓名：<%=session("name")%>
<%end if%>
<%if session("zzteacher")=true then%>
教师 姓名：<%=session("name")%>
<%end if%>
<%if session("zzadmin")=true then%>
<a href=system_setup.asp>系统设置</a>
<%end if%>
<a href="jiaoliou.asp">返回</a> <a href="quit.asp?back=<%=self_name%>">退出</a></div></td>
</tr>
<%else%>
<tr>
<td height="20" class="unnamed12"> <form name="form1" method="post" action="<%=self_name%>?doing=login">
<div align="center">用户登录 输入学籍号或用户名：
<input name="user_id" type="text" id="user_id" value=<%=id_disp%> size="20">
密码：
<input name="pass" type="password" id="pass" size="16">
<input type="submit" name="Submit" class="unnamed12" value="登录">
<input type="reset" name="Submit2" class="unnamed12" value="重填">
<a href="reg.asp?back=<%=self_name%>">注册</a> <a href="rereg.asp">忘记密码</a></div>
</td></form>
</tr>
<%end if%>
</table>
<table width="770" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="unnamed4"> </td>
</tr>
</table>
<%if session("zzteacher")=true or session("zzstudent")=true then%>
<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#ff99cc" bgcolor="#edebdb">
<tr>
<td valign="top"> <div align="center" class="unnamed14h20"> <span class="unnamed12H"><font color="#FF0000">
<marquee direction="left" scrolldelay="200">
<font color="#0000FF">此处为大家交流学习经验而设。如果发表与学习无关的话题，一经发现立即删除。</font>
</marquee>
</font></span> </div></td>
</tr>
</table>
<table width="700" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="unnamed4"> </td>
</tr>
</table>
<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#ff99cc" bgcolor="#edebdb">
<tr>
<td valign="top">
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="unnamed10"> </td>
</tr>
</table>
<table width="700" border="1" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" bgcolor="#CCCCCC" class="unnamed18">
<div align="center"><strong>发 表 学 习 经 验</strong></div></td>
</tr>
</table>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<%
if doing="insert" then
jl_title=trim(request.form("jl_title"))
if jl_title="" then
msg="标题不能为空，请输入标题"
else
jl_text=request.form("jl_text")
jl_text=replace(jl_text,chr(13),"<br>")
jl_text=replace(jl_text," "," ")
str="insert into jiaoliou(是否主题,跟贴,标题,内容,图片,发表人,发表日期,发表时间,置顶,浏览数,回应数,回应日期,回应时间,回应人) values(1,0,'"&jl_title&"','"&jl_text&"',' ','"&session("name")&"',#"&date&"#,#"&time&"#,0,0,0,#"&date&"#,#"&time&"#,'"&session("name")&"')"
conn.execute(str)
response.redirect("jiaoliou.asp")
end if
end if
%>
<form name="form2" method="post" action="jiaoliou_send.asp?doing=insert">
<table width="700" border="1" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" class="unnamed12"> 标题：
<input name="jl_title" type="text" id="jl_title" size="86"></td>
</tr>
<tr>
<td height="20" class="unnamed12"> 内容：
<textarea name="jl_text" cols="84" rows="20" id="jl_text"></textarea></td>
</tr>
<tr>
<td height="30"><div align="center">
<input type="submit" name="Submit3" value=" 发 表 ">
<input type="reset" name="Submit4" value=" 重 写 ">
</div></td>
</tr>
</table>
<div align="center"><font color="#FF0000"> <span class="unnamed14h20">
<%if msg<>"" then response.write msg end if%>
</span></font> </div>
</td></form>
</tr>
</table></td>
</tr>
</table>
<%end if%>
<!--#include file="inc/bottom.asp" -->
<%conn.close%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -