vote.asp

if you want it,call me.

<!--#include file="conn.asp"-->
<%
response.write request("vote")
Session.Timeout=999
if request("vote")="" then
response.write "对不起,您还没有选择投票选项!"
response.end
end if

if session("vote")="yes" then
response.write "对不起,你已经投过票了,谢谢你的参与!"
response.end
end if
dim rs
dim sql
dim total

set rs=server.createobject("adodb.recordset")
sql="select * from vote where id="&request("vote")&""
rs.open sql,conn,1,3
if not rs.eof then
rs("votenum")=rs("votenum")+1
rs.update
end if
session("vote")="yes"
Response.Redirect "votedetail.asp"
%>