Contador de Acessos com banco de dados

[dark0]

Contador de Acessos com banco de dados

Salve galerinha !!

Bom, eu montei um codigo extremamente simples de contador de acesso!

Estou usando banco de dados para armazenar, pois a maioria dos servers gratuitos suportam acess, e não suportam FSO (arquivo texto).

é bem simples.. e tm explicações no meio do codigo!

Segue codigo:

<%'liga ao banco de dados
url_conexao = Server.MapPath("banco_contador.mdb")
set conexao = Server.CreateObject("ADODB.Connection")
conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao

'le o numero de acesso que tem no banco
sql_le = "select * from contador"
set rs_le = conexao.execute(sql_le)

'pega o numero de vistas, e soma +1
visitas = rs_le("visita") + 1
session("visitas") = visitas

'a cada novo acesso, ou reload na pagina, ele atualiza o banco
sql = "update contador set visita="&visitas&" where id=1"
set rs = conexao.execute(sql)
%>

visitas: <%=session("visitas")%><%
'sempre que quiser mostrar o numero de acessos, é só usar o comando que tem depois de visitas..%>

O banco, com o nome: banco_contador, tem uma tabela chamada CONTADOR, com os campos:

- ID - numero <- que já tem um registro com numero 1 (para atualizar nele os acessos)

- visitas - numero

O codigo, e o banco estao aqui:

Contador de Acessos

Até a proxima!!

Abraços