<% d = Now() Response.Write d & "
" SetLocale("da") Response.Write d & "
" %>