Denna lilla datumutskrift visar datum som följande:
fredag den 6 april 2001

<%
Response.Write(WeekDayName(WeekDay(Date())) & " den " & Day(Date()) & " " & MonthName(Month(Date())) & " " & Year(Date()))
%>

Nu vill jag att vackodagen skall inledas med versal, hur gör jag då??
Fredag den 6 april 2001

mvh
Torbjörn

Hej!

Tja, en variant är att göra UCase() på första bokstaven i veckonamnet:

<code>
Response.Write(UCase(Mid(WeekDayName(WeekDay(Date())), 1, 1)) & Mid(WeekDayName(WeekDay(Date())), 2, Len(WeekDayName(WeekDay(Date())))) & " den " & Day(Date()) & " " & MonthName(Month(Date())) & " " & Year(Date()))
</code>

Lycka till och lev väl,
Tom S.

Aaah Lysande!


Tackar !

/Torbjörn

Det är snyggar att kapsla funktionen. De behöver inte göra anropen till funktionerna som hämtar weckodagens namn två gånger samt gör koden mer lätt läst. Går också att förenkla den genom att använda left i första delen istället för mid och skippa tredje parametern för mid funktionen i den andra mid satsen.

/Mvh, Andreas Hillqvist

Response.Write ProperCase(WeekdayName(Weekday(Date()))) & " den " & Day(Date()) & " " & MonthName(Month(Date())) & " " & Year(Date())


Function ProperCase(Text)
ProperCase = UCase(Left(Text, 1)) & LCase(Mid(Text, 2))
End Function