第7章 ConsolidatedRetail com的功能.doc

第7章 ConsolidatedRetail.Com 的功能  摘要：本章介绍了 ConsolidatedR 应用程序的功能，同时提供了伪代码和实际代码示例来详细说明处理流程。 简介 现在，您对解决方案的各个组成部分已经有了总体了解，可以开始检查站点提供的具体功能了。本章探讨了解决方案的以下几个方面，并着重讨论了为每个功能区编写代码时所面临的内在问题： 表示服务 用户身份验证和用户配置文件的维护 产品目录 “购物篮”管理 订单处理 阅读本章的各个小节时，您将了解具体功能的实现方法，以及如何在您自己的企业对消费者 (B2C) 解决方案中重新利用 ConsolidatedR 应用程序的部分或全部内容。 表示服务 ConsolidatedR 站点中的表示服务由 XSLISAPI 过滤器提供。面临的主要开发问题在于：如何在每个 PASP 脚本中生成合适的 XML，以及如何创建合适的 XSL 样式表将 XML 表示为 HTML（或其它表示格式）。 ConsolidatedR 中来自 PASP 文件的 XML 输出 在 ConsolidatedR 站点中，每个 PASP 文件都生成格式相同的 XML 文档。这是通过在站点的每一页中加入对 Common.asp 文件的 Include 引用，并调用其 PageStart 过程实现的。 Common.asp 文件中的 PageStart 过程包含以下代码： Sub PageStart(strPageNameWithExtension) 除去 pasp 文件扩展名 Dim strPageName strPageName = Trim(Left(strPageNameWithExtension, _ InstrRev(strPageNameWithExtension, _ .) - 1)) XML 标头 Response.Write _ ?xml-stylesheet type=text/xsl _ server-config= _ strPageName -Config.xml href= _ strPageName -IE5.xsl? 页元素的根。 结束标记在“PageEnd”子例程中生成。 Response.Write page pagename= _ strPageNameWithExtension vbcrlf End Sub 此过程为 PASP 文件将要生成的文档创建 XML 标头。在每个 PASP 脚本的末尾，将调用 PageEnd 过程来生成 page 的结束标记并完成 XML 文档。下面列出了 PageEnd 过程中的相关代码： Sub PageEnd() 为了表达得更为清楚，这里省略了有关目录、注销和错误消息的代码 Call XMLEndTag(page) End Sub XMLEndTag 过程是 Common.asp 中的众多 XML Helper 过程之一。（有关详细信息，请参考本章中的“XML Helper 过程”一节。）它使用以下代码生成 XML 结束标记： Sub XMLEndTag(strTagName) Response.Write mc_strStartTag mc_strForwardSlashTag _ Lcase (Replace(strTagName, mc_strBlank,_ mc_strUnderScore)) _ mc_strEndTag vbCrLf End Sub 使用 PageStart 和 PageEnd 过程生成的 XML 文档类似于以下代码示例： ?xml-stylesheet type=text/xsl server-config=filename-Config.xml href=filename-IE5.xsl? page pagename=filename.pasp !-- XML 内容 -- /page XML Helper 过程 除了上面提到的 XMLEndTag 过程之外，Common.asp 还包含多个与 XML 有关的实用程序例程。使用这些过程可以生成一些标记，这些标记将用于 ConsolidatedR 站点中的 PASP 页所生成的 XML 文档。 虽然在许多情况下，对所需的 XML 字符（例如 和 ，请注意不包括引号）进行硬编码更为有效，但是，在各种 XML 生成过程中，大量 XML 字符常量均在 Common.asp 中进行声明。这样可增加代码的可读性，同时有助于调试。这些常量是： Const mc_strStartTag = Const mc_strEndT