---
title: "Göra om datum funktion?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/106843-göra-om-datum-funktion"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bosse168"
published: "2004-07-06T21:36:32.000Z"
updated: "2004-07-08T06:28:40.000Z"
replies: 5
views: 235
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/106843-göra-om-datum-funktion"
---

# Göra om datum funktion?

## #1 — Bosse168, 2004-07-06T21:36Z

Har en loop där jag efter varje rad hämtar ut och gör om datumet.
Någon som vet hur man gör så man slipper gå igenom alla If satser i loopen och anropa en funktion som gör om datumet.
För det måste väl vara mer resurs snålt att anropa en funktion än att köra all kod nedan efter varje ny rad i loopen?

Nuvarande:

```
Dim check
check = DateDiff("d", Date, Rs("datum")) 
if check = 0 then
response.write "<font color='#FF0000'>Idag</font> klockan "& FormatDateTime(Rs("datum"), 4) &"" 
elseif check = -1 then 
response.write "Igår klockan "& FormatDateTime(Rs("datum"), 4) &"" 
Else 
Response.Write FormatDateTime(Rs("datum"), 2) &" ["& FormatDateTime(Rs("datum"), 4) &"]"
End If
```

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

## #2 — yohpops, 2004-07-07T05:33Z

Jag tror knappast att det gör någon större skillnad men, det går att använda en sub.

```
sub fixdate(in_date)
Dim check
check = DateDiff("d", Date, in_date) 
if check = 0 then
response.write "<font color='#FF0000'>Idag</font> klockan "& FormatDateTime(in_date, 4) &"" 
elseif check = -1 then 
response.write "Igår klockan "& FormatDateTime(in_date, 4) &"" 
Else 
Response.Write FormatDateTime(in_date, 2) &" ["& FormatDateTime(in_date, 4) &"]"
End If

end sub
```

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

## #3 — Bosse168, 2004-07-07T10:46Z

hur använder jag "subben" i loopen :)

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

## #4 — yohpops, 2004-07-07T11:44Z

```
fixdate rs("datum")
```

skriv ut mer kod så kan jag visa.

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

## #5 — Bosse168, 2004-07-07T14:52Z

Men den blir ingen prestanda ökning genom att sätta den i en sub?

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

## #6 — yohpops, 2004-07-08T06:28Z

Jag skulle inte tro det.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/106843-göra-om-datum-funktion