Ver Mensaje Individual
  #4 (permalink)  
Antiguo 10/02/2003, 22:20
Avatar de TurKa
TurKa
 
Fecha de Ingreso: enero-2003
Ubicación: Gerli, Avellaneda
Mensajes: 543
Antigüedad: 21 años, 10 meses
Puntos: 4
Puedes crear:
primero una base de datos para guardar la cantidad de "clicks" (descargas) que se hagan de los archivos:
Esta base de datos, se llamará cuentaclicks.mdb y tendrá una tabla llamada tblContador con los siguientes campos:

Id | Autonumérico (clave principal)
url | texto
clicks | Número

Luego, en cada enlace a cada descargas, debes poner el link de esta manera:

<a href="clicks.asp?url=http://www.sitio.com/archivo.zip ">Download</a>
Donde http://www.sitio.com/archivo.zip tendrá que ser modificado por la URL de descarga, haciéndolo manualmente o si tienes los archivos en una base de datos, a éstos les puedes agregar un campo llamado URL donde pondrás las url de descarga de esos archivos. Entonces, el enlace te quedará así:

<a href="clicks.asp?url=<%=rs("url")%> ">Download</a>

Y luego necesitarás una página ASP que cuente los clicks, llamada clicks.asp en la que deberás insertar el siguiente código:

Código:
<%
Response.Buffer=TRUE

url = Request.Querystring("url") 

if url <>"" then

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("cuentaclicks.mdb")&";"

strsql = "SELECT * FROM tblContador WHERE url = '" & url & "'" 

Set rs = Server.CreateObject("ADODB.RecordSet")
RS.open strsql, oConn, 3, 3

if rs.eof then
    rs.AddNew
    rs("clicks")= 1
    rs("url") = url
    rs.update
else
    rs("clicks")=rs("clicks")+1
    rs.update
end if 

rs.Close
set rs=nothing
oConn.Close
response.redirect URL
end if
%>
Ojalá te sirva de ayuda!!!!!!
__________________
Programación LAMP con Scrum y XP
www.eugeniabahit.com.com.ar