投票系统.docx
- 文档编号:10587617
- 上传时间:2023-02-21
- 格式:DOCX
- 页数:12
- 大小:1.27MB
投票系统.docx
《投票系统.docx》由会员分享,可在线阅读,更多相关《投票系统.docx(12页珍藏版)》请在冰豆网上搜索。
投票系统
题目:
投票系统设计
课程名称:
Web站点设计与管理
专业:
电子商务
姓名:
郭培斌
学号:
2010210596
目录
1.系统总体设计………………………………………………………………3
2.功能描述……………………………………………………………………3
3.功能模块设计………………………………………………………………3
4.函数功能描述………………………………………………………………3
5.程序流程图…………………………………………………………………3
6.程序清单……………………………………………………………………4
7.运行结果……………………………………………………………………7
系统总体设计:
我设计的投票系统由登录界面和投票界面组成。
功能描述:
投票系统,顾名思义,就是针对一个或一系列问题进行投票。
其中,登录界面是用户投票前进行的一个身份验证;投票界面是用户根据主观判断进行投票,投票后,可以通过条状图清晰直观的知道总体投票情况。
功能模块设计:
登录界面是一个ASP设计的表单;投票界面用ASP分别设计了选项、计数和显示三个页面,并通过数据库保存更新后的信息。
函数功能描述:
1.Funtion函数利用实参和形参一一对应传递数据
2.sub子程序只执行程序不返回值
3.检验函数IsObject(variant)如果引用了有效的对象,则返回True
4.CreateObject方法创建组件、应用程序或脚本对象的实例调用其他外部程序或组建的功能
5.存取SQLServer数据库
程序流程图:
程序清单:
登录
2-1.asp
5px;"bgcolor="#DEE2F0"> 10px;"> 640px;"aligh="left"> 为了在“莲花”投票系统投票,您首先需要注册。 如果您没有注册,您将无法在“莲花”投票系统中投票。 请在下面的表单中输入您想要的用户名、您的登录密码和邮箱地址 用户名最长为20个字符,且不能与已有的用户名重复! 请输入您想要的用户名。 用户名: 250px;"> < 请输入密码,注意密码区分大小写。 200px;"> 200px;">
投票
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"
');"&"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哪一支队伍能够夺得总冠军?
八一队: <%=round(sela,2)%>% 上海队: <%=round(selb,2)%>% 说不清: <%=round(selc,2)%>%
<%=total%>人参加调查
<%
else
response.write"
');"&"history.back()"&""
endif
rs.close
setrs=nothing
%>
运行结果:
登录界面效果
投票界面效果
点击调查结果
76个人参加了投票,我也想投票。
于是,我点击“八一队”
然后提交
再看调查结果
这时有77个人参加了投票
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 投票 系统