Ifall det inte är idag

if datediff("d",cdate(rs3("datum")),date()) = 0 then
   response.write cdate(rs3("datum"))
else
   response.write "Inte idag"
end if

/r

tackar! :P God Jul!

Jag ändrade koden lite, så att man lättare kan skriva in den i en loop! Men nu skriver den bara ut "Inte idag" även om det är idag...

if datediff("d",cdate(rs3("datum")),date()) = 0 then
datum = cdate(rs3("datum"))
else
datum = "Inte idag"
end if

Vad gör du med variabeln datum? Du får nog visa lite mer kod om jag skall kunna förstå något om vad som händer.

Jag använder "now" för att lägga in datumet i databasen, sen vill jag hämta ut tiden (t.ex 20:00) bara... Inte hela datumet. Det jag använder den till, är för att se när användarna besökte min Profil... eller någonannans!

Det är bara den koden du visade, sen <%=datum%> för att skriva ut det!

Om koden funkar för sig, men inte i loopen, då borde det ju vara något som blivit konstigt när du placerade koden i loopen.

Visa mer kod, annars har vi inte en chans att hjälpa dig även om vi skulle vilja.

Vet inte vad jag gjorde, men det fungerar nu! Hur gör jag för att den bara ska skriva ut Timmarna o Minuterna?
T.ex 18:00

detta kanske kan funka!

if datediff("d",cdate(rs3("datum")),date()) = 0 then
datum = right(cdate(rs3("datum")), 5)
else
datum = "Inte idag"
end if

Eller om du vill ha en mer "rätt" lösning:

strDatum = Hour(rs3("datum")) & ":" & Minute(rs3("datum"))

Tackar allihopa! God Jul!

Kommer 0:orna med också?

Satt det inte blir t.ex 1:1 när det ska vara 01:01?

Jag brukar använda "len()" funktionen.

dim intHour
dim intMinute

if len(Hour(rs3("datum"))) = 1 then
    intHour = "0"&Hour(rs3("datum"))
else
    intHour = Hour(rs3("datum"))
end if

if len(Minute(rs3("datum"))) = 1 then
    intMinute = "0"&Minute(rs3("datum"))
else
    intMinute = Minute(rs3("datum"))
end if

strDatum = intHour & ":" & intMinute

Eller lite kortare ersättning till Wickmarks kod:

dteDatum = CDate(rs3("datum"))
strDatum = Right("0" & Hour(dteDate), 2) & ":" & Right("0" & Minute(dteDate), 2)

Minsann,
alltid lär man sig ngt nytt :D

Jag hade faktisk tänkt skriva en liknande funktion, men trodde att metoden right() kanske skulle ersätta den andra siffran, om talet bestod av 2 siffror.

God Jul, förresten :)

hmmm den skriver 00:00 nu :S Hela tiden! Men "Inte idag" Fungerar...

if datediff("d",cdate(rs3("datum")),date()) = 0 then
dteDatum = CDate(rs3("datum"))
strDatum = Right("0" & Hour(dteDate), 2) & ":" & Right("0" & Minute(dteDate), 2)
else
strdatum = "Inte idag"
end if

Sparar du tiden i fältet datum då?

ja, det funkade innan! Men det vart 20:1 istället för 20:01!

Men nu med nya koden vart det hela tiden 00:00

men annars fungerar Wickmark's kod...

God Jul!