1。添加几个控件（.aspx）

<asp:TextBox runat="server" ID="txtMyTextBox">
    </asp:TextBox>
    <asp:ImageButton runat="Server" ID="ibtnDepartDate" ImageUrl="~/Images/calendar.gif"
                                        OnClick="calImageButton_Click"  AlternateText="Click Here"/>
    <asp:Calendar runat="server" ID="calMyCalendar"  Visible="False"
OnDayRender="myDayRenderMethod" OnSelectionChanged="calMyCalendar_SelectionChanged"
BackColor="White" BorderColor="#3366CC" BorderWidth="1px" CellPadding="1"
DayNameFormat="Shortest" Font-Names="Verdana" Font-Size="8pt" ForeColor="#003399"
 Height="200px" Width="220px">
        <SelectedDayStyle BackColor="#009999" Font-Bold="True" ForeColor="#CCFF99" />
        <TodayDayStyle BackColor="#99CCCC" ForeColor="White" />
        <SelectorStyle BackColor="#99CCCC" ForeColor="#336666" />
        <WeekendDayStyle BackColor="#CCCCFF" />
        <OtherMonthDayStyle ForeColor="#999999" />
        <NextPrevStyle Font-Size="8pt" ForeColor="#CCCCFF" />
        <DayHeaderStyle BackColor="#99CCCC" ForeColor="#336666" Height="1px" />
        <TitleStyle BackColor="#003399" BorderColor="#3366CC" BorderWidth="1px" Font-Bold="True"
            Font-Size="10pt" ForeColor="#CCCCFF" Height="25px" />
    </asp:Calendar>

 2。添加事件（.cs）

    protected void calImageButton_Click(object sender, ImageClickEventArgs e)
    ...{
        calMyCalendar.Visible = true;
    }
    protected void calMyCalendar_SelectionChanged(object sender, EventArgs e)
    ...{
        if (calMyCalendar.Visible == true)
        ...{
            txtMyTextBox.Text = calMyCalendar.SelectedDate.ToString("dd/MM/yyyy");
            calMyCalendar.Visible = false;
        }

    }

3.使某些日期不可选择

    private int _nDaysToBlock;
    protected void Page_Load(object sender, EventArgs e)
    ...{
        _nDaysToBlock = 7;
    }
   
 protected void myDayRenderMethod(object sener, DayRenderEventArgs e)
    ...{

        if (e.Day.Date < (System.DateTime.Now.AddDays(_nDaysToBlock)))
        ...{
            e.Day.IsSelectable = false;
            e.Cell.Font.Strikeout = true;
        }
    }