Criação de um contador

Utilize um contador para mostrar o número de usuários que visitaram a sua página. Os contadores de visitas são amplamente utilizados por muitos sites já que dão uma amostra do número de visitas de uma página.

Passos prévios para utilizar este contador

Em primeiro lugar deve-se identificar a página ASP que conterá o contador -habitualmente é a home page do seu Web site-

A continuação deve-se criar um arquivo texto que se chamará "contador.txt" no diretório "contador" e deve-se escrever uma linha com o número "1", para inicializar o contador.

Código para criar um contador

<%
   ' Criação do objeto de acesso a arquivos e o nome do arquivo
   ' -contador.txt- do diretório contador
   Set FileObj = Server.CreateObject("Scripting.FileSystemObject")
   nomeArquivo = Server.MapPath ("/contador") & "\contador.txt"
   
   ' Leitura do arquivo contador.txt e incremento do número de visitas
   Set Entrada= FileObj.OpenTextFile (nomeArquivo, 1, false )
   Atual = Trim(Entrada.ReadLine)
   Novo = Atual + 1
   
   ' Criação do arquivo contador.txt e gravação do número de visitas
   Set Saida= FileObj.CreateTextFile (nomeArquivo, True)
   Saida.WriteLine(Novo)
%>
<!-- Na linha abaixo é  mostrado o número de visitas atuais -->
Número de visitas  <%=Novo%>.