Vi?t th? ng�y th�ng n?m v� ??nh d?ng hi?n th? theo CSS

?o?n Code sau ?�y gi�p b?n hi?n th? ng�y th�ng n?m theo ti?ng Vi?t v� ??nh d?ng ch? theo CSS.


<% strThu = WeekDayName(WeekDay(Date))
If strThu = "Sunday" Then
Response.Write("<span style=""font-size:16;font-weight:bold; color:red;line-height:2em;"">Ch? Nh?t</span><br>")
End If

If strThu = "Monday" Then
Response.Write("<span style=""font-size:16;font-weight:bold;color: blue;line-height:2em"">Th? Hai</span><br>")
End If

If strThu = "Tuesday" Then
Response.Write("<span style=""font-size:16;font-weight:bold;color: blue;line-height:2em"">Th? Ba</span><br>")
End If

If strThu = "Wednesday" Then
Response.Write("<span style=""font-size:16;font-weight:bold;color: blue;line-height:2em"">Th? T?</span><br>")
End If

If strThu = "Thursday" Then
Response.Write("<span style=""font-size:16;font-weight:bold;color: blue;line-height:2em"">Th? N?m</span><br>")
End If

If strThu = "Friday" Then
Response.Write("<span style=""font-size:16;font-weight:bold;color: blue;line-height:2em"">Th? S�u</span><br>")
End If

If strThu = "Saturday" Then
Response.Write("<span style=""font-size:16;font-weight:bold;color: lime;line-height:2em"">Th? B?y</span><br>")
End If

Response.Write(" <b><font color=""#FFFFFF"">Ng�y " & day(date()) &" Th�ng "& month(date()) &"</font><br> <br><font size=""+1"" color=""red"">N?m "& year(date()) &" </font></b>")
%>

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

|