新闻网站前台页面的设计

②将记录集rszhuanti中的相关内容放到页面上的对应单元格中，如下图所示

③选中专题新闻的那一行，做重复显示，操作方法为：选中刚放进去的专题新闻，点击标签选中该行，点击“服务器行为”选项卡→“+”→“重复区域”，在弹出的对话框中设置记录集名称为“rszhuanti”，显示5记录,如下图所示。

④给新闻标题设置超级链接，方法为：选中新闻标题，点击“服务器行为”选项

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