Piccolo trucco per gestire le date

Ecco un semplice trucco per trasformare il valore restituito dalle funzioni DAY() e MONTH() su 2 cifre nel caso fosse minore di 10.
Normalmente se oggi fosse il 02-02-2003 le due funzioni restituirebbero rispettivamente:
Day(Date) --> 2
Month(Date) --> 2
Come trasformare questi 2 valori in
Day(Date) --> 02
Month(Date) --> 02
senza l'uso di un ciclo condizionale IF per stabilire se minori di 10?
Sfruttiamo la funzione RIGHT(stringa, #char).

<%
giorno = Right(CStr(100+Day(Date)), 2)
mese = Right(CStr(100+Month(Date)), 2)
Response.Write "Oggi è il " & giorno & "/" & mese & "/" & Year(Date)
%>