📄 admin.asp

📁 结合了某度和AH的个人主页功能比较完整
💻 ASP
字号:
<!--#include file=conn.asp-->
<%
if session("admin")<>"admin" then
	response.redirect "../admin/index.asp"
	response.end
end if
%>	
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>投 票 管 理</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<%
dim subject,xm1,xm2,xm3,xm4,xm5,vote,vote1,vote2,vote3,vote4,vote5,all
set rsv=server.createobject("adodb.recordset")
rsv.open "select * from vote",conn,1,1
subject=rsv("subject")
xm1=rsv("xm1")
xm2=rsv("xm2")
xm3=rsv("xm3")
xm4=rsv("xm4")
xm5=rsv("xm5")
all=rsv("all")
vote=split(rsv("vote"),",")
vote1=vote(0)
vote2=vote(1)
vote3=vote(2)
vote4=vote(3)
vote5=vote(4)
rsv.close
set rsv=nothing
if request("act")="save" then
	set rs=server.createobject("adodb.recordset")
	rs.open "select * from vote",conn,1,3
	rs("subject")=request.form("subject")
	rs("xm1")=trim(request.form("xm1"))
	rs("xm2")=trim(request.form("xm2"))
	if trim(request.form("xm3"))="" then
		rs("xm3")=""
	else	
		rs("xm3")=trim(request.form("xm3"))
	end if
	if trim(request.form("xm4"))="" then
		rs("xm4")=""
	else		
		rs("xm4")=trim(request.form("xm4"))
	end if
	if trim(request.form("xm5"))="" then
		rs("xm5")=""
	else		
		rs("xm5")=trim(request.form("xm5"))
	end if	
	rs("vote")=request.form("vote1")+","+request.form("vote2")+","+request.form("vote3")+","+request.form("vote4")+","+request.form("vote5")+","	
	rs("all")=cint(request.form("all"))
	rs.update
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
	response.redirect "admin.asp"
end if			
%>
<script language="javascript">
function check(){
	if(form1.subject.value==""){
		alert("主题不能为空！");
		form1.subject.focus();
		return false;}
	if(form1.xm1.value=="" || form1.vote1.value=="" || form1.xm2.value=="" || form1.vote2.value=="") {
		alert("至少要有两个选项，且要输入各自的票数！");
		form1.xm1.focus();
		return false;}
	if(form1.all.value==""){
		alert("总票数不能为空！");
		form1.all.focus();
		return false;}	
	return true;
	}		
</script>	
<body  background="../img/dnacebg2.jpg"bgcolor="#F0F0F0">

<table border="1" width="100%" id="table1" bordercolorlight="#C0C0C0" cellspacing="0" cellpadding="4" bordercolordark="#FFFFFF" bgcolor="#C7E8FA">
	<tr>
		<td>
		<p align="center"><b>投 票 管 理</b></td>
	</tr>
</table>
<table border="1" width="100%" id="table2" bordercolorlight="#FFFFFF" cellspacing="0" cellpadding="4" bordercolordark="#FF7200" bgcolor="#F3E4AD">
	<form action=?act=save method=post name=form1 onsubmit="return check()">
	<tr>
		<td align="right" width="30%"><b>投票主题：</b></td>
		<td colspan="2"><textarea name="subject" cols="60" rows="5"><%=subject%></textarea></td>
	</tr>
	<tr>
		<td align="right" width="30%"><b>选项1：</b></td>
		<td width="30%"><input type=text name=xm1 size="30" value=<%=xm1%>></td>
		<td><b>票数：</b><input type=text name=vote1 size="15" value=<%=vote1%>></td>
	</tr>
	<tr>
		<td align="right" width="30%"><b>选项2：</b></td>
		<td width="30%"><input type=text name=xm2 size="30" value=<%=xm2%>></td>
		<td><b>票数：</b><input type=text name=vote2 size="15" value=<%=vote2%>></td>
	</tr>
	<tr>
		<td align="right" width="30%"><b>选项3：</b></td>
		<td width="30%"><input type=text name=xm3 size="30" value=<%=xm3%>></td>
		<td><b>票数：</b><input type=text name=vote3 size="15" value=<%=vote3%>></td>
	</tr>
	<tr>
		<td align="right" width="30%"><b>选项4：</b></td>
		<td width="30%"><input type=text name=xm4 size="30" value=<%=xm4%>></td>
		<td><b>票数：</b><input type=text name=vote4 size="15" value=<%=vote4%>></td>
	</tr>
	<tr>
		<td align="right" width="30%"><b>选项5：</b></td>
		<td width="30%"><input type=text name=xm5 size="30" value=<%=xm5%>></td>
		<td><b>票数：</b><input type=text name=vote5 size="15" value=<%=vote5%>></td>
	</tr>
	<tr>
		<td colspan="3">
		<p align="center"><b>总票数：</b><input type=text name=all size="15" value="<%=all%>"></td>
	</tr>
	<tr>
		<td colspan="3">
		<p align="center"><input type=submit name=submit value=修改> &nbsp;<input type=reset name=reset value=清除>&nbsp; 
		<input type=button name=logout onclick="location.href='login.asp?XHType=logout'" value="退出管理"></td>
	</tr>
	</form>
</table>

<p align="center"><b><font color="#FF0000">提示：如果不需要的选项，请将票数设置为0或者为空！</font></b></p>

</body>

</html>
⌨️ 快捷键说明

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