segunda-feira, 5 de dezembro de 2011

(ASP) Contador de Visitas em ASP

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

<%

' 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!


Nenhum comentário:

Postar um comentário