2013-04-20 75 views
0

我想让用户在文本框中键入一年,如果年份在数据库中存在(其中有特定的学期日期),它会在日历中显示这些日期。是否有可能让asp:calender显示数据库中的日期?

我已经找了几天如何做到这一点,但我无法找到任何帮助。

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

任何帮助将是伟大的! 马克

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

+0

我无法理解乌尔que.Plz简要 – 2013-04-20 11:43:51

+0

解释让,你要选择为表年度每个日期的日历控件我得到这个权利? – 2013-04-20 12:05:35

+0

是的,这样可以节省用户点击大量时间以达到他们想要的年份。 – Mark 2013-04-20 12:12:22

回答

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 
相关问题