Sapere quante volte e stato scaricato quel file

[DeR]

Ho bisgno di sapere quante volte e stato scaricato un determinato file, ho una pag asp che in base all'utente che si logga, mi visualizza dei file da scaricare prendendoli da un dd.

Mi servirebbe sapere quante volte vengono scaricati i file, come posso fare? ho visto i vari file in giro, ma non ci ho capito + di tanto.



la pag asp mi visualizza i file cosi:

Response.write("Scarica")

[SuperMariano81]

Nel mio sito faccio scaricare dei file solo agli utenti loggati.
Nel db nella tabella "Utenti" oltre al campo id - utente - password ho un campo ultimo download, segno la data del file che ha scaricato (visto che lo aggiorno spesso mi serve per sapere che è aggiornato e chi no).
Per fare ciò invece che linkare direttamente il file passo da una pagina transito.asp che prima mi fa i rispettivi controlli, e poi gli fa scaricare il file:

transito.asp?file=file.pdf

Lo potresti adattare anche agli utenti non loggati, solo non fai nessun controllo ma incrementi il numero download.
Non so se esiste una strada più comoda, cmq se hai bisogno di chiarimenti... son qui

[viki1967]

pagina.asp:

<%
Dim Path
'Percorso del database
Path="/mdb-database/"
%>
<script language="JavaScript1.2">
{ 
function download(loc) {    

         window.open(loc,'Video','width=400,height=100');    

}
}
</script>
<%
Dim ConnDown
Set ConnDown=Server.CreateObject("ADODB.Connection")
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"antivirus.mdb")
Dim SQLDown,RECDown
SQLDown="select * from DOWNLOAD order by NOME"
Set RECDown=ConnDown.Execute(SQLDown)%>

While Not RECDown.EOF
%>
    &path=<%=path%>');"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%=RECDown("NOME")%></font></td>
      <td width="31" bgcolor="#FFFFFF"> 
        <div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%=RECDown("HIT")%></font></div>
      </td>
    </tr>
    <%
RECDown.MoveNext
WEnd
RECDown.Close
ConnDown.Close
Set RECDown = Nothing
Set ConnDown = Nothing
%>

contadownload.asp:

<%
Dim CODown,path
CODown = Request.Querystring("cod")
path = Request.Querystring("path")

Dim ConnDown
Set ConnDown=Server.CreateObject("ADODB.Connection")
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"antivirus.mdb")
Dim SQLDown,RECDown,cont
SQLDown="select * from DOWNLOAD where COD="&CODown
Set RECDown=ConnDown.Execute(SQLDown)
cont=RECDown("HIT")
cont=cont+1
SQLDown="update DOWNLOAD set HIT="&cont&" where COD="&CODown
ConnDown.Execute(SQLDown)
%>
<meta http-equiv="Refresh" content="5; url=<%=RECDown("FILE")%>">

<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Il 
        download inizier&agrave; tra pochi secondi, se hai problemi

        e non inizia ">clicca qui</font></div>
   <%
RECDown.Close
ConnDown.Close
Set RECDown=Nothing
Set ConnDown=Nothing
%>

naturalmente da personalizzare...

[DeR]

Grazie 1000, stasera provero, poi vi faro sapere.