Quantidade de cliques em cada link

Neste artigo vamos aprender a
administrar a quantidade de cliques em cada link.

Vou apresenta a página click_counter.asp,
linka.asp, linkb.asp e linkc.asp

A primeira página contará
o código. As outras terão a relação
dos 3 links e o código de contagem. Tudo muito
simples. Você precisará criar os arquivos
linka.txt, linkb.txt e linkc.txt, onde estará
o número de cliques em cada link.

Faça o download do arquivo .zip
com as 4 páginas páginas citadas acima
e os 3 arquivos txt, que preparamos para você.
Clique
aqui para o download. Muito bom, simples
e funcional.

Colocamos abaixo o código completo
da página click_counter.asp somente para visualização.

click_counter.asp

<%
u_link=request.querystring(“u_link”)
counter_add= replace(u_link,”.asp”,”.txt”)

set fso = createobject(“scripting.filesystemobject”)

set act = fso.opentextfile(server.mappath(counter_add))

counter = clng(act.readline)

act.close

counter = counter
+ 1

Set act = fso.CreateTextFile(server.mappath(counter_add),
true)
act.WriteLine(counter)
act.Close response.redirect (u_link)
%>