📄 admin.asp
字号:
<!--#include file="../code/function.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type" />
<title>管理功能页面</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
color: #660000;
}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
a {
font-size: 14px;
color: #0000FF;
}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
color: #FF0000;
}
a:hover {
text-decoration: underline;
color: #000000;
}
a:active {
text-decoration: none;
color: #FFCC00;
}
-->
</style>
<script type="text/javascript">
function show(flag) {
if (document.all){
var request=false;
try {
request = new XMLHttpRequest();
} catch (trymicrosoft)
{
try {
request = new ActiveXObject("Msxml2.XMLHTTP");
} catch (othermicrosoft)
{
try {
request = new ActiveXObject("Microsoft.XMLHTTP");
} catch (failed)
{
request = false;
}
}
}
if (!request)alert("您的浏览器不支持本站，建议使用IE6.0浏览本站!");
var url=encodeURI('admin.asp?pageid='+flag);
request.open("POST",url, true);
request.onreadystatechange = updatePage;
request.send(null);
function updatePage() {
//alert(request.readyState);
if (request.readyState == 4) {
//alert(request.status);
if (request.status == 200) {
var response = request.responseText;
if(response=="redirect"){window.location="admin.asp";}
var str=new Array();
str=response.split("|");
for(i=0;i<str.length;i++){
var str2=str[i].split("~");
//alert(str2[0]+str2[1]);
if (str2[0]=='refresh'){
//alert("login ok!");
window.location.reload();
}else if (str2[0]=="comment_ok"){
alert('发表评论成功！');
mainContent.location.reload();
}else if(str2[0]=="msg")
{alert(str2[1]);}else
{
document.getElementById(str2[0]).innerHTML = unescape(str2[1]);
}
}
}else if(request.status == 404) {
alert('请求的页面不存在！');
} else if (request.status == 403) {
alert('您无权访问该页！');
} else
alert("发生错误："+request.status);
}
}
}
}
function ckpass(){
var uname=document.getElementById("uname").value;
var pass1=document.getElementById("pass1").value;
var pass2=document.getElementById("pass2").value;
if(uname.length<5 || uname.length>16)
alert('用户名长度在6~16之间');
else if(pass1.length<6 || pass2.length>16)
alert('密码长度必须在6~16之间。');
else if(pass1!=pass2)
alert('2次输入的密码不一致');
else
show('11&pass='+pass1+'&uname='+uname);
}
</script>
</head>
<body>
<div style="z-index: 101; left: 100px; width: 100%; position: static; top: 100px;
height: 100px">
<%
if request.Cookies("uname")<>"" then
conn_open()
set rs=conn.execute("select * from [管理员] where [用户名]='"&request.Cookies("uname")&"'")
if rs.eof then response.Redirect("adminlog.asp"):response.End()
rs.close()
set rs=nothing
conn_close()
response.Write("欢迎<font color=red>"&request.Cookies("uname")&"</font>登陆，现在时间是："&now()&"<br />请在左边菜单中选择相应的功能！")
else
response.Redirect("adminlog.asp")
response.End()
end if
pageid=rqst("pageid",3)
select case pageid
case 1:
if rqst("delid",3)>0 then
conn_open()
on error resume next
conn.execute("delete * from [教学文件表] where [ID]="&rqst("delid",3))
conn_close()
if err.number<>0 then
response.Write("<script type=text/javascript>alert('删除失败');history.back();</script>")
else
response.Write("<script type=text/javascript>alert('删除成功')</script>")
end if
end if
%>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#000000">
<caption style="border-color:#000000; background-color:#000000; color:#FFFFFF">
教学文件管理
</caption>
<tr style="background:#999999">
<th scope="col">文件名</th>
<th scope="col">添加时间</th>
<th scope="col">操作</th>
</tr>
<%
conn_open()
set rs=conn.execute("select * from [教学文件表] order by [ID]")
if rs.eof then response.Write("<tr><th scope=""col"" colspan=""4"">还没有添加文件。</th></tr>")
do while not rs.eof
%>
<tr>
<th scope="col"><%=rs("文件名")%></th>
<th scope="col"><%=rs("添加时间")%></th>
<th scope="col"><a href="admin.asp?pageid=1&delid=<%=rs("id")%>">删除</a>|<a href="admin.asp?pageid=2&editid=<%=rs("id")%>">编辑</a></th>
</tr>
<%
if not rs.bof then rs.movenext() else exit do
loop
rs.close
set rs=nothing
conn_close()%>
</table>
<%
case 2:
editid=rqst("editid",3)
action=request("do")
if editid<>0 then
conn_open()
set rs=conn.execute("select * from [教学文件表] where [ID]="&editid)
if rs.eof then response.Write("<script type=text/javascript>alert('没有这个文件！');history.back();</script>"):response.End()
filename=rs("文件名")
filec=rs("文件内容")
rs.close
set rs=nothing
conn_close()
end if
if action<>"" then
filename=rqst("filename",1)
filec=rqst("filecontent",1)
if filename="" or filec="" then response.Write("<script type=text/javascript>alert('标题和内容不能为空！');history.back();</script>"):response.End()
if action=0 then
conn_open()
on error resume next
conn.execute("insert into [教学文件表] ([文件名],[文件内容]) values ('"&filename&"','"&filec&"')")
if err.number<>0 then
response.Write("<script type=text/javascript>alert('添加失败');history.back();</script>")
else
response.Write("<script type=text/javascript>alert('添加成功')</script>")
end if
conn_close()
elseif isnumeric(action) then
conn_open()
on error resume next
conn.execute("update [教学文件表] set [文件名]='"&filename&"',[文件内容]='"&filec&"' where [ID]="&action)
if err.number<>0 then
response.Write("<script type=text/javascript>alert('修改失败');history.back();</script>")
else
response.Write("<script type=text/javascript>alert('修改成功')</script>")
end if
conn_close()
end if
end if
%>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#000000">
<caption style="border-color:#000000; background-color:#000000; color:#FFFFFF">
添加教学文件
</caption>
<tr style="background:#999999">
<th scope="col"><div align="left">
<form id="form1" name="form1" method="post" action="admin.asp?pageid=2&do=<%=editid%>">
文件标题：
<input type="text" name="filename" id="filename" value="<%=filename%>" /><br />
文件内容：<br />
<textarea name="filecontent" cols="0" rows="0" style="display:none"><%=filec%></textarea>
<iframe frameborder="0" scrolling="no" height="300" width="100%" name="filecontent" id="filecontent" src="editor/ewebeditor.asp?id=filecontent&style=s_mini"></iframe><br />
<center>
<input name="submit" type="submit" value="提交" />
<input type="reset" name="reset" id="reset" value="重置" />
</center>
</form>
</div></th>
</tr>
</table>
<%
case 3:
if rqst("delid",3)>0 then
conn_open()
on error resume next
conn.execute("delete * from [章节表] where [ID]="&rqst("delid",3))
conn_close()
if err.number<>0 then
response.Write("<script type=text/javascript>alert('删除失败');history.back();</script>")
else
response.Write("<script type=text/javascript>alert('删除成功')</script>")
end if
end if
if request.QueryString("do")="add" then
charpterNo=rqst("zjNo",3)
charpter=rqst("zjName",1)
if charpterNo=0 or charpter="" then
response.Write("<script type=text/javascript>alert('章节编号为数字，章节名称不能为空');history.back();</script>")
else
conn_open()
set rs=conn.execute("select * from [章节表] where [章节编号]="&charpterNo)
if rs.eof then
on error resume next
conn.execute("insert into [章节表] ([章节编号],[章节名称]) values ("&charpterNo&",'"&charpter&"')")
if err.number<>0 then
response.Write("<script type=text/javascript>alert('添加失败');history.back();</script>")
else
response.Write("<script type=text/javascript>alert('添加成功')</script>")
end if
else
on error resume next
conn.execute("update [章节表] set [章节名称]='"&charpter&"' where [章节编号]="&charpterNo)
if err.number<>0 then
response.Write("<script type=text/javascript>alert('修改失败');history.back();</script>")
else
response.Write("<script type=text/javascript>alert('修改成功')</script>")
end if
end if
conn_close()
end if
end if
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -