Contador Semanal

[leozeferino 0]

Olá.

 

Através da ajuda do forum montei um sisteminha para um "top semanal". Numa data específica, o proprio código zera o campo "contadorS" e adiciona 7 dias no campo "data_para_zerar".

 

O código está abaixo:

ASP

[*] rstAtualizar.open "select * FROM Tabela1", Conexao, 3, 1

 

[*]if data_para_zerar <= date then

 

[*]rstAtualizar.close

 

[*]rstAtualizar.open "update Tabela1 set contadorS = 0, data_para_zerar = dateadd('d',7,data_para_zerar) where data_para_zerar <= #" & Date & "# ", Conexao, 3, 1

 

[*]end if

 

Porém, ele está zerando o campo e alterando a data toda vez que executo o código, mesmo que a data_para_zerar não seja a do dia.

 

O que eu posso estar fazendo de errado?

Me ajudem.

 

Obrigado.

[Generation 0]

Bom Nao sei como voce esta trabalhando com esses dados, mas assim da certo...

 

ASP

[*]<%

 

[*]If DateDiff("d",rs("CAMPODATA",Date()) >= 7 Then

 

[*] ' Executa o Update com a nova Data

 

[*] ' Para Efetuar o Calculo de Hoje mais 7 Dias use = DateAdd("d",now,7)

 

[*]Else

 

[*] ' Ignora e Executa a outra parte do Codigo

 

[*]End If

 

[*]%>

 

 

Espero que ajude

 

 

T+

[leozeferino 0]

Kra, o código está funcionando da seguinte forma:

 

Na 1a. vez que eu testo, ele zera o campo desejado e adiciona 7 dias na data, porém na 2a. vez ele não altera a data(está certo) mas zera de novo o campo desejado. Eu gostaria que ele zerasse somente uma vez por semana e não o dia todo.

O código que estou usando é o seguinte:

ASP

[*]rstAtualizar.open "select * FROM Tabela1", Conexao, 3, 1

 

[*]If DateDiff("d",data_para_zerar,Date()) >= 7 Then

 

[*]rstAtualizar.close

 

[*]rstAtualizar.open "Update Tabela1 set contadorS = 0, data_para_zerar = dateadd('d',now,7) where data_para_zerar <= #" & date & "# ", Conexao, 3, 1

 

[*]Else

 

[*]...

 

[*]end if

Onde "rstAtualizar" é o recordset, "data_para_zerar" é o campo com a data que quero que zere e "contadorS" é o campo com o número de clicks que será zerado.

 

Se der pra me dar uma ajuda,

 

Agradeço desde já,

 

Obrigado.