1.ͶƱԴ?投票?????
2.投票系统的制作
3.求:限制同一IP重复投票asp源码,急!源码
4.怎样根据投票结果显示排行榜(ASP)(求详细点的下载)
ͶƱԴ??????
我弄的,一个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
%>
投票系统的源码制作
其实这种东西也是提交,只不过把事件写在了超链接按钮上了,下载点击就执行。投票ugui源码 版本
或者说是源码<a href="#" onmousedown=""></a>
你可以把那些东西当按钮看
求:限制同一IP重复投票asp源码,急!下载
<%
function getIP()
getIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If getIP = "" The源码安装 cherrytreen 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
%>
把以上代码放在你投票页的前面就行了
怎样根据投票结果显示排行榜(ASP)(求详细点的)
主要是数据库里面的表和sql语句的用法,表的布林源码设计不多说了,sql语句为:select * from 表 order by hits(投票数) desc
就是说按照投票的多少降序排列,票多的就会排在上面!不知道你是否看懂我说的!