书签 分享 收藏 举报 版权申诉 / 12

类型投票系统.docx

  • 文档编号:4391540
  • 上传时间:2023-05-07
  • 格式:DOCX
  • 页数:12
  • 大小:1.27MB

    

 

投票

INDEX.asp

--

functionresearch_onsubmit(){

if(document.research.Options[0].checked==false&&document.research.Options[1].checked==false&&document.research.Options[2].checked==false)

{

alert("错误:

没有选择!

")

returnfalse

}

}

//-->

您认为明年的CBA哪一支队伍能够夺得总冠军?


八一队

上海队

说不清楚

调查结果

ADD.asp

<%

x=request.form("options")

setrs=server.createobject("adodb.recordset")

conn="DBQ="+server.mappath("search.mdb")+";DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};"

sql="updatesearchsetsel"&x&"=sel"&x&"+1whereid=1"

rs.opensql,conn,1,1

setrs=nothing

setconn=nothing

response.write""&chr(13)&"alert('您已经投了票,谢谢您的支持!

');"&"history.back()"&""

%>

 

DISPLAY.asp

<%

dimrs

dimsqlan

dimsela

dimselb

dimselc

dimtotal

conn="DBQ="+server.mappath("search.mdb")+";DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};"

setrs=server.createobject("adodb.recordset")

sqlan="select*fromsearchwhereid=1"

rs.opensqlan,conn,1,1

ifnotrs.eofthen

total=rs("sela")+rs("selb")+rs("selc")

sela=(rs("sela")/total)*100

selb=(rs("selb")/total)*100

selc=(rs("selc")/total)*100

%>

您认为明年的CBA哪一支队伍能够夺得总冠军?

八一队:

height=10><%=rs("sela")%>人占:

<%=round(sela,2)%>%

上海队:

height=10><%=rs("selb")%>人占:

<%=round(selb,2)%>%

说不清:

height=10><%=rs("selc")%>人占:

<%=round(selc,2)%>%

共有:

<%=total%>人参加调查

<%

else

response.write""&chr(13)&"alert('还没有人参与调查!

');"&"history.back()"&""

endif

rs.close

setrs=nothing

%>

 

运行结果:

登录界面效果

投票界面效果

点击调查结果

76个人参加了投票,我也想投票。

于是,我点击“八一队”

然后提交

再看调查结果

这时有77个人参加了投票

配套讲稿:

如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

特殊限制:

部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

关 键  词:
投票 系统
提示  冰点文库所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:投票系统.docx
链接地址:https://www.bingdoc.com/p-4391540.html
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

copyright@ 2008-2023 冰点文库 网站版权所有

经营许可证编号:鄂ICP备19020893号-2


收起
展开