<%@ Page %>
<script language="vb" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim ticks As Long
ticks=DateTime.Now.Ticks-DateTime.Today.Ticks
Dim ts As New TimeSpan(ticks)
Hours.Text=ts.Hours.ToString()
Minutes.Text=ts.Minutes.ToString()
Seconds.Text=ts.Seconds.ToString()
End Sub
</script>
<html>
<body>
<form id="form1" method="post" runat="server">
Since the start of the day
<asp:Label ID="Hours" Runat="server" />
hours,
<asp:Label ID="Minutes" Runat="server" />
minutes and
<asp:Label ID="Seconds" Runat="server" />
seconds have passed.
</form>
</body>
</html>
|