是否可以让asp:calendar显示数据库中的日期?

时间:2013-04-20 11:33:58

标签: asp.net vb.net visual-studio calendar

我正在尝试让用户在文本框中键入一年,如果年份退出数据库(具有学期的特定日期),则会在日历中显示这些日期。

我已经找了几天怎么做但我找不到任何帮助。

这甚至可能吗?我希望能够为此使用SQLDataSource,但我无法将连接字符串添加到日历中。

任何帮助都会很棒! 标记

* * REVISED * ** 我的数据库中有一张表,其中包含每个大学学期的开始日期和结束日期,例如秋天,春天,夏天和复活节假期。我希望用户能够键入他们希望更改日期的年份并点击搜索按钮。如果数据库包含输入年份的记录,则会显示每个日期的日历,从数据库中选择日期,而不是当前日期。

1 个答案:

答案 0 :(得分:0)

最后想出了如何在日历中的数据库显示中设置日期。这是代码:

        Dim strConn As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\scrummingit2.mdf;Integrated Security=True;User Instance=True"
        Dim sql As String = "SELECT [Year], [Autumn_Start], [Autumn_End], [Spring_Start], [Spring_End], [Summer_Start], [Summer_End], [Easter_Start], [Easter_End] FROM [Semester_Dates] WHERE ([Year] = '" + TxtAddYearDates.Text + "')"

        Dim conn As New SqlConnection(strConn)
        Dim objDR As SqlDataReader
        Dim Cmd As New SqlCommand(Sql, conn)
        conn.Open()
        objDR = Cmd.ExecuteReader(System.Data.CommandBehavior.CloseConnection)
        While objDR.Read()

            AutumnStartCalendar.SelectedDate = objDR("Autumn_Start")
            AutumnStartCalendar.VisibleDate = objDR("Autumn_Start")

            AutumnEndCalendar.SelectedDate = objDR("Autumn_End")
            AutumnEndCalendar.VisibleDate = objDR("Autumn_End")

            SpringStartCalendar.SelectedDate = objDR("Spring_Start")
            SpringStartCalendar.VisibleDate = objDR("Spring_Start")

            SpringEndCalendar.SelectedDate = objDR("Spring_End")
            SpringEndCalendar.VisibleDate = objDR("Spring_End")

            SummerStartCalendar.SelectedDate = objDR("Summer_Start")
            SummerStartCalendar.VisibleDate = objDR("Summer_Start")

            SummerEndCalendar.SelectedDate = objDR("Summer_End")
            SummerEndCalendar.VisibleDate = objDR("Summer_End")

            EasterStartCalendar.SelectedDate = objDR("Easter_Start")
            EasterStartCalendar.VisibleDate = objDR("Easter_Start")

            EasterEndCalendar.SelectedDate = objDR("Easter_End")
            EasterEndCalendar.VisibleDate = objDR("Easter_End")


        End While