Author: sonel | Posted on: 8/12/2009 6:36:46 AM | Views : 292

 
Partial Class html_Default Inherits System.Web.UI.Page Sub DayRender(ByVal sender As Object, ByVal e As DayRenderEventArgs) If e.Day.Date < Today Then e.Day.IsSelectable = False e.Cell.ForeColor = Drawing.Color.Gray End If If e.Day.IsOtherMonth Then e.Cell.ForeColor = Drawing.Color.AntiqueWhite e.Cell.BackColor = Drawing.Color.AntiqueWhite e.Day.IsSelectable = False End If End Sub Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Calendar1.SelectionChanged TextBox1.Text = Calendar1.SelectedDate If Calendar1.SelectedDate > Calendar2.SelectedDate Then Calendar2.SelectedDate = Calendar1.SelectedDate.AddDays(1) TextBox2.Text = Calendar2.SelectedDate End If If Calendar1.SelectedDate = ...

Go to the complete details ...