---
title: "funktion som visar tiden"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/169806-funktion-som-visar-tiden"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Fredriksson"
published: "2008-03-11T12:48:25.000Z"
updated: "2008-03-11T22:40:43.000Z"
replies: 1
views: 372
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/169806-funktion-som-visar-tiden"
---

# funktion som visar tiden

## #1 — Fredriksson, 2008-03-11T12:48Z

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
```

Permalänk: https://www.webforum.nu/p/169806

## #2 — emission, 2008-03-11T22:40Z

Använd [Year](http://www.w3schools.com/vbscript/func_year.asp), [Month](http://www.w3schools.com/vbscript/func_month.asp), [Day](http://www.w3schools.com/vbscript/func_day.asp) eller [DatePart](http://www.w3schools.com/vbscript/func_datepart.asp) i stället för Mid, för att plocka ut datumdelar. Använd [DateDiff](http://www.w3schools.com/vbscript/func_datediff.asp) för "igår"-testen.

Permalänk: https://www.webforum.nu/p/2087619

---

Tråden på webben: https://www.webforum.nu/amne/asp/169806-funktion-som-visar-tiden