建立动态网站的详细步骤3.显示新闻模块中的程序应用.pptVIP

显 示 新 闻 模块的编程应用 第一步 将已经做好的index.htm另存为index.asp。方法：从DreamWeaver中单击“文件”-“另存为”，注意文件格式选择.asp。 第二步 将conn.asp拷贝至东汽公司网站的根目录下，如上图所示，打开conn.asp，将db的值改为你的数据库路径。 第三步 打开index.asp在代码的第一栏添加下图所示代码。 !--#include file=conn.asp-- 调用数据库连接文件。 我们已经将数据库的路径保存在conn.asp文件中了，因此网页在运行时，只需要调用该文件，就可以连接数据库了。 第四步 在“公司新闻”这一栏再添加一个2行1列的表格，宽度为100%，边框、间距、边距都为“0”。 第五步 在代码栏“公司新闻”下面的表格table后添加如下图所示代码： 代码解释 所有的ASP程序都必须使用%和%给括起来。注意所有的代码和符号都要在英文状态下输入。 set rs=server.createobject(adodb.recordset) 这段代码的意思建立一个数据库记录集对象。 server.createobject是用来建立的服务器对象的，建立的是adodb.recordset这样一个记录集对象，我们令rs等于了右边的内容，因此，rs就成为了一个记录集对象。 这个对象的作用是能够对数据库表中的数据进行检索。Rs就成了命令的行使人。 代码解释 rs.open select top 10 * from xinwen order by id desc,conn,1,1 刚才说过，rs是一个命令的执行人，它现在就执行了打开数据库进行操作的命令，这个命令就是open。Open的作用就是打开数据库。由于之前conn.asp是连接数据库的，因此，我们现在只用一个open命令就可以打开数据库了。 代码解释 select top 10 * from xinwen order by id desc 这段代码的意思是，从xinwen表中将前十条新闻选中。Xinwen表中可能有许多条新闻，我们这里使用top 10 *表示前十条新闻。在这里order by 表示排序，我们将新闻按照id的值进行排序，desc表示降序，也就是新闻的编号按照从大到小的顺序进行排序，排完序后选中前十条新闻。 选定的前十条新闻的内容，就保存在rs中了。 If…..end if 选择语句 if err.number0 then response.write 数据库中无数据 end if 如果err（错误信息集合）的值不等于0，也就意味着有了错误信息，这时我们就在网页上显示“数据库中无数据” Response.write的作用就是在网页中显示 Bof和eof if rs.eof And rs.bof then Response.Write p align=center class=contents 您还没有添加新闻！/p else 如果rs的指针直接指向表的结尾，并且同时指向表的开头，则意味着这个表的数据是空的。因此我们要在网页上显示“您还没有添加新闻”。 Else表示否则，如果以上条件不成立，则意味表中有数据，我们就要执行else后面的语句。 第六步 在tr之前插入如下代码： Do while…..loop 循环语句 %do while not rs.eof% 由于我们刚才选定了十条新闻，因此我们需要逐条把新闻显示在网页上，这样就要用到循环语句。 Do while 后面跟的是循环条件，当rs的指针没有向表的结尾，就要一直执行do while和loop之间的语句，直至条件不符合，即指针指向了表的结尾，这个循环才结束。也就是把最后一条新闻显示完了，才停止循环。 由于是在tr/tr这里插入了循环语句，因此也就是要循环十次，共生成十行。 第七步 在td和/td之间插入如下代码： Trim表示去掉前后空格 %=trim(rs(biaoti))% 刚才说过，选中的十条新闻的值都保存在rs中，现在我们要将rs的值显示出来。首先我们要显示的是rs中保存的biaoti字段的值。trim表示去掉前后的空格。 =和response.write是相同的作用。即在网页上显示。 注意，这已经进入了循环体，因此这是第一次循环，显示的是第一条新闻的标题。 Trim去掉前后的空格 %=trim(rs(riqi))% 同理，在新闻标题的后面显示这条新闻的日期。 为了美观，可以在新闻标题的前面插入小图片。 第八步 在/tr的后面添加以下代码： movenext rs.movenext 刚才说过，我们是刚刚进入do while循环，因此，刚刚只是显示了第一条新闻的标题和日期，我们现在需要将指针向下移动一行，准备开始显示第