webForumDet fria alternativet

funktion som visar tiden

ASP

1 svar · 355 visningar · startad av Fredriksson

Medlem sedan nov. 2000319 inlägg
Frågan#1

Funktionen nedan skriver ut vilken tidpunkt en post i min databas är inlagd. Är det idag så visas "idag", igår visas "igår" och därefter visas datumet.

Skulle behöva hjälp med några förändringar.

Som det är nu så gör den inte skillnad på år. Dvs ett inlägg visas som "igår" även om det skrevs för ett år och en dag sedan...

Vill också att årtalet ska visas efter datumet i dom fall då inlägget inte är inlagt det nuvarande året.

Hoppas nån kunning kan hjälpa mig.

function tid(x)

c = right(x,8)
c = left(c,5)

m = mid(x,6,2)

if m = 01 then
m = "jan"
elseif m = 02 then
m = "feb"
elseif m = 03 then
m = "mars"
elseif m = 04 then
m = "april"
elseif m = 05 then
m = "maj"
elseif m = 06 then
m = "juni"
elseif m = 07 then
m = "juli"
elseif m = 08 then
m = "aug"
elseif m = 09 then
m = "sept"
elseif m = 10 then
m = "okt"
elseif m = 11 then
m = "nov"
elseif m = 12 then
m = "dec"

end if

d = mid(x,9,2)

if ((mid(now,6,2) = mid(x,6,2)) AND ( clng(mid(x,9,2)) = (clng(mid(now,9,2)-1)) )) then

tid = "igår " & c

elseif left(now,10) = left(x,10) then

tid = "idag " & c

else

tid = d & " " & m & " " & c

end if

end function
Medlem sedan dec. 19996 721 inlägg
#2

Använd Year, Month, Day eller DatePart i stället för Mid, för att plocka ut datumdelar. Använd DateDiff för "igår"-testen.

265 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
129 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
128 ms — ändringar (db)