---
title: "Datum"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12808-datum"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "graf"
published: "2001-11-25T10:09:00.000Z"
updated: "2001-11-25T10:49:00.000Z"
replies: 6
views: 152
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/12808-datum"
---

# Datum

## #1 — graf, 2001-11-25T10:09Z

Hur gör jag för att det ska bli ett svenskt datum?
Försökte men fick då ett felmeddelande, såhär ser koden ut för hela sidan:

\<%

Set db = Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (\*.mdb)}; DBQ=" & server.mappath ("db/guestbook.mdb")

SQL = "SELECT \* From Guestbook ORDER BY Datum DESC"
Set rs = db.Execute(SQL)

%\>

\<!--
0========================================================================0

	
0========================================================================0
//--\>

\<html\>
\<head\>
	\<title\>Graf\</title\>

\<link rel="stylesheet" type="text/css" href="style.css"\>

\</head\>

\<body\>

\<form action="check.asp" method="post"\>
\<table width="400" border="0" cellspacing="0" cellpadding="0"\>
  \<tr\>
    \<td width="100"\>\<b\>Användarnamn:\</b\>\</td\>
    \<td width="300"\>\<input name="namn" id="input"\>\</td\>
  \</tr\>
  \<tr\>
    \<td width="100"\>\<b\>Epost:\</b\>\</td\>
 \<td width="300"\>\<input name="eposy" value="@" id="input"\>\</td\>
  \</tr\>
  \<tr\>
    \<td width="100"\>\<b\>Hemsida:\</b\>\</td\>
    \<td width="300"\>\<input name="hemsida" value="http://" id="input"\>\</td\>
  \</tr\>
  \<tr\>
    \<td width="100"\>\<b\>Rubrik:\</b\>\</font\>\</td\>
    \<td width="300"\>\<input name="icq" id="input"\>\</td\>
  \</tr\>
  \<tr\>
    \<td width="100" valign="top"\>\<b\>Meddelande:\</b\>\</td\>
    \<td width="300"\>\<textarea rows="5" cols="40" name="meddelande" id="input"\>\</textarea\>\</td\>
  \</tr\>
  \<tr\>
    \<td colspan="2"\>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;\<input type="submit" value="Skicka" id="input"\> \<input type="reset" value="Rensa" id="input"\>\</td\>
  \</tr\>
\</table\>
\</form\>

\<br\>\<br\>
\<P\>
\<img src="hr.gif"\>
\<p\>
\<table width="400" border="0" cellspacing="0" cellpadding="0"\>
\<%
Do Until rs.EOF
%\>
\<%
meddelande=Replace(rs("meddelande"),vbCrLf, "\<br\>")
%\>
  \<tr\>
    \<td width="400"\>\<b\>Användarnamn:\</b\> \<%If Not rs("epost")="" Then%\>\<a href="mailto:\<%=rs("epost")%\>"\>\<%=rs("namn")%\>\</a\>\<%End IF%\> (\<%=rs("datum")%\> )\</td\>
  \<br\>\</tr\>
  \<tr\>\<%If Not rs("hemsida")="" Then%\>
    \<td width="400"\>\<b\>Hemsida:\</b\> \<a href="\<%=rs("hemsida")%\>" target="\_blank"\>\<%=rs("hemsida")%\>\</a\>\</td\>
      \<%End IF%\>\<br\>
  \</tr\>
  \<tr\>\<%If Not rs("icq")="" Then%\>
    \<td width="400"\>\<b\>Rubrik: \<%=rs("icq")%\>\</B\>\</td\>
      \<%End IF%\>
  \</tr\>\<br\>
  \<tr\>
    \<td width="400"\>\<%=meddelande%\>\</td\>
  \</tr\>
\</table\>
\<p\>
\<img src="hr.gif"\>
\<p\>
\<%
rs.MoveNext
Loop
%\>

\</body\>
\</html\>

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

## #2 — iceM2, 2001-11-25T10:13Z

Ska fungera bra med

```
<% session.lcid = 1053 %>
```

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

## #3 — hacktheplanet, 2001-11-25T10:15Z

\<%Session.LCID = 1053%\>

\<%

Set db = Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (\*.mdb)}; DBQ=" & server.mappath ("db/guestbook.mdb")

SQL = "SELECT \* From Guestbook ORDER BY Datum DESC"
Set rs = db.Execute(SQL)

%\>

\<!--
0========================================================================0

0========================================================================0
//--\>

\<html\>
\<head\>
\<title\>Graf\</title\>

\<link rel="stylesheet" type="text/css" href="style.css"\>

\</head\>

\<body\>

\<form action="check.asp" method="post"\>
\<table width="400" border="0" cellspacing="0" cellpadding="0"\>
\<tr\>
\<td width="100"\>\<b\>Användarnamn:\</b\>\</td\>
\<td width="300"\>\<input name="namn" id="input"\>\</td\>
\</tr\>
\<tr\>
\<td width="100"\>\<b\>Epost:\</b\>\</td\>
\<td width="300"\>\<input name="eposy" value="@" id="input"\>\</td\>
\</tr\>
\<tr\>
\<td width="100"\>\<b\>Hemsida:\</b\>\</td\>
\<td width="300"\>\<input name="hemsida" value="http://" id="input"\>\</td\>
\</tr\>
\<tr\>
\<td width="100"\>\<b\>Rubrik:\</b\>\</font\>\</td\>
\<td width="300"\>\<input name="icq" id="input"\>\</td\>
\</tr\>
\<tr\>
\<td width="100" valign="top"\>\<b\>Meddelande:\</b\>\</td\>
\<td width="300"\>\<textarea rows="5" cols="40" name="meddelande" id="input"\>\</textarea\>\</td\>
\</tr\>
\<tr\>
\<td colspan="2"\>                         \<input type="submit" value="Skicka" id="input"\> \<input type="reset" value="Rensa" id="input"\>\</td\>
\</tr\>
\</table\>
\</form\>

\<br\>\<br\>
\<P\>
\<img src="hr.gif"\>
\<p\>
\<table width="400" border="0" cellspacing="0" cellpadding="0"\>
\<%
Do Until rs.EOF
%\>
\<%
meddelande=Replace(rs("meddelande"),vbCrLf, "\<br\>")
%\>
\<tr\>
\<td width="400"\>\<b\>Användarnamn:\</b\> \<%If Not rs("epost")="" Then%\>\<a href="mailto:\<%=rs("epost")%\>"\>\<%=rs("namn")%\>\</a\>\<%End IF%\> (\<%=rs("datum")%\> )\</td\>
\<br\>\</tr\>
\<tr\>\<%If Not rs("hemsida")="" Then%\>
\<td width="400"\>\<b\>Hemsida:\</b\> \<a href="\<%=rs("hemsida")%\>" target="\_blank"\>\<%=rs("hemsida")%\>\</a\>\</td\>
\<%End IF%\>\<br\>
\</tr\>
\<tr\>\<%If Not rs("icq")="" Then%\>
\<td width="400"\>\<b\>Rubrik: \<%=rs("icq")%\>\</B\>\</td\>
\<%End IF%\>
\</tr\>\<br\>
\<tr\>
\<td width="400"\>\<%=meddelande%\>\</td\>
\</tr\>
\</table\>
\<p\>
\<img src="hr.gif"\>
\<p\>
\<%
rs.MoveNext
Loop
%\>

\</body\>
\</html\>

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

## #4 — iceM2, 2001-11-25T10:17Z

bra Hacketplanet! Jag var lite otydlig. Anledningen till att du förmodligen behöver använda "session.lcid = 1053" är för att du har din sajt på en icke-svensk server? Då behöver man använda denna session för att ställa om till svenskt-tidformat.

\[Redigerat av iceM2 den 25 nov 2001\]

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

## #5 — graf, 2001-11-25T10:21Z

Tack så mycket!
Men när jag skriver ett inlägg så syns inte användarnamnet fast att man skriver sitt användarnamn när man skriver inlägget.
Man såg användarnamnet tidigare, men vad är det för fel i koden nu?

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

## #6 — iceM2, 2001-11-25T10:30Z

Du har ju inte infogat användarnamnet i din kod där du visar inläggen...

```
<tr>
<td width="400"><b>Användarnamn:</b> <%If Not rs("epost")="" Then%><a href="mailto:<%=rs("epost")%>"><%=rs("namn")%></a><%End IF%> (<%=rs("datum")%> )</td>
<br></tr>
```

Ersätt med ngt i den här stilen

```
<tr>
<td width="400"><b>Användarnamn: <%=rs("namn")%> </b> <%If Not rs("epost")="" Then%><a href="mailto:<%=rs("epost")%>"><%=rs("namn")%></a><%End IF%> (<%=rs("datum")%> )</td>
<br></tr>
```

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

## #7 — graf, 2001-11-25T10:49Z

Jag tackar så hemskt mycket!
Det fungerade!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/12808-datum