01.<%@ Page Language="VB" %>
02.<script runat="server">
03.
04.Sub Page_Load(sender As Object, e As EventArgs)
05.Me.lblText1.Text = Format(Now,"dd/MM/yyyy ")
06.Me.lblText2.Text = Format(Now,"HH:mm:ss")
07.Me.lblText3.Text = Format(Now,"HH:mm")
08.End Sub
09.
10.</script>
11.<html>
12.<head>
13.</head>
14.<body>
15.<form runat="server">
16.<asp:Label id="lblText1" runat="server"></asp:Label><br />
17.<asp:Label id="lblText2" runat="server"></asp:Label><br />
18.<asp:Label id="lblText3" runat="server"></asp:Label><br />
19.</form>
20.</body>
21.</html>
