asp event calender ((help with the code)

See more:

VB

Hi I drag the asp calender I am using 2008 version
I want to make an event calender that highlight the days and when you put the mouse over it the event will appear ((The name of the event))
I found this code

Private Sub Calendar1_DayRender(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DayRenderEventArgs) Handles Calendar1.DayRender
        Dim day As CalendarDay = e.Day
        Dim cell As TableCell = e.Cell
        Dim lblEvent As New Label()
        Select Case day.Date
            Case #2/10/2011#
                lblEvent.Text = "party"
                cell.Controls.Add(lblEvent)
                cell.BackColor = Drawing.Color.Red
            Case #2/14/2011#
                lblEvent.Text = "holiday"
                cell.Controls.Add(lblEvent)
                cell.BackColor = Drawing.Color.DarkOrange
            Case #2/28/2011#
                lblEvent.Text = "3rd event"
                cell.Controls.Add(lblEvent)
                cell.BackColor = Drawing.Color.DarkOrange
        End Select
    End Sub

I don't want to add the table to the database
and I want the admin to click a button that allow him to edit the cells without changing the code.

Can anyone help me.