本来有asphousepoll1.1，但今日发现原来的文件不能解压了．搜索整个互联网，
虽然有此版本信息，但均不能下载．
[img]../images/fileType/zip.gif[/img]此主题相关文件 [url=../images/upload_mm/2003/03/26/517996250000.zip]517996250000.zip[/url]
◆运行环境：
Win2000+SQL2000+ASP3.0
◆程序结构：
投票系统--*--PollSystem--*--images--*--redvert.gif [投票结果百分比图像条]
*--Manage--*--Inc--*--Function.asp [投票系统功能函数集]
*--Menu.asp [投票管理的导航条]
*--AddItem.asp [投票管理墙加投票主题项目表单]
*--SaveAddItem.asp [保存提交的墙加投票主题项目表单]
*--Default.asp [投票管理主页]
*--DisplayItem.asp [显示所有投票主题]
*--PollResult.asp [对调查系统进行调查或查看调查结果]
*--Inc--*--check_fun.asp [验证管理员函数]
*--popu_fun.asp [常用函数集]
*--setup.asp [参数设置区]
*--webstyle.css [样式表文件]
*--poll.gif [投票按钮图片]
*--pollResult.gif [查看投票结果按钮图片]
*--ReadMe.TXT [说明文件]
*--DataBase.SQL [投票系统数据库生成文件]
◆功能简述：
1. 支持几乎无限投票主题
2. 支持某主题几乎无限投票项目
3. 显示投票界面
4. 显示投票结果
5. 投票管理部分可以查看所有投票项目状况
6. 管理员密码可以永不过期
7. 防止重复投票
8. 完整的客户端和服务器端双重验证
◆参数设置：
参数设置在setup.asp中进行，下面是一些需要设置的参数
REM -- homeUrl：主页网址
REM -- sitenameString：网站名称
REM -- MasterCookies: 客户端使用的Cookie主名称
REM -- MasterSession: 服务器端使用的主Session名称
REM -- SupervisorEmail: 超级用户使用的注册E-mail
REM -- SupervisorEmail: 管理员使用的注册E-mail
◆安装步聚：
1. 按DataBase.SQL安装好数据库
2. 在pop_fun.asp的initDatabase函数中设置好SQL服务器（登陆用户名及密码等）
3. 建立在IIS及DNS中建立www.poll.com网站的相关设置以可本地访问www.poll.com
4. 拷贝此文件目录到网站目录下
◆管理登陆方法：
http://www.poll.com/PollSystem/Manage/?email=qianfengyun@163.net&password=qian
注意这里的http://www.poll.com/ 指是是setup.asp中的设置参数homeUrl的值
◆使用方法：
此程序提供给有一定ASP能力的人参考使用，利用里面的一些函数调用即可实现显示投票系统界面及投票结果等。
整个系统由全局变量作为参数传递，在调用前需要设置参数
全局变量如下：
Rem 名称 主题ID IP 投票选项 投票选项数目
Dim GBL_PollName,GBL_PollID,GBL_PollIP,GBL_PollITemData,GBL_ItemNum
下面是函数解释：
1. DisplayPollResult(IMGWidth)
功能 - 显示某投票主题当前投票结果
参数 - Ⅰ IMGWidth为投票结果红条的宽度
2. GetPollTitileValue(PollTitleID,OrderByString)
功能 - 获得某投票主题所需要的变量值
参数 - Ⅰ PollTitleID 投票主题ID号
Ⅱ OrderByString 排序字符串,比如" order by PollItemID"，表示以主题ID号为序，" order by ResultNum"表示以投票数为序 可以为空，表示以默认方式排序
3. DisplayPollForm(OpenWidth,OpenHeight)
功能 - 显示某投票主题投票界面
参数 - Ⅰ OpenWidth 投票结果窗口宽
- Ⅱ OpenHeight 投票结果窗口高
4. PollOneTicket(PollTitleID,SelectItemID)
功能 - 投一票
参数 - Ⅰ PollTitleID 投票主题ID号
Ⅱ SelectItemID 用户所投的一票的ID号
◆应用例子：
显示一个投票界面：
<%If GetPollTitileValue(1,"") = 1 Then
DisplayPollForm 370,300
Else
Response.Write Tempstr
End If
%>
◆程序评价及后话：
评价：★★★★☆ (4 star)
程序非常统一，但在功能上有所欠缺，但也不是非常必须。
需要加强的功能包括：
1. 管理员密码修改
2. 投票系统的完全修改删除功能（包括修改投票结果）
3. 投票显示结果的多种样式选择
如果加上以上功能，应该就是5星的程序了
◆版权声明：
所有者：ASP精品屋(www.asphouses.com)
使用及转载者需要注明原作者为ASP精品屋，
对于再次修改的也敬请保留。
---此程序用于免费发布，如果需要转载请保留此版权信息---
┏━━━━━━━━━━━━━━━━━━━┓
┃Modify By ASP精品屋 WWW.ASPHOUSES.COM ┃
┃ 探索者 2001年4月30 ┃ | 
