Contador de visitas, ele esta zerando

[tuco 0]

é 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 %>

[tuco 0]

Oi Lucas , o tuto é este ai Flash MX: Contador de visitas em Flash / ASP Artigo publicado em 19/08/2002, por Tiago Colombo Tiago Colombo: tiagocolombo@imasters.com.brOlá Pessoal !Neste artigo, estarei mostrando como fazer um simples contador em Flash utilizando um pequeno script em ASP e também interagindo com um arquivo *.txt.1- Primeiramente, crie uma caixa Dynamic Text (Texto Dinâmico) e coloque o nome da variável como contador, em seguida coloque a seguinte ação do 1º Frame://Esta ação carregará o arquivo .txt onde está sendo salvo o nosso contadorloadVariablesNum ("contador.txt", 0); 2- Feito isso, salve o seu arquivo e exporte. Abra o arquivo .html do seu filme em qualquer editor de textos e coloque o seguinte script no início da página:<% 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 %>Salve o seu arquivo como *.asp.Um aspecto positivo deste contador, é que caso você não queira que o visitante tenha acesso ao contador, e que só você possar ter, apenas tire a caixa Dynamic Text do seu Flash.Para você ter acesso ao contador, basta apenas abrir o arquivo .txt que está salvando todo o registro de visitas da página. Agora para economizar trabalho de estar sempre baixando o arquivo .txt para estar vendo, o script abaixo abri o arquivo .txt em uma página .asp , não precisando baixar o arquivo mas sim acessando ele diretamente do servidor.3- Crie uma nova página .asp e adicione o seguinte script:<%Set FSO = Server.CreateObject("Scripting.FileSystemObject")origem = Server.Mappath("contador.txt")//Abaixo ele abre nosso arquivo "contador.txt" Set TXT = FSO.OpenTextFile(origem)contagem = txt.readALL//e mostra o valor que tem dentro de nosso arquivo.response.write contagem contagem.close %>Só uma observação que devemos ficar ressaltar, sempre que exportar o seu filme, deverá acrescentar o código em .asp e salvar a sua página, pois o Flash exportará em HTML e no nosso caso não interessa.Pronto ! Este é o nosso contador em Flash, interagindo ASP e .txt Até a próxima ! Grato, Tuco

[tuco 0]

Alguém saberia solucionar este problema??

[CaBo GeL 0]

veja bem.... logo de cara ja bati o olho a sua duvida.... acho q sua duvida ta nesta linha Application("visitas") = Application("visitas") + 1 esse + 1 ele vai expirar daki um dia.. por tanto a contagem vai ser zerada.espero q seja isso sua duvida...valewwww