---
title: "Formattering av datum? (Access db)"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/66559-formattering-av-datum-access-db"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "kilpin"
published: "2003-01-29T18:11:40.000Z"
updated: "2003-01-29T20:12:09.000Z"
replies: 4
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/66559-formattering-av-datum-access-db"
---

# Formattering av datum? (Access db)

## #1 — kilpin, 2003-01-29T18:11Z

Hej,
jag har ett litet men säkert enkelt problem. Jag presenterar nyheter på min sida som hämtas ur en databas. Överst visas datumet för nyheten och detta läggs in automatiskt i databasen. Saken är dock den att när datumet visas så är det formatterat efter amerikansk stil, dvs: 1/29/2003 om nyheten är inlagd den 29 januari 2003. Kan man ändra på  detta och hur?

Jag tror inte att detta spelar någon roll men jag bifogar en kodsnutt:

```
<%	Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("databas.mdb")) %>

<% Set RecSet = Server.CreateObject("ADODB.Recordset")%>
<% Visanews = "SELECT * FROM nyheter ORDER BY ID DESC"
	RecSet.Open Visanews, Connect, adOpenStatic, adLockOptimistic
%>

<%
	Dim antal
	antal = 0

	Do While antal < 15
	If RecSet.EOF Then Exit Do
	     %> 

<% Response.Write hyperlank(RecSet("datum")) %><br>
<% Response.Write hyperlank(RecSet("rubrik")) %>
```

 

Anledningen till att jag använder hyperlank(RecSet("xxx")) är att jag använder automatiskt formattering av länkar, mailadresser etc. Ett script som jag hittat här någonstans om jag inte minns fel. Här är det:

```
<%

Function hyperlank(strText)

strText = Server.HTMLEncode(strText)
strText = Replace(strText,VbCrLf,VbCrLf&" <br> ") 
HyperArray = Split(strText)
For Each ord in HyperArray
if Len(ord) > 7 then
if Lcase(left(ord,7)) = "http://" then
strText2=strText2 & "<a href='"&ord&"' target='_blank'>"&ord&"</a> "
elseif InStr(ord,"@")>1 then
strText2=strText2 & "<a href='mailto:"&ord&"'>"&ord&"</a> "
else
strText2=strText2&ord&" "
end if
else
strText2=strText2&ord&" "
end if
next
hyperlank = strText2

end function

text = Request.Form("text")

Response.Write hyperlank(text)
%>
```

Kan det ha med saken att göra?
Ursäkta det långa inlägget för en sådan trivial fråga.

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

## #2 — Nickemannen, 2003-01-29T18:14Z

Sök på Session.LCID

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

## #3 — @nders, 2003-01-29T18:15Z

Måste du köra funktionen hyperlank() på datumet? Det känns onödigt. 

För att få svensk presentation av datum och tid använder du Session.LCID på din sida (eller rättare sagt, på sessionen.)

```
Session.LCID = 1053
```

Du måste också se till att göra en subtypskonvertering så dina datum verkligen är av datumtyp. 

```
Response.write CDate(RecSet("datum"))
```

Mvh,

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

## #4 — kilpin, 2003-01-29T18:18Z

Helt riktigt att jag inte behöver använda hyperlank() på datumet. Det gjorde jag nog i ren sinnesförvirring.

Tack också för svaren, jag skall söka och kolla på det snart. Först ska jag äta pytt i panna!

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

## #5 — kilpin, 2003-01-29T20:12Z

Lite senare samma kväll:
upplysningsvis kan jag meddela att det räckte med att ta bort hyperlank(). Dvs jag körde ett vanligt \<%=RecSet("datum")%\> föratt få det att se bra ut.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/66559-formattering-av-datum-access-db