Ho una pagina dove sulla sinistra ho il calendario e sulla destra una volta cliccato il giorno mi fa vedere gli eventi che ci sono.

Se sono nel mese di dicembre e clicco sul giorno 12 mi fa vedere sulla destra l'evento di quel giorno ma il calendario ritorna alla data (mese attuale - Ottobre).

la pagina la richiamo calendario.asp?month=12&year=2005 perchè mi cambi i mesi

La stessa pagina la chiamo calendario.asp?date=23%2F12%2F2005 perchè mi faccia vedere se vi è l'evento in quel dato giorno.


Quando chiamo calendario.asp?date= la pagina mi va ad eseguire lo script sotto per cercare il mese giusto; se infatti il (Request("MONTH") è vuoto mi va al mese attuale (questo mi serve per la prima chiamata della pagina).
Come fare per risolvere il problema?


' Check for valid month input

'non mi funziona

' ++++++++++++++++++++++++++++++++++++++++++++++++++ ++++++

If IsEmpty(Request("MONTH")) OR NOT IsNumeric(Request("MONTH")) Then
datToday = Date()
intThisMonth = Month(datToday)

ElseIf CInt(Request("MONTH")) < 1 OR CInt(Request("MONTH")) > 12 Then
datToday = Date()
intThisMonth = Month(datToday)

Else
intThisMonth = CInt(Request("MONTH"))

End If

'+++++++++++++++++++++++++++++++++++++++++++++++++ +++++++++++++++++

' Check for valid year input
If IsEmpty(Request("YEAR")) OR NOT IsNumeric(Request("YEAR")) Then
datToday = Date()
intThisYear = Year(datToday)
Else
intThisYear = CInt(Request("YEAR"))
End If

strMonthName = MonthName(intThisMonth)
datFirstDay = DateSerial(intThisYear, intThisMonth, 1)
intFirstWeekDay = WeekDay(datFirstDay, vbSunday)
intLastDay = GetLastDay(intThisMonth, intThisYear)