Flash+ASP联合打造投票程序
作者 佚名技术
来源 服务器技术
浏览
发布时间 2012-07-09
|
为了调查了解站点访问者对特定问题的立场,我们可以在站点中设置投票程序,站点访问者直接选择答案,程序自动对所有答案进行统计和显示. 下面是一个简单的Flash版的投票程序,后台使用 XML+ ASP+ MySQL: 因为大多web工作者对asp比较熟悉,xml可以将复杂的问题简化,采用mysql的原因是Access 我没有安装,程序不需要任何存储过程,所以无需动sql server ,Oracle 等重兵器. ? 点击这里附件下载源文件 (53k) 问题分析:本投票程序是选择题, 故我们用一个字段存储用户的答案即可. 建立数据库和表:表名称和数据库名称任意,字段定义如下: voteid? 无符号整数 自动编号 result?? 短整数 存储用户选择 本程序范围在0-2 userip char (25) ?用户ip地址实际长度21 message char(255)? 附加消息 //这个程序未用 使用mysql-front创建,如下图所示: 
设计flash用户界面: 从window/components/flash ui components 中 拖三个 RadioButton到舞台中, 设置标签,其他为默认值。（从属性面板和组件参数面板均可以设置） 
这里将使用一个图表组件(HTML UI Components中的Subtype),你可以到MM扩充资源 www.Macromedia.com/exchange/flash 下载. 参数设置如下: 
flash端的程序非常简单只有三行: //在时间轴的第一帧,加入下面的代码 //标签名称为"开始投票吧!"的按钮,事件句柄为sendvote,在点击后执行下面的自定义函数 function sendvote () { _root.mytb.readData("http://localhost/votexml.asp?selectresult="+radioGroup.getInstance()); } 服务器端程序的编写,上面你可能看到有一个votexml.asp的文件,下面我们就来建立它. 代码如下: <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% set conn=server.CreateObject("adodb.connection") conn.open "dsn=mysql" set rec=server.CreateObject("adodb.recordset") %> <% if request("selectresult")<>"" then userip= Request.ServerVariables("REMOTE_ADDR") selectresult=request.QueryString("selectresult") rec.open "select count(*) as count from votetable where votedate>''"&now()-0.125 & "'' and userip=''"&userip&"''",conn if rec("count")>0 then bzh="重复投票无效" rec.close ''response.Write("请不要重复投票") else rec.close bzh="投票有效" conn.execute "insert into votetable(userip,result) values(''"&userip&"'',"& selectresult&")" end if else bzh="查看投票" end if rec.open "SELECT result,count(*) as count FROM votetable group by result ORDER BY result asc",conn t0=cint(rec("count")) rec.movenext t1=cint(rec("count")) rec.movenext t2=cint(rec("count")) tcount=t0+t1+t2 Response.contenttype="text/xml" %> <% Response.write "" response.Write(" Response.write " response.Write(" response.Write("") response.Write("") response.Write(" %> <% Response.write " rec.close set rec=nothing conn.close set conn=nothing %> 将文件保存为votexml.asp,放置到web路径为"/"的目录中,即可. 备注：实际应用到Web服务器的时候,请在flash中使用相对路径.flash movie和votexml.asp可以放置到任何目录中. 关键词： |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
上一篇: 用flash打造爆炸效果下一篇: 减少 Flash MX 2004 的启动时间
关于Flash+ASP联合打造投票程序的所有评论
