10.3 添加日历事件
（1）在Dreamweaver中打开dkCalendar.aspx，切换到代码视图，选择Calendar1的原代码，右键单击它，在弹出的快捷菜单中选择“编辑标签(E)<asp:calendar>”，如图10-9所示。
图10-9 选择“编辑标签(E)<asp:calendar>”
（2）在弹出【编辑标签—calendar】的对话框中，展开“事件”项，选择“OnSelectionChanged”，在“Calendar —OnSelectionChanged”事件文本区域中，输入“Calendar1_SelectionChanged”，按“确定”按钮，如图10-10所示。
图10-10 编辑OnSelectionChanged事件
（3）在代码<script runat="server">标签中添加如图10-11红色圈所示的代码。
图10-11 添加Calendar1_SelectionChanged事件
（4）在标签<head></head>之间，插入如图10-12红色圈所示的代码。
（5）找标签<body>，将其改为如图10-13红色圈所示的代码。
图10-12 插入javascript函数dkwk
图10-13 修改标签<body>
（6）再次把Calendar1的“DayNameFormat”项的设为“Full”，参照10.2节中的第6步骤。
（7）保存dkCalendar.aspx，打开index.aspx，在page_load函数中添加如下代码：
if Request.QueryString("dkday")<>nothing then
Ztre.CommandText="SELECT * FROM ZTRE WHERE cstr(ZITIME) LIKE '%" &Request.QueryString("dkday")&"%' ORDER BY ZITIME DESC"
else
if (request.QueryString("menanw")<>nothing) or (session("menanw")<>nothing) then
Ztre.CommandText="SELECT * FROM ZTRE WHERE LMID = ? ORDER BY ZITIME DESC"
else
Ztre.CommandText="SELECT * FROM ZTRE ORDER BY ZITIME DESC"
end if
end if
结果如图10-14所示。
图10-14 在page_load函数中添加代码
（8）找到记录集Ztre的原代码，删除其CommanText所在的命令行，结果如图10-15红色圈所示。
图10-15 修改后记录集Ztre的原代码
（9）保存index.aspx。
