Hej!

Jag har datumuppgifter i en MS Access databas som jag vill skriva ut i en .asp-sida.

Just nu använder jag mig av koden:

<%=Year(rs("date")) & "-" & Month(rs("date")) & "-" & Day(rs("date"))%>

..problemet är bara att datumen skriv ut så här, tex: 2006-7-2 (utan nollor)

Jag vill ju att det ska vara: 2006-07-02 (med nollor)

Någon som har en lösning på detta?

Tack på förhand!

Mvh,
Kristian

Testa detta, jag är dock lite osäker på om det är rätt format... (kräver dock att det är svenskt datumformat på servern/sessionen).

<%=FormatDateTime(rs("date"), 2)%>

/Johan

Ang: <%=FormatDateTime(rs("date"), 2)%>

Tack fast det formatet gav följande resultat: 5/7/2006

Det beror på att det inte är svenskt format på servern, lägg till följande rad innan (eller den kanske t.o.m. måste vara först på sidan...):

Session.LCID = 1053

/Johan

Kombinationen..

Session.LCID = 1053 och <%=FormatDateTime(rs("date"), 2)%>

..gav resultatet: 07/05-2006

Nära, men inte riktigt där :)

Då är det något konstigt med servern, för 1053 är LCID för svenska, och det borde ge datumformat 2006-07-02.

Du får formattera datumet för hand. Det smidigaste sättet jag hittat att formattera ett tal till två siffror är med Right:

Right("0" & Month(datumet), 2)

Vet inte om detta är ett alternativ för dig, men jag använder det på min hemsida.

Jag har ett JavaScript:

function timedate(datum)
	dim tid,ar,monad,dag
	tid = FormatDateTime(datum, 4)
	ar = year(datum)
	monad = month(datum)
	if monad < 10 then 
	monad = "0" & monad 
	end if
	dag = day(datum)
	if dag < 10 then 
	dag = "0" & dag
	end if
	response.write(ar & "-" & monad & "-" & dag )
end function

Tack för alla svar, jag valde detta - perfekt resultat:

<%=Year(rs("date")) & "-" & Right("0" & Month(rs("date")), 2) & "-" & Right("0" & Day(rs("date")), 2)%>

Altid snyggt att kapsla återanvändbar kod. Dessutom en smula effektivare. Då du bara slår upp värdet från recordsetet
en gång istället för tre gånger.

<%
function ISODate(Value)
    ISODate = Year(Value) & "-" & Right("0" & Month(Value), 2) & "-" & Right("0" & Day(Value), 2)
end function
%>


<%=ISODate(rs("date"))%>