asp統計檔案下載代碼

昨天幫朋友寫了一個簡單的,下面我就一步步從建資料庫開始來到後的下載與顯示統計次數吧.

第一.資料庫結構如下.

是用的access資料庫,裡面有兩記錄,我們只在在down.asp的串連地址是如count.asp?id=1就可以下載統計mateydb軟體了,下面我們來看看count.asp檔案吧.

<!-- #include file="inc/conn.asp" -->
<%
 Id = Request("id")
 
 If Not Isnumeric(Id) or Id = "" Then
  Response.Write("<script>alert('下載失敗,記錄不存在!');history.back();</script>")
  Response.End()
 Else
  Db_connect()  
  Sql = "Select * from  soft_count where id="&id 
  Rs.open Sql,Conn,1,3  
  If Not Rs.eof Then
   Rs(3)=Rs(3)+1
   Rs.Update
   Response.Redirect(Rs(2))
  Else
   Response.Write("<script>alert('下載失敗,記錄不存在!');history.back();</script>")   
  End if
  Call Closedb()
 End if
  

%>

資料庫連接我就不寫了,統計代碼就完成了,下面來看看顯示檔案show.asp

<!-- #include file="inc/conn.asp" -->
<%
 Db_connect()
 Sql = "Select * from  soft_count"
 Set Rs =Conn.execute(Sql)
 Do while Not Rs.eof
  Response.Write("軟體:"&Rs(1)&" | 下載:"&Rs(3)&"次<br>")
 Rs.movenext
 Loop
%>

簡單吧,好了我們的檔案就寫完了轉載請註明來自www.111cn.net/asp/asp.html