01.<%@ Page Language="VB" %>
02.<script runat="server">
03.
04. Sub Page_Load(sender As Object, e As EventArgs)
05. IF Now.Day = 10 Then
06. Me.lblText1.Text = "Now Day = 10-11-2008 (DD-MM-YYY)"
07. Else
08. Me.lblText1.Text = "Now Day = " & Format(Now.Date,"dd-M-yyyy")
09. End IF
10. End Sub
11.
12.</script>
13.<html>
14.<head>
15.</head>
16.<body>
17. <form runat="server">
18. <asp:Label id="lblText1" runat="server"></asp:Label><br />
19. </form>
20.</body>
21.</html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
