Ir para conteúdo
Fórum CódigoFonte.net
Entre para seguir isso  
rafael ramos

Contador de Cliques em ASP

Recommended Posts

Contador de cliques em asp

Bom galerinha, como estou cursando ASP agora e já sei um pouquinho, vou postar pra vocês o contador de cliques que eu fiz no curso na prova intermediária. Blz??

Vamos lá!

Primeiramente vamos criar o banco de dados (conta_cliques.mdb), no banco de dados crie uma tabela com o nome de “clicks”, com os campos “url – tipo = texto” e “hits – tipo = numérico”.

Agora vamos criar o arquivo “click.asp”:

<%
url = request.querystring("url")
if url = "" then
url = "http://www.seusite.com.br" 'Coloque aqui a url do seu site...
end if

'Conecta ao banco...
set conn = createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("conta_cliques.mdb")

set rs = conn.execute("select * from clicks where url = '" & url & "'")

if rs.eof then 'Se não existe a url cadastrada no banco de dados, salva ela e adiciona 1 no hits

v = 1

conn.execute("INSERT INTO clicks (url, hits) VALUES ('" & url & "'," & v & ")")
response.redirect url

else

'Atualiza os clicks já existents emu ma determinada url

conn.execute("UPDATE clicks SET hits = hits +1 WHERE url = '" & url & "'")
response.redirect url

end if

rs.close
conn.close
set rs = nothing
set conn = nothing
%>
Agora para utilizar este arquivo, simples faça assim: HTTP://www.seusite.com.br/click.asp?url=ht...oce-quer.com.br Depois de url, você adiciona o link que você quer contar! Simples não! Agora para saber quantos cliques cada link recebe, vamos criar o arquivo stats.asp:
<title>Estatística - Contador de links</title>
</head>

<body>

<h1>Estatísticas</h1>

<table border="1" width="60%">
<tr>
<td width="95%" align="center"><b>URL</b></td>
<td width="5%" align="center"><b>Cliques</b></td>
</tr>
<%
set conn = createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("conta_cliques.mdb")
set rs = conn.execute("SELECT * FROM clicks ORDER By hits DESC")
do while not rs.eof
%>
<tr>
<td width="95%"><a href="<%=rs("url")%>" target="_blank"><%=rs("url")%></a></td>
<td width="5%" align="right"><%=rs("hits")%></td>
</tr>
<%
rs.movenext
loop
rs.close
conn.close
set rs = nothing
set conn = nothing
%>
</table>

</body>
</html>

Simples e functional.

Espero que alguém comente neh! Uahuas!

Abraço!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Visitante
Responder

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Processando...
Entre para seguir isso  

×
×
  • Criar Novo...