一个记数和ip,和刷新母窗口的问题???

来源:百度知道 编辑:UC知道 时间:2024/05/21 00:10:48
高手来...
在一个歌曲列表页面里点投票后弹出窗口说感谢投票,并把投了票的歌曲的投票数+1(一个ip一小时内只能投一次票),投票后同时刷新歌曲列表页面以显示最新投票数

列表页代码
<table width="80%" border="1" cellpadding="6">
<tr>
<td>编号</td>
<td>曲名</td>
<td>录音者</td>
<td>投票数</td>
<td>投票</td>
</tr>
<%
dim conn,rs,sql
set conn=server.createobject("ADODB.CONNECTION")
conn.Connectionstring = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("/#data.mdb")
conn.open
sql="SELECT top 30 ArticleID,Title,Editor,OnClick FROM Article ORDER BY ArticleID DESC"
set rs=conn.execute(sql)
do while not rs.eof
%>
<tr>
<td><%= rs("ArticleID") %></td>
<td><%= rs("Title") %></td>
<td><%= rs("Editor") %></td>
<td><%= rs("OnClick") %></td>