Dreamweaver构建Blog全程实录(10):事件日历
<P><STRONG>第十章BLOG事件日历的实现</STRONG></P><P><STRONG> </STRONG>既然Doking’s BLOG是学习笔记，那么按日历可以查出所有笔记和笔记回复。</P><P> 难点分析：是不是要在模板中直接添加Calendar日历控件？不！那是不行的！由于Calendar日历控件是服务器控件，要在含有runat="server"表单该服务器控件，但一页面中只能有一个含有runat="server"表单，不然有时会出现如图10-1所示的错误显示。</P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103946877801.gif" border=0></P><P align=center>图10-1页面只能有一个含有runat="server"表单的错误</P><P> 那怎么办？这里是采取嵌入式框架进行转移。</P><P><STRONG>10.1添加Calendar日历控件</STRONG></P><P> （1）新建一个空白ASP.NET VB动态页。</P><P> （2）插入带出runat="server"表单，设置ID=”Calfrm”。</P><P> （3）点击ASP.NET快捷菜单下的“更多标签”按钮，在弹出【标签选择器】对话框中选择“ASP.NET 标签”下的“asp Calendar”，如图10-2所示。</P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103950077802.gif" border=0></P><P align=center>图10-2插入“asp Calendar”标签</P><P> （4）按“插入”按钮，弹出【标签编辑器—Calendar】对话框，如图10-3所示。在这个对话中，可以对Calendar日历控件的样式进行设置，由于有中文，在这里就不多讲了。</P><P> （5）保存ASP.NET VB动态页为dkCalendar.aspx。在IE中浏览，如图10-4所示。</P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103954677803.gif" border=0></P><P align=center>图10-3【标签编辑器—Calendar】对话框</P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103964077804.gif" border=0></P><P align=center> 图10-4dkCalendar.aspx在IE中的浏览</P><P> 在图10-1-4中，可以看到星期的显示太长了，很难看！如果显示为“日、一、二、三、四、五、六”，那就好了。</P><P><STRONG>10.2修改Calendar的星期显示</STRONG></P><P> （1）在Dreamweaver中打开dkCalendar.aspx，切换到代码视图，寻找如下代码：</P><P><%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %></P><P> 把它改为：</P><P><%@ Page Language="VB" Debug="true" Culture="zh-CN"%></P><P> （2）点击ASP.NET快捷菜单下的“а：xy”按钮，插入命名空间，如图10-5所示。</P><P> （3）此时新添代码：</P><P><%@ Import Namespace="" %></P><P> 输入命名空间为System.Globalization，即代码改为：</P><P><%@ Import Namespace="System.Globalization" %></P><P> （4）再添加命名空间System.Threading，结果如图10-6所示。</P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103968777805.gif" border=0></P><P align=center>图10-5插入命名空间</P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103973477806.gif" border=0></P><P align=center>图10-6插入命名空间后代码</P><P> （5）在代码：</P><P><%@ Import Namespace="System.Treading" %></P><P> 之后，空一行，并插入如下代码：</P><P><script runat="server"></P><P> Dim dkday‘定义选择日期所产生的链接字符串的全局变量</P><P>'改变星期显示的函数</P><P>Private Sub Calendar1_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles Calendar1.PreRender</P><P>Dim dkwek = System.Threading.Thread.CurrentThread</P><P>Dim dknew = System.Globalization.CultureInfo.CurrentCulture.Clone()</P><P>dknew.DateTimeFormat.DayNames = New String() {"日", "一", "二", "三", "四", "五", "六"}</P><P>dknew.DateTimeFormat.FirstDayOfWeek = DayOfWeek.Sunday</P><P>dkwek.CurrentCulture = dknew</P><P>End Sub</P><P></script></P><P> （6）选择日历控件Calendar1的原代码，切换到【标签】面板的【属性】选项卡，展开“外观”选项，选择“DayNameFormat”项的下拉菜单，并选择“Full”，如图10-7所示。</P><P> （7）保存dkCalendar.aspx，在IE中进行浏览，结果如图10-8所示。 </P><P align=center><IMG alt="" src="/bbs/attachments/websoft/20081205/200812510103979677807.gif" border=0> <IMG alt="" src="http://www.jcwcn.com/Files/BeyondPic/jcwcj/2005-12/10/05121011582757766.gif" border
页:
[1]