---
title: "Svensk tid med brinkster"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/73325-svensk-tid-med-brinkster"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "JannesBoy"
published: "2003-04-06T16:47:35.000Z"
updated: "2003-04-16T09:25:55.000Z"
replies: 5
views: 388
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/73325-svensk-tid-med-brinkster"
---

# Svensk tid med brinkster

## #1 — JannesBoy, 2003-04-06T16:47Z

Någon som vet hur man får svensk tid när man har brinkster?

now()

Då får man ju tiden som e på servern... O det är ju typ amerikansk där...

Hur får man den till svensk tid istället? Observera att jag vill ha klockslag också och inte bara datum. :q

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

## #2 — SteveP, 2003-04-06T16:53Z

Test med 

Session.LCID = 1053

eller

SetLocale 1053

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

## #3 — @nders, 2003-04-06T16:57Z

Jag antar att det är några timmar skillnad i tid också?

```
<%
Session.LCID = 1053

Function GetTime(currentTime)
     GetTime = DateAdd ("h", 6, currentTime)
End function

Response.write GetTime(now())
```

Mvh

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

## #4 — plelkes, 2003-04-16T08:18Z

@nders, jag använder också brinkster, och när jag försökte följa ditt exempel:

```
<html>
<head>
<title>g&amp;auml;stbok</title>
<meta http-equiv=Content-Type content=text/html; charset=iso-8859-1>

</head>

<p align=center><font size=7><b><i><font color=#FFCC33>V&auml;lkommen till 
  skolans g&auml;stbok</font></i></b></font></p>
 
<%  dim minCon 'Connection
     dim rsGbok 'recordsetten f&ouml;r nya inl&auml;gg
     dim strSQL

dim indag, dat
Session.LCID = 1053 

Set minCon = Server.CreateObject("ADODB.Connection")
set rsGbok = Server.CreateObject("ADODB.Recordset")

minCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\plelkes\db\guests.mdb")
strSQL =" SELECT * FROM guestbook ORDER by ID DESC"
rsGbok.Open strSQL, minCon, 3, 3
Do While Not rsGbok.EOF
indag = Cdate(rsGbok("Datum"))
Function SvTid(indag)
      SvTid = DateAdd ("h", 6, indag)

dat = WeekDayName(WeekDay(indag))&"en "& FormatDateTime(indag, 1) &" kl " & FormatDateTime(SvTid, vbshorttime)
Response.Write "<P>" & dat & " skrevs följande:</P>"
Response.Write "<P><B><FONT SIZE=""4""><I>" & rsGbok("Message") & "</I></FONT></B></P><BR><B><U>"
Response.Write "      av:"
Response.Write "</U></B>   " & rsGbok("Namn")
Response.Write "<BR><A HREF=""rsGbok('Epost')"">Skicka insändaren E-post:  </A>"
Response.Write "<P></P><P></P><HR></HR>"

  rsGbok.MoveNext

  Loop

End function

  rsGbok.Close
  Set rsGbok = Nothing
  minCon.Close
  Set minCon = Nothing
  %>
</body>
</html>
```

 
Så får jag felmeddelandet

> Microsoft VBScript compilation error '800a03ea' 
> 
> Syntax error 
> 
> /plelkes/gastboken.asp, line 27 
> 
> Function SvTid(indag)
> ^

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

## #5 — plelkes, 2003-04-16T08:52Z

Jag  ***löste problemet***  med följande kodsnutt

```
Do While Not rsGbok.EOF
indag = Cdate(rsGbok("Datum"))
vdag = DateAdd("h",6,indag)
dat = WeekDayName(WeekDay(vdag))&"en "& FormatDateTime(vdag, 1) &" kl " & FormatDateTime(vdag,4)
```

 

- fast klart, undrar fortfarande varför jag fick syntaxerror på function

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

## #6 — LarsG, 2003-04-16T09:25Z

Det beror på att function låg inuti din do while. Funktioner skall ligga särskilda från annan kod.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/73325-svensk-tid-med-brinkster