Soma De Ano

[filipeflc00]

AI GALERA

OLHEM SO..

Galera

tenho um code aki

q nele estou tentando falar

seo o aniversario do cara já tiver passado acontecer umm evento..se tiver no dia..acontecer outro evento..

se não tiver xegado ainda ..não efetuar nehum evento

de um olhada

data = Date()
data3 = objRS("dt_nasc")


' SE já TIVER PASSADO O QUE N~~AO ESTA FUNFANDO	
 If day(data3) < day(data) and month(data3) < month(data)  Then

 ' EVENTO 1
 'SE ESTIVER NO DIA.. funciona beleza..
ElseIf day(data3) = day(data) and month(data3) = month(data)  Then
 ' EVENTO 2

Else
 ' NENHUM EVENTO

End If

%>



ae galera da uma olhada ai

agradeço a vocês pela força

abraços

[kuroi]

o primeiro if ta errado.

to com preguica de explicar porque, mas o certo seria:

If (month(data) > month(data3)) Or (month(data) = month(data3) And day(data) > day(data3)) Then

' EVENTO 1

ElseIf day(data3) = day(data) and month(data3) = month(data)  Then
' EVENTO 2

Else
' NENHUM EVENTO

End If

[fercosmig]

opa! fiz agora ae e testei! tá funfando de boa!

[filipeflc00]

ai galera..valw e já tinha conseguido com o q o nosso amigo "kuroi" deixou

mas msmo assim..valwzão pela força

abraço a todos e agradeço desde já