<% ' ' ' 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 "