1.asp投票系统,码投怎么修改这个ASP投票系统
2.网站投票系统更新页add.asp
3.高手进,ASP 根据IP判断投票全代码
4.ASP 高手把下面代码修改成同IP只限1个投票
5.求:限制同一IP重复投票asp源码,急!码投
asp投票系统,码投怎么修改这个ASP投票系统
这列是纪录票数,为整型
第一个页面,码投你是码投通过读取数据库中的纪录嘛,这样很容易获得ID咯。码投智能开锁源码
当第一个页面跳转到第二个页面的码投同时,将ID传递到第二个页面,码投读取需要ID,码投在读取的码投同时,将票数读取出来,码投这里暂时定义为count。码投
投票事件以统计更新:当点击“投票”的码投时候,让count=count+1,码投同时写如数据库。码投
这样就实现了你所说的功能。
但是销售地图源码,为了防止恶意刷投票,我们通常会将用户IP地址在他投票的同时纪录下来,保存到数据库中,如果这个IP已经投票过了,那么就不能再次投票了。
说得比较清楚了,如果还是不会改的话,可以发代码到我邮箱,援军指标源码或者我有空的时候给你做一个这样的系统。我的邮箱是:jcqiuzhihua@.com
网站投票系统更新页add.asp
投票系统更新页add.asp
在构建投票页面vote.asp时,我们已经设置表单的action属性指向了add.asp。这个动态页面用于处理投票操作。 首先,创建一个新的动态页面,例如vote.asp,你可以在此添加一个链接跳转到result.asp。传奇2 源码在页面设计上,我们的重点是记录每个选项的投票人数,而非读取或插入数据库记录,因此,我们将使用预存过程来实现数据更新。 在绑定-命令(预存过程)选项中,选择SQL定制功能。投票系统的绝对拉升源码核心操作是对数据库表vote中的某个字段进行累加,所以,我们将使用预存过程来执行SQL语句,更新字段值。 在vote.asp页面中,单选按钮的Value属性被设置为表vote中的字段名。当用户点击按钮时,Request.form("rbResult")的值会对应表vote中的一个字段。所以,SQL语句的目的是在相应字段中增加1,以记录每个投票者的投票。 需要注意的是,在实际操作中,务必移除SQL语句中的"where"条件,因为我们并不需要根据其他条件来筛选数据。 至此,投票系统的关键文件已经完成。让我们预览一下最终的效果。高手进,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)
求:限制同一IP重复投票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
%>
把以上代码放在你投票页的前面就行了