📄 admin_votemod.asp
字号:
<%
Option Explicit
Response.buffer=true
const purviewlevel=3
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<!--#include file="admin_Function.asp" -->
<%
dim votemod,voteid
voteid=trim(request("voteid"))
if voteid="" then
response.redirect("admin_VoteMan.asp")
call closeconn()
end if
votemod=trim(request.form("votemod"))
if votemod="modvote" then
dim title,sele1,answ1,sele2,answ2,sele3,answ3,sele4,answ4,sele5,answ5,sele6,answ6,sele7,answ7,sele8,answ8,addtime,votetype,isnew,rs,errmsg,SuccessMsg
title=trim(request.form("title"))
sele1=trim(request.form("sele1"))
answ1=trim(request.form("answ1"))
sele2=trim(request.form("sele2"))
answ2=trim(request.form("answ2"))
sele3=trim(request.form("sele3"))
answ3=trim(request.form("answ3"))
sele4=trim(request.form("sele4"))
answ4=trim(request.form("answ4"))
sele5=trim(request.form("sele5"))
answ5=trim(request.form("answ5"))
sele6=trim(request.form("sele6"))
answ6=trim(request.form("answ6"))
sele7=trim(request.form("sele7"))
answ7=trim(request.form("answ7"))
sele8=trim(request.form("sele8"))
answ8=trim(request.form("answ8"))
addtime=trim(request.form("addtime"))
votetype=trim(request.form("votetype"))
isnew=trim(request.form("isnew"))
set rs=server.createobject("ADODB.Recordset")
rs.open"select * from vote where voteid="&voteid&"",conn,1,3
rs("title")=title
rs("sele1")=sele1
rs("answ1")=answ1
rs("sele2")=sele2
rs("answ2")=answ2
rs("sele3")=sele3
rs("answ3")=answ3
rs("sele4")=sele4
rs("answ4")=answ4
rs("sele5")=sele5
rs("answ5")=answ5
rs("sele6")=sele6
rs("answ6")=answ6
rs("sele7")=sele7
rs("answ7")=answ7
rs("sele8")=sele8
rs("answ8")=answ8
rs("addtime")=addtime
rs("votetype")=votetype
if isnew="ok" then
rs("isnew")=true
else
rs("isnew")=false
end if
rs.update
rs.close
set rs=nothing
call closeconn()
successmsg=successmsg + "<br><br><li>调查修改成功！</li>"
successmsg=successmsg +"<br><br><li>你可以：［<a href='admin_VoteMan.asp'>返回调查管理面板</a>］</li>"
call ShowSuccessMsg()
end if
dim rsmod
set rsmod=conn.execute("select * from vote where voteid="&voteid&"")
if rsmod.bof or rsmod.eof then
rsmod.close
set rsmod=nothing
call closeconn()
errmsg=errmsg + "<br><br><li>没有要修改的调查！</li>"
errmsg=errmsg +"<br><br><li>你可以：［<a href='admin_VoteMan.asp'>返回调查管理面板</a>］</li>"
call ShowErrMsg()
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加调查</title>
<link href="Style.css" rel="stylesheet" type="text/css">
<script language=javascript>
function checkform()
{
if (document.form1.title.value=="")
{
alert("主题不能为空！");
return false;
}
if (document.form1.sele1.value=="")
{
alert("第一个选项不能为空！");
return false;
}
if (document.form1.sele2.value=="")
{
alert("第二个选项不能为空！");
return false;
}
if (document.form1.addtime.value=="")
{
alert("添加时间不能为空！");
return false;
}
if (document.form1.votetype.value=="")
{
alert("调查类型不能为空！");
return false;
}
}
</script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" class="txt1">欢迎添加新调查（带<span class="txt06">*</span>必填）</td>
</tr>
<tr>
<td align="center" class="txt05">［返回调查管理面板］</td>
</tr>
<tr>
<td><form name="form1" method="post" action="" onsubmit="return checkform();">
<table width="98%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="F5F8F5">
<tr>
<td align="center" class="txt05">主题：
<input name="title" type="text" class="but" id="title" value="<%=rsmod("title")%>" size="80" maxlength="255">
<span class="txt06">*</span></td>
</tr>
<tr>
<td align="center" class="txt05">答案1：
<input name="sele1" type="text" class="but" id="sele1" value="<%=rsmod("sele1")%>" size="60" maxlength="255">
<span class="txt06">*</span>投票数：
<input name="answ1" type="text" class="but" id="answ1" value="<%=rsmod("answ1")%>" size="6" maxlength="20"> </td>
</tr>
<tr>
<td align="center" class="txt05">答案2：
<input name="sele2" type="text" class="but" id="sele2" value="<%=rsmod("sele2")%>" size="60" maxlength="255">
<span class="txt06">*</span>投票数：
<input name="answ2" type="text" class="but" id="answ2" value="<%=rsmod("answ2")%>" size="6" maxlength="20"> </td>
</tr>
<tr>
<td align="center" class="txt05">答案3：
<input name="sele3" type="text" class="but" id="sele3" value="<%=rsmod("sele3")%>" size="60" maxlength="255">
投票数：
<input name="answ3" type="text" class="but" id="answ3" value="<%=rsmod("answ3")%>" size="6" maxlength="20"></td>
</tr>
<tr>
<td align="center" class="txt05">答案4：
<input name="sele4" type="text" class="but" id="sele4" value="<%=rsmod("sele4")%>" size="60" maxlength="255">
投票数：
<input name="answ4" type="text" class="but" id="answ4" value="<%=rsmod("answ4")%>" size="6" maxlength="20"></td>
</tr>
<tr>
<td align="center" class="txt05">答案5：
<input name="sele5" type="text" class="but" id="sele5" value="<%=rsmod("sele5")%>" size="60" maxlength="255">
投票数：
<input name="answ5" type="text" class="but" id="answ5" value="<%=rsmod("answ5")%>" size="6" maxlength="20"></td>
</tr>
<tr>
<td align="center" class="txt05">答案6：
<input name="sele6" type="text" class="but" id="sele6" value="<%=rsmod("sele6")%>" size="60" maxlength="255">
投票数：
<input name="answ6" type="text" class="but" id="answ6" value="<%=rsmod("answ6")%>" size="6" maxlength="20"></td>
</tr>
<tr>
<td align="center" class="txt05">答案7：
<input name="sele7" type="text" class="but" id="sele7" value="<%=rsmod("sele7")%>" size="60" maxlength="255">
投票数：
<input name="answ7" type="text" class="but" id="answ7" value="<%=rsmod("answ7")%>" size="6" maxlength="20"></td>
</tr>
<tr>
<td align="center" class="txt05">答案8：
<input name="sele8" type="text" class="but" id="sele8" value="<%=rsmod("sele8")%>" size="60" maxlength="255">
投票数：
<input name="answ8" type="text" class="but" id="answ8" value="<%=rsmod("answ8")%>" size="6" maxlength="20"></td>
</tr>
<tr>
<td align="center" class="txt05">添加时间：
<input name="addtime" type="text" class="but" id="addtime" value="<%=rsmod("addtime")%>">
<span class="txt06">*</span>类型：
<input name="votetype" type="radio" value="1" checked>
单选
<input type="radio" name="votetype" value="2">
复选<span class="txt06">*</span></td>
</tr>
<tr>
<td align="center" class="txt05">是否为最新调查：
<input name="isnew" type="checkbox" class="but" id="isnew" value="ok" <%if rsmod("isnew")=true then%>checked<%end if%>></td>
</tr>
<tr>
<td align="center" class="tbbgtitle"><input name="Submit" type="submit" class="but" value="修改"> <input name="votemod" type="hidden" id="votemod" value="modvote"></td>
</tr>
</table>
</form></td>
</tr>
</table>
</body>
</html>
<%
rsmod.close
set rsmod=nothing
call closeconn()
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -