asp教程：常用的 asp activex组件.htm

学习asp的基础教程

      对象保持查询返回的记录的<BR>位置，允许您一次一项逐步扫描结果。根据 Recordset 
      对象的指针类型属性设置，您可以滚动和更新<BR>记录。数据库指针可以让您在一组记录中定位到特定的项。指针还用于检索和检查记录，然后在这些<BR>记录的基础上执行操作。 
      Recordset 对象有一些属性，可用于精确地控制指针的行为，提高您检查<BR>和更新结果的能力。 
      <P>　　 Recordset 的使用方法如下 : </P>
      <P>　　 Set rs = Server.CreateObject("ADODB.Recordset") </P>
      <P>　　 rs.Open SQL 指令 , Conn, 1, 1 ' 读取 </P>
      <P>　　 或 </P>
      <P>　　 rs.Open SQL 指令 , Conn, 1, 3 ' 新增、修改、或删除 </P>
      <P>　　第三步 : 使用 RecordSet 属性和方法，并显示执行的结果。 </P>　　通过以上指令，我们创建了一个包含数据的游标 
      (RecordSet)“rs”，事实上游标是存储在<BR>活动内存中的类似记录和字段的数组的东西，当通过 RecordSet 
      组件创建一个游标时，它从数据<BR>提供者的得到一个数据集，并用它来充实游标，我们可以想象 ADO 产生的 RecordSet 
      是一个象<BR>电子表格的记录，它有一行行的记录，在任何时候都有一行是它的当前行，而 RecordSet 的字段<BR>是用 RecordSet 的 
      Field 集合表示的。下面列出了所创建的 RecordSet 对象 ( 游标 ) 的一些<BR>属性和方法 : 
      <P>　　 rs.Fields.Count: RecordSet 对象的字段总数。 </P>
      <P>　　 rs(i).Name: 第 i 个字段的名称， i 由 0 算起到 rs.Fields.Count-1。 </P>
      <P>　　 rs(i): 读取第 i 个字段的数据， i 由 0 算起到 rs.Fields.Count-1。 </P>
      <P>　　 rs(" 字段名称 "): 读取指定字段的数据。 </P>
      <P>　　 rs.RecordCount: 游标中的数据记录总数。 </P>
      <P>　　 rs.EOF: 是否已指到最后一条记录。 </P>
      <P>　　 rs.MoveNext: 将指标移到下一笔记录。 </P>
      <P>　　 rs.MovePrev: 将指标移到上一笔记录。 </P>
      <P>　　 rs.MoveFirst: 将指标移到第一笔记录。 </P>
      <P>　　 rs.MoveLast: 将指标移到最后一笔记录。 </P>
      <P>　　 rs.Close: 关闭 RecordSet 对象 </P>
      <P>　　 有关 ADO 的其他介绍，作者将在今后给大家详细讲解。 </P>
      <P>　　二、 Content Linking 组件 </P>　　如果你的网站有一系列相互关联的页面的话， Content Linking 
      组件将非常适合你的需求，<BR>它非但可以使你在这些页面中建立一个目录表，而且还可以在它们中间建立动态连接，并自动生成<BR>和更新目录表及先前和后续的 
      Web 页的导航链接。这对于列出联机报刊、电子读物网站以及论坛<BR>邮件是十分理想的选择。<BR><BR>　　Content Linking 
      组件创建管理 URL 列表的 Nextlink 对象，要使用 Content Linking&nbsp;<BR>组件，必须需要先创建 Content 
      Linking List 文件。 Content Linking 
      组件正是通过读取这个<BR>文件来获得处理我们希望链接的所有页面的信息。事实上该文件是一个纯文本文件，其内容如下 : <BR>page1.htm 
      one <BR>page2.htm two <BR>page3.htm three <BR>page4.htm four <BR>page5.htm 
      five <BR>page6.htm six <BR><BR>
      <P>　　 这个文本文件的每行有如下形式 : </P>
      <P>　　 url description comment </P>
      <P>　　其中， URL 是与页面相关的超链地址， description 提供了能被超链使用的文本信息，&nbsp;<BR>comment 
      则包含了不被 Content Linking 组件解释的注释信息，它的作用如同程序中的注释。&nbsp;<BR>description 和 
      comment 参数是可选的。 </P>
      <P>　　 下面我们来看看如何具体使用 Content Linking 组件 : </P>&lt; html&gt;<BR>&lt; 
      head&gt;<BR>&lt; meta http-equiv="Content-Type" content="text/html; 
      charset=gb2312"&gt;<BR>&lt; title&gt; 网络电子读物宝藏 &lt; /title&gt;<BR>&lt; 
      /head&gt;<BR>&lt; body&gt;<BR>&lt; p&gt; 网络电子读物导航 <BR>&lt; %<BR>Set Link = 
      Server.CreateObject("MSWC.NextLink")<BR>count = 
      Link.GetListCount("nextlink.txt") <BR>Dim I<BR>For I=1 to 
      count<BR>%&gt;<BR>&lt; ul&gt;&lt; li&gt;&lt; a href="&lt; %= 
      Link.GetNthURL("nextlink.txt", I) %&gt;"&gt;&lt; %= 
      Link.GetNthDescription("nextlink.txt", I) %&gt;&lt; /a&gt;<BR>&lt; % Next 
      %&gt;<BR>&lt; /body&gt;<BR>&lt; /html&gt;<BR><BR>
      <P>　　 在以上代码中，我们先用 GetListCount 方法确定在文件 nextlink.txt 
      中有多少条项目，<BR>然后利用循环语句，并使用 GetNthURL、 GetNthDescription 方法逐一将存储在 
      nextlink.txt<BR>文件中的内容读出并显示给客户端浏览器。 </P>
      <P>　　 下面列出了 Content Linking 组件所有可使用的方法 GetListCount(file) 
      统计内容链接列表<BR>文件中链接的项目数。 </P>
      <P>　　 GetNextURL(file) 获取内容链接列表文件中所列的下一页的 URL。 </P>
      <P>　　 GetPreviousDescription(file) 获取内容链接列表文件中所列的上一页的说明行。 </P>
      <P>　　 GetListIndex(file) 获取内容链接列表文件中当前页的索引。 </P>
      <P>　　 GetNthDescription(file,index) 获取内容链接列表文件中所列的第 N 页的说明。 </P>
      <P>　　 GetPreviousUR(file) 获取内容链接列表文件中所列的上一页的 URL。 </P>
      <P>　　 GetNextDescription(file) 获取内容链接列表文件中所列的下一页的说明。 </P>
      <P>　　 GetNthURL(file,index) 获取内容链接列表文件中所列的第 N 页的说明。 
      </P>　　在我们创建了网站的总导航页面后，我们当然还希望在每一页中添加一个“上一页”、“下一页”<BR>的导航超链，下面我们就来看看如何实现导航超链。<BR><BR>　　由于考虑到你的网站可能包含了上千或更多的页面，所以我们不可能在每一个页面中都编写<BR>实现导航超链的 
      ASP 代码。因此，我们必须利用前几篇中所学到的服务器端包容 SSI，这样就避免了<BR>大量的重复作业，请看下例 : 
      <P>　　 &lt; !--#include file="nextprev.inc"--&gt; </P>
      <P>　　 只要将这端代码放在每个页面中即可。 nextprev.inc 文件的内容如下 : </P>&lt; %<BR>Set Link = 
      Server.CreateObject("MSWC.NextLink")<BR>count = 
      Link.GetListCount("nextlink.txt") <BR>current = 
      link.GetListIndex("nextlink.txt")<BR>If current &gt; 1 
      Then<BR>%&gt;<BR>&lt; a href="&lt; %= Link.GetPreviousURL("nextlink.txt") 
      %&gt;"&gt; 上一页 &lt; /a&gt;<BR>&lt; %<BR>End If<BR>If current &lt; count 
      Then<BR>%&gt;<BR>&lt; a href="&lt; %= Link.GetNextURL("nextlink.txt") 
      %&gt;"&gt; 下一页 &lt; /a&gt;<BR>&lt; % End If 
      %&gt;<BR><BR>　　今天的学习又到此结束了，在这里我要再次感谢所有关心我的文章的朋友们，你们的来信给了<BR>我很大的鼓舞，不过请大家不要再称我为“老师”，其实我也和你们一样是在不断的学习和摸索中，<BR>有问题我们可以一起探讨，我的文章中肯定还存在很多不足或漏洞，也希望大家发现后能及时向我<BR>提出。由于近来 
      ASP 已经在国内的网站中广泛运用起来，所以应朋友们的要求，在国内 ASP 高手<BR>飞鸟的热情帮助下，我决定写一些 ASP 
      应用实例作为现在这篇文章的姊妹篇，这样也就可以为大家<BR>提供一些真正实用的东西了，敬请关注。 
      <P align=center><A 
      href="http://chinese.pku.edu.cn/netstudy/aspteach/asp13.htm">上一节</A> <A 
      href="http://chinese.pku.edu.cn/netstudy/aspteach/asp15.htm">下一节</A></P>
      <P align=center><A 
      href="http://chinese.pku.edu.cn/netstudy/aspteach/index.asp">在线教程首页</A></P></TD></TR></TBODY></TABLE></BODY></HTML>