Det er der ikke såvidt jeg ved, men det er hurtigt at lave en function selv. Here we go :
<%
function SetZero(val)
   if len(val)=1 then val = "0" & val
   SetZero = val
end function
function DKDato(dato)
   dim mdr
   mdr = array("januar","februar","marts","april","maj","juni","juli","august", _
               "september","oktober","november","december")
   if isdate(dato) then
      Dato = SetZero(day(dato)) & ". " & mdr(month(dato)) & " " & year(dato)
   end if
   
   DKDato = Dato
end function
%>
Kaldes således
<%
response.write DKDato(now)
%>