La base de datos tendria una tabla "Sitios" con estos campos:
ID : autonumerico
URL : Texto o memo
Hits : Numerico
Copias el codigo en el notepad, cambias lo que dice "c:\basededatos.mdb" por la ruta donde este la base de datos en el servidor, si esta en un subdirectorio X podrias poner Server.MapPath("/X"), y lo guardas con el nombre que vayas a usar + extension .asp.
Despues, para el numero de clicks tendrias que ver cada uno de los registros de la tabla, ej:
Código:
<%
Dim BDD, RST, bddPath
bddPath = "c:\basededatos.mdb"
Set BDD = Server.CreateObject("ADODB.Connection")
Set RST = Server.CreateObject("ADODB.Recordset")
BDD.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & bddPath
Rst.Open "SELECT * FROM SITIOS", BDD
Do while not RST.EOF
%>
<CENTER>ID: <%=RST("ID")%> <BR>URL: <%=RST("URL")%><BR>
Clicks: <%=RST("HITS")%><HR></CENTER>
<%
Rst.Movenext
Loop
Rst.Close
Set RST = nothing
BDD.Close
Set BDD = nothing
%>
Eso lo pegas en otro archivo que cargas para ver las "estadisticas". Tambien podria hacerse metido en la misma pagina que tiene el link, si quieres que el resto sepa cuantas veces se visito ese link. A todo lo anterior le falta mucho, como un sistema para que nadie encuentre el archivo y te lea las estadisticas, o chequear que el link exista, etc.
Otra cosa, la direccion de los sitios las tendrias que poner en la base de datos antes de subirla (o bajarla, agregar y subirla de nuevo) o hacer un sistema que te deje hacer altas, bajas, etc. de links. En sitios como www.aspin.com debe hacer ejemplos o sistemas ya hechos en los que solamente necesitas cambiar un par de cosas.