Private Sub cal_DayRender(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DayRenderEventArgs) Handles cal.DayRender
If e.Day.Date > Now.AddDays(15) Then
e.Cell.Text = ""
End If
If e.Day.Date < Now.ToShortDateString Then
e.Cell.Text = ""
End If
End Sub
Last edited by Dmyze; Jan 9th, 2003 at 03:17 PM.
-Daryl
"Two More Rolls of Duct tape, and the world is mine!" VB.NET Guru