Fødselsdags script

hvis datoen i tabellen er tilmed datoen nu så skriver den tillykke eller ingenting

if date() = rs(\"Brithday\") then
response.write(\"tillykke\")
else
response.write(\" \")
end if

Du kan bruge

DateDiff(\"d\", Now, theDate)

Kommandoen

Den regner på antallet af dage imellem 2 datoer

strNow = Now()

do while not rs.eof

theDate = left(rs(\"Dato\"),5
myYearLong=Right(Year(now),4):
thedate = thedate & myYearLong

if DateDiff(\"d\", strNow, theDate) < 5 then
\'fødselsdag indenfor 5 dage
strHarFosda = strHarFosda & rs(\"Navn\") & \"<br>\"
end if

rs.movenext
loop

response.write strHarFosda

du kan ikke uden at have adgang til opgavestyring på serveren få et script til at eksekvere sig selv på denne måde i asp. i SQL server kan man så vidt jeg ved få det til at virke, men med normal access/asp skal der være \"noget\" eller \"nogle\" til at starte et script - og så er du afhængig af at der kommer en besøgende hver dag og starter scriptet

hirayz: Det kan jeg ikke bruge. Jeg skal bruge datoen 5 dage før end at birthday, og desuden skal alle datoerne i tabellen jo ende på 2002, hvilket ikke er optimalt.

keysersoze: Jeg har planlagt at lave skidtet om til en .vbs fil. På denne måde kan jeg bare starte det som en hver anden fil.

hirtshals: Man kan ikke behandle datoer på denne måde.

Min SQL kom til at se sådan her ud:

SELECT tblBirthDayReminder.ID, tblBirthDayReminder.Name, tblBirthDayReminder.Birthday, IIf(DateSerial(Year(Date()),Month([Birthday]),Day([Birthday]))<Date(),DateSerial(Year(Date())+1,Month([Birthday]),Day([Birthday])),DateSerial(Year(Date()),Month([Birthday]),Day([Birthday]))) AS userNext, DateDiff(\"d\",Date(),[userNext]) AS userBetween, Year([usernext])-Year([Birthday]) AS userAge, tblBirthDayReminder.Telefonnr
FROM tblBirthDayReminder
WHERE (((tblBirthDayReminder.Birthday) Is Not Null));