Hej,

Jag har sökt och hittade en massa frågor om datumformat, men inget som löste detta:

Jag får datum i formatet 2004-06-16 från databasen(Oracle) och vill presentera detta så här:
Jun -04

Alltså tre första bokstäverna i månaden och sen året.

Det är lite bråttom, så jag blir lycklig om någon kan hjälpa mig!

/Jocke

Det finns ingen jätte bra lösning till detta då formatet du vill ha inte stöds av FormatDateTime() men det går ju alltid att göra en egen lösning.

<code>
<%
dim strDate, strMonth, strYear
strDate = "2004-06-16" 'Det datum du vill göra om
strYear = mid(strDate, 3, 2)
strMonth = mid(strDate, inStr(1,strDate,"-")+1,2)

Select case strMonth
case "01"
strMonth = "Jan"
case "02"
strMonth = "Feb"
'Orkar inte mata in alla månader något ska du göra själv.... ;)

End Select

strDate = strMonth & " -" & strYear
Response.Write strDate
%>
</code>

Genom att lägga till argumentet "Abbreviate" till functionen monthname så får du fram en förkortad version:

response.write monthname( month( strDate ) , true ) & " -" & mid( year( strDate ), 3, 2)

Tack!! Det funkar med den "långa" versionen.

Hur menar du, Vide? Jag är inte riktigt med på hur du menar?

/Jocke

Jag menar att för att få ut en förkortning på månadsnamnet så kan man använda sig utav det andra valfriga argumentet i funktionen MonthName().

Så istället för att skriva en statisk lista på olika månadsnamn i koden så kan du låta vbscript hantera detta med den enkla koden:

response.write monthname( strDate, true )

Aha, smidigt!!

Tack!!

/Jocke