Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

guicisoto

contador de acesso

Recommended Posts

grave o ip do cara num repositorio...tabela por exemplo, ao acessar você verifica se ip já cadastrado, se existe então faz update

Compartilhar este post


Link para o post
Compartilhar em outros sites

O princípo é esse:

 

<%set tabRec = Server.CreateObject("ADODB.Recordset")strSQL = "SELECT idIP, QtAcessos FROM tabela WHERE idIP = '" & Request.ServerVariables("REMOTE_ADDR") & "'"tabRec.open strSQL, conSTRIF not tabRec.EOF THEN	strSQL = "UPDATE tabela SET QtAcessos = " & tabRec("QtAcessos") + 1 & " WHERE idIP = '" &Request.ServerVariables("REMOTE_ADDR")& "'"	conSTR.execute strSQL,,128 'Onde conSTR é tua variável que conectou com o banco.ELSE	strSQL "INSERT INTO tabela (idIP, QtAcessos) VALUES (0,'"& Request.ServerVariables("REMOTE_ADDR") &"')"	conSTR.execute strSQL,,128 'Onde conSTR é tua variável que conectou com o banco.END IFResponse.Write "você já logou " & tabRec("QtAcessos") + 1 & " vezes."%>

Daí você customiza conforme sua necessidade.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.