<%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="System.Globalization" %>
<script language="VB" runat="server">
Sub Page_Load(Source as Object, E as EventArgs)
Dim dt As DateTime = DateTime.Now
Dim strCultureInfo As CultureInfo = New CultureInfo("it-IT")
response.write( dt.ToString("f", strCultureInfo ) )
end sub
</script>