②将记录集rszhuanti中的相关内容放到页面上的对应单元格中，如下图所示
③选中专题新闻的那一行，做重复显示，操作方法为：选中刚放进去的专题新闻，点击
④给新闻标题设置超级链接，方法为：选中新闻标题，点击“服务器行为”选项
21
卡→“+”→“转到详细页面”，设置详细信息页为“onnews.asp”，设置记录集为“rszhuanti”，如下图所示
6. 搜索功能的实现
（1）此处我们如果想要用两种不同的方式来进行查询的话，则需要设置一个中间页面，来对查询类别进行判断，编一小段程序分别转向两个不同的查询结果页 （2）新建一个页面，名为searchtype.asp
（3）切换到代码视图，删除掉原有代码，输入以下代码，并保存，此程序的目的在于根据你所选的不同的搜索类别，让程序转向不同的页面去进行进一步的搜索，并传递搜索关键字
<%
dim otype,key
otype=request.Form(\key=request.Form(\if otype=\
response.Redirect(\end if
if otype=\
response.Redirect(\end if %>
22
（4）回到index.asp，选中搜索所在的表单：在属性栏设置动作为search.asp,设置方法为POST,如下图所示
（5）到此，首页功能全部实现
23
三、 显示所有新闻页面all.asp的制作
1. 在站点文件夹中打开all.asp页面
2. 制作导航栏【同首页，可直接从首页复制此部分的表格并替换】
（1）创建一个名为rstype的记录集从type表中调取所有有新闻的类别记录,点击“绑定”选项卡→“+”→“创建记录集）查询”，在弹出的对话框中，设置名称为“rstype”,连接为“conn”，列为“typename”,再点击“高级”按钮，在弹出的对话框中加上表的连接的SQL代码，SQL语句为“SELECT distinct typename FROM type,new where type.typeid=new.typeid”，如下图所示
24