Formatera datum

Hej, hur formaterar jag enklast ett datum som "MM/DD/YYYY", med inledande nolla på månad och dag?
Att ändra LCID till USA är nästan lösningen, men då blir det inga inledande nollor.
Tacksam för svar!

Function UsaDate(myDate)
  Dim dMonth,dDay,dYear
  dMonth = Month(myDate)
  dDay = Day(myDate)
  dYear = Year(myDate)
  UsaDate = right(0 & dMonth,2) & "/" & right(0 & dDay,2) & "/" & dYear
End Function

Tack för hjälpen. ASP i ett nötskal.
I PHP är det date("m/d/Y") :P