Contador de visitas, ele esta zerando

é o seguinte fiz um contador de visitas seguindo um tuto aqui do site mesmo , o código é em asp deem uma olhada, este código esta fiuncionando perfeitamente, só q o que esta aconteceno, quando eu acesso ele no outro dia ele apresenta apenas 1 visita, ele zera e começa denovo , o que pode estar havendo?

o código é esse

<% Set FSO = Server.CreateObject("Scripting.FileSystemObject")//Aqui criamos um arquivo .txt com o nome de contador que será o arquivo em que importaremos para o Flashorigem = Server.MapPath("contador.txt") Set contador = FSO.CreateTextFile(origem,true)//Criamos uma pequena aplicação para fazer a contagem de acessos da páginaApplication.lock Application("visitas") = Application("visitas") + 1 visitas = Application("visitas") Application.Unlock//E por último gravamos o nosso valor de "visitas" no nosso arquivo .txtcontador.write "contador=" & visitas contador.close %>