请教 asp 如何统计文档下载次数并刷新统计显示?
download.asp
------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="bkconn.asp"-->
<%
Dim FileName
Const adTypeBinary = 1
FileName = Request.QueryString("FileName")
if FileName = "" Then
Response.Write "无效文件名."
Response.End
End if
set rs=server.createobject("adodb.recordset")
sql="select * from product where name='" & FileName &"'"
rs.open sql,conn,1,3
rs("downTimes")=rs("downTimes")+1
rs.update
rs.close
%>
<script language=javascript>
window.location.reload()"; //似乎没执行刷新 可能我写的不对??
</script>
<%
Response.redirect FileName
%>Default.asp
----------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="bkconn.asp"-->
<%
dim i1
dim i2
dim i
session.Abandon '清除原会话数据
set rs=server.createobject("adodb.recordset")
sql="select * from product"
rs.open sql,conn,1,1
for i=1 to rs.recordcout
select case rs("Name")
case "xxx.rar"
i1=rs("downtimes")
case "yyy.rar"
i2=rs("downtimes")
..........
end select
rs.movenext
next
rs.close
%>
yyyy
<a href="DownLoad.asp?FIleName=xxx.RAR" >xxx</a>下载次数<%=i1%>
<a href="DownLoad.asp?FIleName=yyy.RAR" >yyy</a>下载次数<%=i2%>
下载后页面没有刷新 并且要手工刷2次才显示新的统计 想不通了
download.asp
------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="bkconn.asp"-->
<%
Dim FileName
Const adTypeBinary = 1
FileName = Request.QueryString("FileName")
if FileName = "" Then
Response.Write "无效文件名."
Response.End
End if
set rs=server.createobject("adodb.recordset")
sql="select * from product where name='" & FileName &"'"
rs.open sql,conn,1,3
rs("downTimes")=rs("downTimes")+1
rs.update
rs.close
%>
<script language=javascript>
window.location.reload()"; //似乎没执行刷新 可能我写的不对??
</script>
<%
Response.redirect FileName
%>Default.asp
----------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="bkconn.asp"-->
<%
dim i1
dim i2
dim i
session.Abandon '清除原会话数据
set rs=server.createobject("adodb.recordset")
sql="select * from product"
rs.open sql,conn,1,1
for i=1 to rs.recordcout
select case rs("Name")
case "xxx.rar"
i1=rs("downtimes")
case "yyy.rar"
i2=rs("downtimes")
..........
end select
rs.movenext
next
rs.close
%>
yyyy
<a href="DownLoad.asp?FIleName=xxx.RAR" >xxx</a>下载次数<%=i1%>
<a href="DownLoad.asp?FIleName=yyy.RAR" >yyy</a>下载次数<%=i2%>
下载后页面没有刷新 并且要手工刷2次才显示新的统计 想不通了
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货