Vi?t Th? Ng�y Th�ng N?m Theo ??nh D?ng DD/MM/YY

Sau ?�y l� c�ch vi?t Th? Ng�y Th�ng theo ?inh d?ng DD/MM/YY


<% Dim strThu
strThu = WeekDayName(WeekDay(Date))

If strThu = "Sunday" Then
Response.Write("<b>Ch? Nh?t, </b>")
End If

If strThu = "Monday" Then
Response.Write("<b>Th? Hai, </b>")
End If

If strThu = "Tuesday" Then
Response.Write("<b>Th? Ba, </b>")
End If

If strThu = "Wednesday" Then
Response.Write("<b>Th? T?, </b>")
End If

If strThu = "Thursday" Then
Response.Write("<b>Th? N?m, </b>")
End If

If strThu = "Friday" Then
Response.Write("<b>Th? S�u, </b>")
End If

If strThu = "Saturday" Then
Response.Write("<b>Th? b?y, </b>")
End If

Response.Write(" <b>Ng�y " & day(date()) &" Th�ng "& month(date()) &", N?m "& year(date()) &" </b>")

%>

Submit Article :- Digg + Technorati + del.icio.us + Stumbleupon + Reddit + BlinkList + Furl + Yahoo+ Blogmarks + Ekstreme Socializer

|