Duda calendar

[Sayra]

Hola tengo una duda, tengo una aplicacion con varios calendarios para ser exacta trece, el calendar1 es el calendario general y se supone que cuando se intente seleccionar el calendar1 se desplegar una vsita con 12 calendarios cada uno con los meses de enero a febrero respectivamente, la cosa es que bueno los calendarios 2-13 eesta dentro de un control panel con la proiedad visible= flalse, de manera que cuando se carga la pagina se ve solamanemte el calendar1

se supone que cuando se seleccione el calendario deberia desplegarse la vista de los otros 12 en codigo yo lo plantea asi, pero no funciona cuando selecciono el calendario no pasa nada.

auxilio


Sub Calendar1_DayRender(sender As Object, e As DayRenderEventArgs)
...
If e.day.IsSelected =true then
Panel1.Visible= true
end if
End Sub

[Sayra]

Hola bueno encontre un codigo en javascript que creo me sirve para hacer que cuando selecciones el calendario se despliegue la ventanita con los 12 calendarios con los meses del año

el codigo original es este

Private Sub Calendar1_SelectionChanged(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Calendar1.SelectionChanged

TextBox1.Text = Calendar1.SelectedDate.ToShortDateString()
Dim div As System.Web.UI.Control = Page.FindControl("divCalendar")

If TypeOf div Is HtmlGenericControl Then
CType(div, HtmlGenericControl).Style.Add("display", "none")
End If
End Sub


<%script>
function OnClick()
{
if( divCalendar.style.display == "none")
divCalendar.style.display = "";
else
divCalendar.style.display = "none";
}
<%/script>

y yo lo modifique asi
Sub Calendar1_SelectionChanged(sender As Object, e As EventArgs)

If Calendar1.SelectedDate.ToString("dd/MM/yyyy") then
Dim div As System.Web.UI.Control = Page.FindControl("divCalendar")

If TypeOf div Is HtmlGenericControl Then
CType(div, HtmlGenericControl).Style.Add("display", "none")
End If
End If
End Sub

function OnClick()
dim divCalendar as System.Web.UI.HTMLControls
if( divCalendar.style.display == "none")
divCalendar.style.display = "";
else
divCalendar.style.display = "none";
end if
end function

pero me da error y señala esta linea "dim divCalendar as System.Web.UI.HTMLControls" diciendo que

Compiler Error Message: BC30182: Se esperaba un tipo.
y sinceramente no se que hacer

apreciaria cualquier tipo de ayuda o consejo

[Jose_minglein2]

Hola Sayra, la solución a este problema que planteas tiene la misma base que el que nos lleva de cabeza en el selectedindexchanged, la cuestión, es que que el calendar 1 tenga el autopostback a true, y dos maneras, una

If IsPostBack
if request.form("__eventtarget") = "calendar1"
....
end if
end if

o mediante

Private Sub Calendar1_SelectionChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Calendar1.SelectionChanged
......
end sub

Suponiendo claro que este todo en VB... :;