📄 savevote.asp
字号:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="format.asp"-->
<%
dim itemid,founderr,errmsg,itemname
founderr=false
errmsg=""
if request.querystring("vt_id")="" then
founderr=true
errmsg=errmsg+"<br>"+"<li>你必须指定投票的主题！"
else
if not isInteger(request.querystring("vt_id")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的投票主题的id参数。"
else
vtid=cint(request.querystring("vt_id"))
end if
end if
if request.form("item_id")="" then
founderr=true
errmsg=errmsg+"<br>"+"<li>你必须指定操作的对象！"
else
if not isInteger(request.form("item_id")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的投票选项id参数。"
else
itemid=cint(request.form("item_id"))
end if
end if
if request.form("itemname")="" then
founderr=true
errmsg=errmsg+"<br>"+"<li>你必须指定操作的对象！"
else
itemname=request.form("itemname")
end if
if founderr then
call diserror()
response.end
else
openadmin
sql="update voteitem set item_count = item_count + 1 where item_id="&itemid
conn.execute(sql)
sql="select vt_id from voteitem where item_id="&itemid
set rs=conn.execute(sql)
vtid=rs("vt_id")
sql="select vt_startdate,vt_expiredate from votetopic where vt_id="&vtid
set rs=conn.execute(sql)
vt_startdate=rs("vt_startdate")
vt_expiredate=rs("vt_expiredate")
rs.close
set rs=nothing
days=datediff("d",vt_startdate,vt_expiredate)
cookies_time=dateadd("d",days,date())
response.cookies("npw")("voted")="yes"
response.cookies("npw")("topic")=request.QueryString("vt_name")
response.cookies("npw")("itemname")=request.form("itemname")
response.cookies("npw").expires=cookies_time
closedatabase
%>
<head>
<link rel="stylesheet" href="site_css.css" type="text/css">
<meta http-equiv="refresh" content="1;URL=showvote.asp?vt_id=<%=vtid%>">
</head>
<body bgcolor="#293863">
<p> </p>
<p> </p>
<table width="60%" border="0" cellspacing="1" cellpadding="10" align="center" bgcolor="#000000">
<tr>
<td bgcolor="#E8E8E8" align="center" class="chinese"><img src="images/img.gif" width="18" height="13">
成功!谢谢你的投票</td>
</tr>
</table>
<table width="60%" border="0" cellspacing="1" cellpadding="10" align="center" bgcolor="#293863">
<tr>
<td bgcolor="#FFFFFF" class="chinese" align="center">[<a href="showvote.asp?vt_id=<%=vtid%>">查看结果</a>]</td>
</tr>
</table>
<p> </p>
</body>
<%
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -