<!--#include file="conn.asp"-->
<html>
<head>
<title>投票主页</title>
</head>
<body>
<%
dim subject,xm1,xm2,xm3,xm4,xm5
set rs=server.createobject("adodb.recordset")
rs.open"select * from vote",conn,1,1
subject=rs("subject")
xm1=rs("xm1")
xm2=rs("xm2")
xm3=rs("xm3")
xm4=rs("xm4")
xm5=rs("xm5")
rs.close
set rs=nothing
if request("act")="save" then
set rsv=server.createobject("adodb.recordset")
rsv.open"select * from vote",conn,1,3
vote=split(rsv("vote"),",")
if request.form("xm1")="" then
vote(0)=vote(0)
elseif request.form("xm1")="1" then
vote(0)=vote(0)+1
rsv("all")=rsv("all")+1
end if
if request.form("xm2")="" then
vote(1)=vote(1)
elseif request.form("xm2")="1" then
vote(1)=vote(1)+1
rsv("all")=rsv("all")+1
end if
if request.form("xm3")="" then
vote(2)=vote(2)
elseif request.form("xm3")="1" then
vote(2)=vote(2)+1
rsv("all")=rsv("all")+1
end if
if request.form("xm4")="" then
vote(3)=vote(3)
elseif request.form("xm4")="1" then
vote(3)=vote(3)+1
rsv("all")=rsv("all")+1
end if
if request.form("xm5")="" then
vote(4)=vote(4)
elseif request.form("xm5")="1" then
vote(4)=vote(4)+1
rsv("all")=rsv("all")+1
end if
rsv("vote")=vote(0)&","&vote(1)&","&vote(2)&","&vote(3)&","&vote(4)&","
rsv.update
rsv.close
set rsv=nothing
end if
%>
<div align="center">
<form name=form1 method=post action=?act=save>
<table width="80%" border="1" cellpadding="1" cellspacing="1">
<tr>
<td align="center">在线投票</td>
</tr>
<tr><td align="center"><%=subject%></td></tr>
<%if xm1<>"" then%>
<tr><td><input type=checkbox name=xm1 value=1><%=xm1%></td></tr>
<%end if%>
<%if xm2<>"" then%>
<tr><td><input type=checkbox name=xm2 value=1><%=xm2%></td></tr>
<%end if%>
<%if xm3<>"" then%>
<tr><td><input type=checkbox name=xm3 value=1><%=xm3%></td></tr>
<%end if%>
<%if xm4<>"" then%>
<tr><td><input type=checkbox name=xm4 value=1><%=xm4%></td></tr>
<%end if%>
<%if xm5<>"" then%>
<tr><td><input type=checkbox name=xm5 value=1><%=xm5%></td></tr>
<%end if%>
<tr align="center"><td>
<input type=submit name=submit value="投票">
<input type=button name=manage value="查看结果" onClick="location.href='view.asp'">
<input type=button name=manage value="管理投票" onClick="location.href='login.asp'">
</td></tr>
</table>
</form>
</div>
</body>
</html>
这段代码哪儿编错了,我找了很久,浏览时还是显示网页有问题,没办法了
