korrekt datoformat

Prøv med en anden LCID session, feks:
Session.LCID = 1031
eller!
Session.LCID = 3081

Så får jeg den enten på tysk eller engelsk.
Jeg skal bruge den i det format på dansk :-s

Session.LCID = 1030

skal stå som det allerførste på siden

Jeg bruger Session.LCID = 1030 som står først på siden :-/

Jeg anveder en lidt anden model da jeg gerne vil kunne styre formatet af datoen forskellige sammenhænge. Nedenstående stump kode har jeg liggende i en seperat fil som jeg inkluderer på de sider hvor jeg har brug for det.

Formatet styrer jeg så fx med DanishFull(rs("dato").Value)

/Lars

<%
  Dim arrDay
  Dim arrMonth
%>

<%
  Function DanishFull(strDate)
    arrDay = Array("", "mandag", "tirsdag", "onsdag", "torsdag", "fredag","lørdag", "søndag")
    arrMonth = Array("", "januar", "februar", "marts", "april", "maj", "juni", "juli", "august", "september", "oktober", "november","december")
    DanskstrDateFull = arrDay(Weekday(strDate,VbMonday)) & " d. " & Day(strDate) & ". " & arrMonth(Month(strDate)) & " " & Year(strDate)
  End Function

  Function DanishFullKap(strDate)
    arrDay = Array("", "Mandag", "Tirsdag", "Onsdag", "Torsdag", "Fredag","Lørdag", "Søndag")
    arrMonth = Array("", "januar", "februar", "marts", "april", "maj", "juni", "juli", "august", "september", "oktober", "november","december")
    DanskstrDateFullKap = arrDay(Weekday(strDate,VbMonday)) & " d. " & Day(strDate) & ". " & arrMonth(Month(strDate)) & " " & Year(strDate)
  End Function

  Function DanishAbbr(strDate)
    arrMonth = Array("", "jan.", "feb.", "marts", "april", "maj","juni", "juli", "aug.", "sept.", "okt.", "nov.","dec.")
    DanskstrDate = Day(strDate) & ". " & arrMonth(Month(strDate)) & " " & Year(strDate)
  End Function

  Function DanishAbbrShort(strDate)
    arrMonth = Array("", "jan.", "feb.", "marts", "april", "maj", "juni", "juli", "aug.", "sept.", "okt.", "nov.","dec.")
    DanskstrDateShort = Day(strDate) & ". " & arrMonth(Month(strDate))
  End Function
%>

Du mangler bare dag navnet, jeg har brugt date() og Now() i sted for rs("dato") bare skift ud:
<%@ Language=VBScript %>
<%session.LCID = 1030 %>
<HTML>
<BODY>
<%
Response.Write "" & WeekDayName(weekday(date))& ". "
Response.Write "" & FormatDateTime(date, 1)
Response.Write " kl. " & FormatDateTime(now, vbShortTime)
%>
</BODY>
</HTML>

Kan desværre ikke få noget af det til at vise det korrekte format :-(
Ved ikke helt hvorfor, må ha noget med serven at gøre, for jeg har nemt fået det til at virke på en anden server..

Har i stedet gjort på den BESVÆRLIGE måde :-/

<% Response.Write  WeekdayName (Weekday(rs("Dato"))) & " d. " & Day(rs("Dato")) & ". " & MonthName (Month(rs("Dato"))) &" " & Year(rs("dato")) & " " & Hour(rs("dato")) & ":" & Minute(rs("dato"))%>

Desværre fandt jeg aldrig ud af en god løsning, for stort set intet virker som jeg vil have det :-(

Tak for hjælpen, men der kom ikke rigtig nogen svar *S*