---
title: "Ändra tillbaka datumet?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13583-ändra-tillbaka-datumet"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "origon"
published: "2002-01-05T17:22:00.000Z"
updated: "2002-01-05T21:02:00.000Z"
replies: 5
views: 201
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/13583-ändra-tillbaka-datumet"
---

# Ändra tillbaka datumet?

## #1 — origon, 2002-01-05T17:22Z

Hej jag har använt mig av denna kod för att få fram datumet( 05/01/02 ) men jag märkte att det blev lite problem då jag skulle jämnföra olika datum så jag undrar om man kan göra om datumetformatet 05/01/02 till 2002-01-05

Tror ni detta är möjligt och hur gör jag i sådana fall? tack.

```
right("0" & day(date()),2) & "/" & right("0" & month(date()),2) & "/" & right(Cstr(datepart("yyyy",date)),2)
```

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

## #2 — LarsG, 2002-01-05T18:49Z

Ja, om variabeln str innehåller 01/05/02 så kan du göra om det till ett datum med

```
dateV = dateserial(2000+cint(left(str,2)),cint(mid(str,4,2)),cint(right(str,2)))
```

 <http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vsfctdateserial.asp>

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

## #3 — origon, 2002-01-05T20:20Z

ok men det fungerar inte riktigt som jag hade tänk :)

Med följande kod får jag datumet

2006-10-23

```
str = "01/05/02"
dateV = dateserial(cint(left(str,2)),cint(mid(str,4,2)),2000+cint(right(str,2)))

Response.Write dateV
```

Jag vill istället att det ska vara 2001-01-05

\=)  hoppas det går att lösa.

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

## #4 — jorgen, 2002-01-05T20:39Z

Väldigt otestad funktion, men borde funka:

```
Function MyDate(Datum)
If Datum <> "" Then
yyyy = Year(Datum)
mm = Month(Datum)
dd = Day(Datum)
if mm < 10 then mm = "0" & mm
if dd < 10 then dd = "0" & dd
MyDate = yyyy&"-"&mm&"-"&dd&"
End If
End Function
```

mvh Jörgen :)

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

## #5 — origon, 2002-01-05T20:45Z

ahh men go jorgen fungerar perfect efter att jag bara tagit bort &" på slutet vid
MyDate = yyyy&"-"&mm&"-"&dd

Så koden ser ut som följande.

```
Function MyDate(Datum)
If Datum <> "" Then
yyyy = Year(Datum)
mm = Month(Datum)
dd = Day(Datum)
if mm < 10 then mm = "0" & mm
if dd < 10 then dd = "0" & dd
MyDate = yyyy&"-"&mm&"-"&dd
End If
End Function
```

Tack du också LarsG ni killar är sanna hjältar ;)

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

## #6 — origon, 2002-01-05T21:02Z

Hallå igen det fungerade perfekt om man hade datumet som följande 02/01/05 men nu har jag datumet i följande format 05/01/02.

(Notera det är dagens datum jag använder)
Mitt datum format är då \[ Dag/Månad/År \]

Då jag använde mig av jorgens förslag blev datumet 2005-01-02 vilket är lite knasigt :)

Hoppas det går att göra ngt åt mitt knepiga datum format :OO

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13583-ändra-tillbaka-datumet