1.asp ͶƱ Դ?票源?
2.网站投票系统更新页add.asp
3.asp投票系统,怎么修改这个ASP投票系统
4.高手进,ASP 根据IP判断投票全代码
5.ASP 高手把下面代码修改成同IP只限1个投票
asp ͶƱ Դ??
<%
function getIP()
getIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If getIP = "" Then getIP = Request.ServerVariables("REMOTE_ADDR")
end function
if Request.Cookies("mycookie")("userip")<>"" then
Response.Write "<script>alert('一个IP地址只能投一次票，谢谢您的票源参与！');history.go(-1);</script>"
response.End()
else
Response.Cookies("mycookie")("userip")=getIP()
Response.Cookies("mycookie").Expires=date+
end if
%>
把以上代码放在你投票页的票源前面就行了
网站投票系统更新页add.asp
投票系统更新页add.asp
在构建投票页面vote.asp时，我们已经设置表单的票源action属性指向了add.asp。这个动态页面用于处理投票操作。票源 首先，票源表格批量导入网站源码创建一个新的票源动态页面，例如vote.asp，票源你可以在此添加一个链接跳转到result.asp。票源在页面设计上，票源我们的票源重点是记录每个选项的投票人数，而非读取或插入数据库记录，票源因此，票源我们将使用预存过程来实现数据更新。票源 在绑定-命令（预存过程）选项中，票源选择SQL定制功能。投票系统的afstep源码核心操作是对数据库表vote中的某个字段进行累加，所以，我们将使用预存过程来执行SQL语句，更新字段值。 在vote.asp页面中，单选按钮的Value属性被设置为表vote中的字段名。当用户点击按钮时，Request.form("rbResult")的值会对应表vote中的一个字段。所以，源码不全SQL语句的目的是在相应字段中增加1，以记录每个投票者的投票。 需要注意的是，在实际操作中，务必移除SQL语句中的"where"条件，因为我们并不需要根据其他条件来筛选数据。 至此，投票系统的dropit源码关键文件已经完成。让我们预览一下最终的效果。asp投票系统,怎么修改这个ASP投票系统
这列是纪录票数，为整型
第一个页面，你是通过读取数据库中的纪录嘛，这样很容易获得ID咯。
当第一个页面跳转到第二个页面的同时，将ID传递到第二个页面，读取需要ID，dior源码在读取的同时，将票数读取出来，这里暂时定义为count。
投票事件以统计更新：当点击“投票”的时候，让count=count+1，同时写如数据库。
这样就实现了你所说的功能。
但是，为了防止恶意刷投票，我们通常会将用户IP地址在他投票的同时纪录下来，保存到数据库中，如果这个IP已经投票过了，那么就不能再次投票了。
说得比较清楚了，如果还是不会改的话，可以发代码到我邮箱，或者我有空的时候给你做一个这样的系统。我的邮箱是：jcqiuzhihua@.com
高手进,ASP 根据IP判断投票全代码
我弄的，一个IP一天只能投票一次
。改.,访问：flycentrury。com。cn
如果选手机，你选择的价位是：
……
你可以试验一下
以下是我按你的数据库改的源码
<%
function ips()
dim id
id=Request.ServerVariables("REMOTE_HOST")
if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
id=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
ips=id
end function
ip=ips()
set rc=server.CreateObject("adodb.recordset")
sql="select tptime,ip from ip where ip='"&ip&"' and tptime=#"&date()&"#"
rc.open sql,conn,1,1
aa=rc.recordcount
rc.close
set rc=nothing
if aa>0 then
Response.Write "<script>alert('您今天已经投过票啦！');this.location.href='javascript:window.close()';</SCRIPT>"
else
sql="update Vote set ps=ps+1 where id="&pid
conn.execute(sql)
conn.close
set conn=nothing
Response.Write "<script>alert('谢谢您的关注，投票成功！');this.location.href='javascript:window.close()';</SCRIPT>"
end if
%>
ASP 高手把下面代码修改成同IP只限1个投票
获取IP地址的语句：
<%ip=request.ServerVariables("REMOTE_ADDR")%>
这个最好是将投票者的IP保存到数据库中，新投票查询IP如果存在数据库，则投票无效。
也可以将投票者的IP保存到Cookie的话，需要对Cookie设置一个有效期时间，这个Cookie是保存在对应投票者的电脑中。（投票者清IE缓存可以去除Cookie）
