%
'
'
'
dim moname
moname = Array(L_Jan_Text, L_Feb_Text, L_Mar_Text, L_Apr_Text, L_May_Text, L_Jun_Text, L_Jul_Text, L_Aug_Text, L_Sep_Text, L_Oct_Text, L_Nov_Text, L_Dec_Text)
L_AMLowercaseAbbreviation_Text = "a" 'Variable used in server side Javascript
L_PMLowercaseAbbreviation_Text = "p" 'Variable used in server side Javascript
L_AMPMFormat_Number = 1
L_AM_Text = "AM" 'Variable used in server side Javascript
L_PM_Text = "PM" 'Variable used in server side Javascript
L_DayAbbreviation_Text = "" ' Used for FE
L_YearAbbreviation_Text = "" 'Used for FE
Sub DrawMonthPicker(nSelected)
if nSelected = -1 then 'use current month
nSelected = Month(Now())-1
end if
for x=0 to 11
if x = nSelected then
Response.Write "