|
|
|
|
|
<%
a=weekday(date)
select case a
case 1
a = "Sunday"
case 2
a = "Monday"
case 3
a = "Tuesday"
case 4
a = "Wednesday"
case 5
a = "Thursday"
case 6
a = "Friday"
case 7
a = "Saturday"
End select
select case month(date)
case 1
str = "Jan"
case 2
str = "Feb"
case 3
str = "Mar"
case 4
str = "Apr"
case 5
str = "May"
case 6
str = "June"
case 7
str = "July"
case 8
str = "Aug"
case 9
str = "Sept"
case 10
str = "Oct"
case 11
str = "Nov"
case 12
str = "Dec"
end select
if len(day(date))=1 then
append="0"
end if
day1=day(date)
Response.Write " " &a &", "& str&" "&append& day1 &""
%>
|
|
|
|
|
|
|
 |
|
 |
|
 |
|
|
|
|
Free Fun eCards
|
|
Friendship Connection |
Poetry Contest |
Deutsche |
Help |
Recommend Orangepie
|
|
|
|
|
|
|
|
|
|
|
|
Christmas
|
|
|
|
|
Warm Wishes
|
Christmas Bells
|
Frosty Christmas
|
More...
|
|
|
|
New Year
|
|
|
|
|
Season's Greetings
|
Running Out!!!
|
Happy New Year!
|
|
|
|
|
Indian Monuments
|
|
|
|
|
Taj Mahal
|
Charminar
|
Golden Temple
|
More...
|
|
|
|
New York
|
|
|
|
|
Statue of Liberty
|
NYC Skyline
|
Downtown
|
More...
|
|
|
|
Italy
|
|
|
|
|
Tower of Pisa
|
Rome-The Wonderful Pizza
|
Portofino
|
More...
|
|
|
|
|
|
|
|
|
|
|
|
|
