[ASP] Contador de Visitas

Saudações!

Estou iniciando com ASP, achei muito similar a PHP em questão de execução.

Em questão de código me lembra bastante Basic. De qualquer forma fiz um projeto simples para mostrar como é fácil e intuitiva ASP.

É bastante dinâmico apesar de ser server side. Por isto me lembra várias coisas rsrs

Comecei com ASP hoje. Se tiver algo errado comunique-me por comentário.

Segue um sistema de contador de visitas simples para um site

Código:


<%

 ' Nome do arquivo para armazenar as visitas
 filePath = request.serverVariables("APPL_PHYSICAL_PATH") & "teste.txt"
 
 ' Abrir arquivo para leitura
 set openArquivo = createObject("scripting.filesystemobject").OpenTextFile(filePath)

 ' Ler número de visitas antigas
 visitas = openArquivo.readAll()+ 1

 ' Imprimir na tela o número das novas visitas
 response.write(visitas)

 ' Fechar arquivo
 openArquivo.close()

 ' Abrir arquivo novamente
 set openArquivo = createObject("scripting.filesystemobject").CreateTextFile(filePath)
 
 ' Escrever no arquivo o novo número de visitas
 openArquivo.write(visitas)

 ' Fechar arquivo
 openArquivo.close()
 
%>


Não se esqueça de criar o arquivo teste.txt na pasta do servidor.
Coloquei os comentários para ajudar no entendimento do código.


Espero que tenham gostado.
Em breve novas postagens relacionadas a ASP. Grande abraço!