zyd2060 2008-1-14 20:51
第一章 asp基础入门篇
[b]1、运行环境与软件要求[/b]
Windows 2000 以上 （不包括Windows XP Home版）
IIS 4.0 以上
Microsoft Access 2000
Dreamweaver MX
[b]2、IIS的安装与配置[/b]
[b]a.安装IIS[/b]
若操作系统中还未安装IIS服务器，可打开“控制面板”，然后单击启动 “添加/删除程序”， 在弹出的对话框中选择 “添加/删除Windows组件”，在Windows组件向导对话框中选中“Internet信息服务（IIS）”，然后单击“下一步”，按向导指示，完成对IIS的安装。（图例如下图1、图2 由于白茶123使用的是Windows Server 2003操作系统所以和大家的安装界面有所出入，但大体相同）
此主题相关图片如下：
[attach]195603[/attach]
此主题相关图片如下：
[attach]195604[/attach]
[b]b.启动Internet信息服务（IIS）[/b]
Internet信息服务简称为IIS，单击Windows开始菜单---所有程序---管理工具---Internet信息服务（IIS）管理器，即可启动“Internet信息服务”管理工具（如图3）
此主题相关图片如下：
[attach]195605[/attach]
[b]c.配置IIS[/b]
IIS安装后，系统自动创建了一个默认的Web站点，该站点的主目录默认为C:\\Inetpub\\www.root。
用鼠标右键单击“默认Web站点”，在弹出的快捷菜单中选择“属性”，此时就可以打开站点属性设置对话框，（如图4）在该对话框中，可完成对站点的全部配置。
此主题相关图片如下：
[attach]195606[/attach]
[b]主目录与启用父路径[/b]
单击“主目录”标签，切换到主目录设置页面，（如图5）该页面可实现对主目录的更改或设置。注意检查启用父路径选项是否勾选，如未勾选将对以后的程序运行有部分影响。（如图6），主目录—配置---选项。
此主题相关图片如下：
[attach]195607[/attach]
此主题相关图片如下：
[attach]195608[/attach]
[b]设置主页文档[/b]
单击“文档”标签，可切换到对主页文档的设置页面，（如图7）主页文档是在浏览器中键入网站域名，而未制定所要访问的网页文件时，系统默认访问的页面文件。常见的主页文件名有index.htm、index.html、index.asp、index.php、index.jap、default.htm、default.html、default.asp等
IIS默认的主页文档只有default.htm和default.asp，根据需要，利用“添加”和“删除”按钮，可为站点设置所能解析的主页文档。
[b]启动与停止IIS服务[/b]
在Internet信息服务的工具栏中提供有启动与停止服务的功能。单击 可启动IIS服务器；单击 则停止IIS服务器。
[[i] 本帖最后由 andriy 于 2008-5-9 16:05 编辑 [/i]]
zyd2060 2008-1-14 20:54
第一章 asp基础入门篇 1.2Are you ready?
[b]如何令你的网站“动感十足”[/b]
您的网站是否仍一如既往地保持“静态”？目前呈几何增长的互联网网站中，有相当一部分仍固守“静态”，无形中已大大落后于时代的步伐。所谓“静态”指的就是网站的网页内容“固定不变”，当用户浏览器通过互联网的HTTP（Hypertext Transport Pr otocol）协议向WEB服务器请求提供网页内容时，服务器仅仅是将原已设计好的静态HTML文档传送给用户浏览器。其页面的内容使用的仅仅是标准的 HTML代码，最多再加上流行的GIF89A格式的动态图片，比如产生几只小狗小猫跑来跑去的动画效果。若网站维护者要更新网页的内容，就必须手动地来更新其所有的HTML文档。
“静态”网站的致命弱点就是不易维护，为了不断更新网页内容，你必须不断地重复制作HTML文档，随着网站内容和信息量的日益扩增，你就会感到工作量大得出乎想象。
你不禁要问：那么什么是动态网站呢？这就是本文将重点讲述的核心，所谓“动态”，并不是指那几个放在网页上的GIF动态图片，在这里笔者为动态页面的概念制定了以下几条规则：
1、“交互性”即网页会根据用户的要求和选择而动态改变和响应，将浏览器作为客户端界面，这将是今后WEB发展的大事所趋。
2、“自动更新”即无须手动地更新HTML文档，便会自动生成新的页面，可以大大节省工作量。
3、“因时因人而变”，即当不同的时间、不同的人访问同一网址时会产生不同的页面，是不是很酷？
现在你已经对“动态”网站有了一个基本的概念，接下来应挑选称手的“兵刃”了。将网站“动态”化的方法很多，这要看你是出于何种需求。如果你是个人网站的维护者，使用的是免费主页空间，那么绝大多数情况下你只能使用Java、Java Script和最新的DHTML技术，如果你的主页空间提供者能给予你CGI权限或ASP支持，那么你将能非常幸运地发挥真正的动态技术。关于CGI和ASP技术将在后面的着重讨论，这里针对个人网站仅就最新的DHTML技术进行重点介绍。
究竟什么是DHTML？它与传统的HTML有什么不同？DHTML就是当网页从WEB服务器下载后无须再经过服务器的处理，而在浏览器中直接动态地更新网页的内容、排版样式、动画。比如，当鼠标移至文章段落中，段落能够变成蓝色，或者当你点击一个超链后会自动生成一个下拉式的子超链目录。这就是 Dynamic HTML（动态HTML），它是近年来网络飞速发展进程中最振奋人心也是最具实用性的创新之一。它是一种通过各种技术的综合发展而得以实现的概念，这些技术包括Java Script , VB0Script, Document Object Model (文件目标模块)，Layers和Cascading Style Sheets ( CSS样式表)等。非常遗憾的是在网景Netscape和微软IE浏览器几番大战后，我们仍没有得到一个对DHTML支持的统一标准。因此本文在介绍 DHTML时不得不分别讲述。让我们先来看看Microsoft IE 4对DHTML的支持：
1 .动态内容（Dynamic Content）：动态地更新网页的内容，可"动态"地随时插入、修改、或删除网页的元件，譬如文字、标记等。
2 .动态排版样式（Dynamic Styles Sheets）：通过W3C的“Cascading Style Sheets”（串联式排版样式，简称CSS1或CSS），提供了设定HTML标记的字体大小、字型、粗细、字型样式、行高度、文字颜色、加底线或加中间横线、与边缘距离、靠左右或置中、缩排、背景图片或颜色等排版功能。而“动态排版样式”，可以“动态”地随时地改变排版样式。
3 .动态定位（Dynamic Positioning）：通过W 3 C的“Working Draft on Positioning HTML with Cascading Style Sheets”，提供HTML元件在X、Y、Z轴的定位功能，让设计者可以放置影像、控件、文字等在网页上的任何位置上。而放置在不同的Z轴上，设计者就可以产生重叠的效果。
4 .内建资料处理（Data Awareness）：无须复杂的程序，无须花费服务器太多资源，即可让网页设计者即时处理文档。
5 .内建多媒体支援：IE 4.0结合CSS与内建的ActiveX Controls，提供多媒体支持的功能，包括转换特效、滤镜特效、路径控制、顺序控制、动画、制图、播放声音和影像等多媒体功能。
让我们再来看看Netscape Communicator 4.0对DHTML所提供的支持：
1 .动态排版样式（Dynamic Styles Sheets）：支援W 3 C的“Cascading Style Sheets”（串联式排版样式，简称CSS1或CSS）、和自创的“Java Script Style Sheets”。
2 .Dynamic Layers：提供图文定位、改变图文重叠顺序、控制隐藏或显示图文、移动图文的功能，让您设计出“动画”的效果！
3 .Dynamic Fonts：提供由服务器下载字型的功能。可见虽然IE 4.0和Netscape Communicator 4.0都提供了“Dynamic HTML”的支持，但是事实上两者除了对“Cascading Style Sheets”的规格相近外，其余都相差甚远。因此当你设计DHTML页面时必须充分考虑到兼容性的问题，选择称手的“兵刃”和方法对于设计者来说始终是最重要的。有关DHTML的使用方法和设计技巧作者将在第二章《动态网页设计十八般武艺》中仔细讲解，请密切关注。
或许对于一个个人网站来说充分运用DHTML技术足以令网页栩栩如生，动感十足。然而对于建立商业网站的企业而言，仅仅拥有DHTML是远远不够的。因为仅仅发生在客户浏览器端的动态效果是无法满足商业网站大量信息查询，客户咨询，资源交互等“动态”需求的。因此作为商业网站的设计者，必须要设计出更具实用性和交互性的“动态”网站。由于绝大多数商业网站都具有大量的数据和信息，而建网的初衷也就是在于方便客户查询企业资料，方便同客户的交流，及时获得信息反馈。那么，就必然会面临如何让使用者在浏览器界面中，通过互联网或内联网（Intranet）查询WEB数据库的资料，甚至输入、更新和删除WEB 服务器上的资料。下面笔者就简单介绍几种常用的“动态”网站设计方法：
1、CGI（Common Gateway Interface）通用网关接口的传统方式，当用户在浏览器端填好表单（form）要求输入的资料，提出HTTP请求后，WEB服务器端将执行一个表单所设定的可执行的CGI应用程序，CGI程序分析表单（form）中所输入的资料，存取WEB数据库，将查询执行的结果以HTML的格式返回给浏览器。使用CGI方式存取WEB数据库，有很多的缺点，譬如不易开发、变更修改成本高、功能有限、不易侦错、执行速度慢等，而且由于并非整合于HTML文档之中，因此必须使用与HTML完全不同的设计过程来设计一个可执行的应用程序。
2、IDC（Internet Database Connector）互联网数据库连接头是Windows NT Server内含Internet Information Server（简称IIS）2.0的特征之一，它提供了一种使你的互联网数据库内容得以发布并可与用户交互的方法，它实际上是一个包含于IIS中的I S A P I应用程序。你只需掌握HTML和SQL的基本知识并写为数不多的代码就能编出具有交互能力的数据库应用程序，让使用者在浏览器界面中得以查询、输入、更新、和删除WEB服务器上的数据资料。正如VB程序员所喜欢的那样，构成IDC应用程序的文件是解释性的，由于设计简易，只要准备两个档案，即可在用户端的浏览器中存取WEB服务器的数据资料，且无须编译，因此具有快速的开发循环和反馈。但这种简单性的代价是牺牲了许多灵活性，使你不得不放弃许多对用户接口的控制，并几乎放弃了所有验证数据的能力。因而I D C仅适用于简单的WEB应用程序。
3、ActiveX Data Object（ADO）是WEB数据库应用的最佳选择。
ActiveX Data Object（简称ADO）究竟是什么呢？ActiveX Data Object的技术，让您可以与Active Server Pages（简称ASP）结合以建立提供数据资讯的网页内容，只需在网页面中执行Structured Query Language（结构化查询语言，简称SQL）指令，让用户在浏览器界面中输入、更新、和删除WEB服务器上的数据资料。当用户端的浏览器填好表单所要求输入的资料并按下“Submit”按钮后，经过互联网、内联网传送HTTP请求到WEB服务器，该请求在WEB服务器执行一个表单所指定的Active Server Pages程序（后缀名为. ASP的文档）。一个. ASP文档是一个纯文字档，包括：HTML标记（tags）、VBScript或JScript语言的程序代码、ASP语法、和结构化查询语言SQL指令。IIS3.0 / 4.0 WEB服务器执行. ASP文档，通过ODBC驱动程式，连接到支持ODBC的数据库上，执行ASP文档所指定的SQL指令，最后将执行的结果以HTML的格式传送给用户浏览器。ADO具有容易使用、开发执行快速、消耗系统资源较少，和占用磁盘空间小等优点。
以上就是目前设计商业网站常用的“动态”技术，由于本人的工作和使用经验，笔者较倾向于ADO和ASP的结合，从长远来看这对搭档也势必成为今后一段时间内“动态”WEB的核心技术。因此在本文第二章《动态网页设计十八般武艺》中，笔者将就ADO和ASP的使用进行展开讲述，敬请期待。
zyd2060 2008-1-14 21:00
第一章 asp基础入门篇 1.3 ASP简介
看了《如何令你的网站“动感十足”》一文后，是否令你怦然心动？是否已经急不可待地想构建属于你自己的动态网站？本文将以 Active Server Pages 为中心，向你全面展示制作动态商业网站的步骤和技巧并通过大量的实例，让你在不断的理论和实践之中笑傲“网络”……
上一章给大家简要介绍了建立动态网站的一些方法和制作工具，本章将以如何建立基于 IIS 的 ASP 动态网站为中心向大家一步一步地揭示动态商业网站设计的真正奥秘。为了使各位能够全面、细致地掌握 ASP 的开发技巧，本文今后将采取连载的形式，手把手地教你如何建立属于自己 ASP 动态网站。由于本文是作者根据自己的学习和实践经验并结合了一些外文资料而写成的，因此不免会有一些偏颇，希望各位见谅。如发现本文有何不当之处，请及时通知作者，谢谢。
Microsoft Active Server Pages 即我们所称的 ASP ，其实是一套微软开发的服务器端脚本环境， ASP 内含于 IIS 3.0 和 4.0 之中 , 通过 ASP 我们可以结合 HTML 网页、 ASP 指令和 ActiveX 元件建立动态、交互且高效的 WEB 服务器应用程序。有了 ASP 你就不必担心客户的浏览器是否能运行你所编写的代码，因为所有的程序都将在服务器端执行，包括所有嵌在普通 HTML 中的脚本程序。当程序执行完毕后，服务器仅将执行的结果返回给客户浏览器，这样也就减轻了客户端浏览器的负担，大大提高了交互的速度。 以下罗列了 Active Server Pages 所独具的一些特点：
1. 使用 VBScript 、 JScript 等简单易懂的脚本语言，结合 HTML 代码，即可快速地完成网站的应用程序。
2. 无须 compile 编译，容易编写，可在服务器端直接执行。
3. 使用普通的文本编辑器，如 Windows 的记事本，即可进行编辑设计。
4. 与浏览器无关 (Browser Independence), 用户端只要使用可执行 HTML 码的浏览器，即可浏览 Active Server Pages 所设计的网页内容。 Active Server Pages 所使用的脚本语言 (VBScript 、 Jscript) 均在 WEB 服务器端执行，用户端的浏览器不需要能够执行这些脚本语言。
5.Active Server Pages 能与任何 ActiveX scripting 语言相容。除了可使用 VBScript 或 JScript 语言来设计外，还通过 plug-in 的方式，使用由第三方所提供的其他脚本语言，譬如 REXX 、 Perl 、 Tcl 等。脚本引擎是处理脚本程序的 COM(Component Object Model) 物件。
6.Active Server Pages 的源程序，不会被传到客户浏览器，因而可以避免所写的源程序被他人剽窃，也提高了程序的安全性。
7. 可使用服务器端的脚本来产生客户端的脚本。
8. 物件导向（ Object-oriented ）。
9.ActiveX Server Components(ActiveX 服务器元件 ) 具有无限可扩充性。可以使用 Visual Basic 、 Java 、 Visual C++ 、 COBOL 等编程语言来编写你所需要的 ActiveX Server Component 。
ASP 的奇妙之处真是不胜枚举，下面就请各位系好安全带，我将带领大家进入 ASP 的梦幻世界。
首先，让我们来看看运行 ASP 所需的环境：
* Microsoft Internet Information Server version 3.0/4.0 on Windows NT Server
* Microsoft Peer Web Services Version 3.0 on Windows NT Workstation
* Microsoft Personal Web Server on Windows 95/98
正如前文所述，与一般的程序不同， .asp 程序无须编译， ASP 程序的控制部份，是使用 VBScript 、 JScript 等脚本语言来设计的，当执行 ASP 程序时，脚本程序将一整套命令发送给脚本解释器 ( 即脚本引擎 ) ，由脚本解释器进行翻译并将其转换成服务器所能执行的命令。当然，同其他编程语言一样， ASP 程序的编写也遵循一定的规则，如果你想使用你所喜爱的脚本语言编写 ASP 程序，那么你的服务器上必须要有能解释这种脚本语言的脚本解释器。当你安装 ASP 时，系统提供了两种脚本语言： VBsrcipt 和 JScript ，而 VBscript 则被作为系统默认的脚本语言。你也可以根据自己的喜好改变系统默认的脚本语言，关于如何改变系统默认的脚本语言请看《 在 ASP 中使用脚本语言》一文。
ASP 本身并不是一种脚本语言，它只是提供了一种使镶嵌在 HTML 页面中的脚本程序得以运行的环境。但是，要学好 ASP 又必须掌握它的语法和规则。现在就让我们开始一步一步地认识并学习 Active Server Pages 。
ASP 程序其实是以扩展名为 .asp 的纯文本形式存在于 WEB 服务器上的，你可以用任何文本编辑器打开它， ASP 程序中可以包含纯文本、 HTML 标记以及脚本命令。你只需将 .asp 程序放在 WEB 服务器的虚拟目录下（该目录必须要有可执行权限），就可以通过 WWW 的方式访问 ASP 程序了。要学好 ASP 程序的设计，必须掌握脚本的编写，那么究竟什么是脚本呢？其实脚本是由一系列的脚本命令所组成的，如同一般的程序，脚本可以将一个值赋给一个变量，可以命令 WEB 服务器发送一个值到客户浏览器，还可以将一系列命令定义成一个过程。要编写脚本，你必须要熟悉至少一门脚本语言，如 VBScript 。脚本语言是一种介乎于 HTML 和诸如 JAVA 、 Visual Basic 、 C++ 等编程语言之间的一种特殊的语言，尽管它更接近后者，但它却不具有编程语言复杂、严谨的语法和规则。如前所述 ASP 所提供的脚本运行环境可支持多种脚本语言，譬如： JScript 、 REXX 、 PERL 等等，这无疑给 ASP 程序设计者提供了广泛的发挥余地。 ASP 的出现使得广大 WEB 设计者不必在为客户浏览器是否支持而担心，实际上就算你 在同一个 .asp 文件中使用不同的脚本语言，你都无须为此担忧，因为所有的一切都将在服务器端进行，客户浏览器得到的只是一个程序执行的结果，而你也只需在 .asp 中声明使用不同的脚本语言即可。下面是一个典型的在同一 .asp 文件中使用两种脚本语言的例子：
< HTML>
< BODY>
< TABLE>
< % Call Callme %>
< /TABLE>
< % Call ViewDate %>
< /BODY>
< /HTML>
< SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Callme
Response.Write "< TR>< TD>Call< /TD>< TD>Me< /TD>< /TR>"
End Sub
< /SCRIPT>
< SCRIPT LANGUAGE=JScript RUNAT=Server>
function ViewDate()
{
var x
x = new Date()
Response.Write(x.toString())
}
< /SCRIPT>
这是各位在本文中接触的第一个真正的 ASP 程序，千万不要被“ < % %>”符号搞糊涂，这其实是标准的 ASP 定界符，而“ < SCRIPT>< /SCRIPT>”之间的就是脚本语言。 ASP 不同于脚本语言，它有自己特定的语法，所有的 ASP 命令都必须包含在 < % 和 %>之内，如： < % test="English" %>， ASP 通过包含在 < % 和 %>中的表达式将执行结果输出到客户浏览器 , 如： < % =test %>就是将前面赋给变量 test 的值 English 发送到客户浏览器中，而当变量 test 的值为 Mathematics 时 , 以下程序：
This weekend we will test < % =test %>.
在客户浏览器中则显示为：
This weekend we will test Mathematics.
学习 ASP 最好的方法莫过于亲自动手编写，为了在最短的时间内使各位掌握 ASP 的程序设计技巧，本文将采取实例分析法，通过一系列的实例让各位在实践中学习 ASP 。建立一个 ASP 页面，你所需的只是打开一个文本编辑器，如： Notepad ，然后跟我开始动手编写第一个 ASP 程序。下面我们将建立一个自动监测浏览时间并根据不同时段动态显示不同页面内容的 ASP 程序，请将以下代码剪贴到你的文本编辑器中 , 并存为 test1.asp ：
< html>
< body>
< FONT COLOR="Green">
< % If Time < #12:00:00# And Time >= #00:00:00# Then %>
早上好，今天天气不赖啊 !
< % ElseIf Time < #19:00:00# And Time >= #12:00:00# Then %>
下午好 !
< % Else %>
哈喽 ! 今晚你有没有去 IRC 聊天 !
< % End If %>
< /body>
< /html>
将 test1.asp 保存在 WEB 服务器的虚拟目录 ( 如： aspsamp/) 下，并在浏览器中用 HTTP 的方式进行浏览，如： http://yourcomputername/aspsamp/test1.asp ，你将会新奇地发现，你的页面真的活起来了。虽然，这只是一个非常简单的实例，而且这一功能完全可以通过 JavaScript 完成，但是不难发现使用 ASP 要比 JavaScript 简洁、迅速得多，而且运用此法，你完全可以轻而易举地令你的网页在不同的时段展示不同的风格。此例中的“ Time ”实际上是一个 VBScript 内置的显示系统当前时间的函数，由于系统默认的脚本语言是 VBScript ，因此当你在 ASP 命令中调用该函数时，脚本引擎会自动将其转换成当前的系统时间。接下来我们将给 test1.asp 添加一点色彩，在 < body>标识中添加“ bgcolor="< % =bgc %>”即变为 < body bgcolor="< % =bgc %>">，并在 < body>标记前添加如下语句：
< ％If Time < #12:00:00# And Time >= #00:00:00# Then
bgc="silver"
ElseIf Time < #19:00:00# And Time >= #12:00:00# Then
bgc="navy"
Else
bgc="red"
End If
％>
如此一来，当用户在不同的时段访问你的页面时，他们将会看到不同的页面背景色。我们可以做的事情还有很多，譬如你想知道在凌晨至十二点之间浏览你页面的客户的姓名，并向他或她问好，那么下面的这段程序将能助你达成心愿。首先你需要在页面中设置表单，将以下 HTML 代码剪贴到“ < % If Time < #12:00:00# And Time >= #00:00:00# Then %>”之后：
欢迎光临我的主页，请填写以下信息 : < FORM METHOD="POST" ACTION="test1.asp">
< P>
First Name: < INPUT NAME="fname" SIZE="48">
< P>
Last Name: < INPUT NAME="lname" SIZE="48">
< P>
Title: < INPUT NAME="title" TYPE=RADIO VALUE="mr">Mr.
< INPUT NAME="title" TYPE=RADIO VALUE="ms">Ms.
< P>
< INPUT TYPE=SUBMIT>
< INPUT TYPE=RESET>
< /FORM>
然后在以上 HTML 代码后面添加如下 ASP 命令：
< %
title=request.form("title")
if title="mr" then
%>
欢迎您 Mr.
。
< % elseif title="ms" then %>
欢迎您 Ms.< % =request.form("fname") %>。
< % else %>
< B>< font color=blue>欢迎您 < % =request.form("fname")&" "&request.form("lname") %>。 < /font>< /B>
< % end if %>
保存文件 test1.asp ，并在浏览器中以 HTTP 方式进行浏览，如果此时的系统时间在凌晨 0:00:00 和中午 12:00:00 之间的话，浏览器将显示如下画面：
[attach]195609[/attach]
这其实是一个在 Internet 和 Intranet 上常见的功能，即当用户在浏览器端填写完表单后，通过调用一个通用网关程序将用户数据传送到服务器，由服务器进行处理后再将结果返还给客户浏览器。过去为了实现这样的功能必须编写一个独立于 HTML 之外的 CGI 程序，并通过 HTML 进行调用，撇开 CGI 编写复杂等缺点不谈， CGI 的执行效率也是一个大问题，每一个表单 (form) 均须执行一个可执行文档，当多人同时上线使用时，多个文档同时执行，将大大降低 WEB 服务器的执行速度，如今 ASP 提供了与 HTML 完全相融的编程环境，显然要比使用 CGI 便捷得多。
在本期的最后让我们再来看看 ASP 的循环功能，譬如你希望当客户在晚间 7:00 至凌晨 0:00:00 浏览你的页面时，在页面中央显示 6 个笑脸
[attach]195610[/attach]
表示问候，那么你只需要将以下命令剪贴到“ Good Evening! ”后面即可： < % for i=1 to 6 %>
< p>< center>< img src="smile.gif" width="32" height="32" alt=" 晚上好 ">< /p>< % next %>
这是一个最最基本的循环语句，它将一个笑脸图片重复调用六次并显示在页面上。当然此例的效果完全可以用 HTML 做到，但是不难发现使用 ASP 大大缩短了代码的重复编写，使得程序具有良好的可阅读性。另外，当你制作一个诸如根据用户投票来给所评测的对象评定星级的评测站点时，使用此法，你就完全不需要为每一个星级制作一幅图片。如果一个对象被评为 4 星级，那只需将一颗星的图片循环显示 4 次，以此类推即可。当然，当工作量较小的时候你不会感觉到 ASP 的好处，然而一旦数据量巨增，你将会深刻的体会到 ASP 动态网站给你带来的前所未有的轻、爽感受 !
zyd2060 2008-1-14 21:02
第一章 asp基础入门篇 1.4 ASP脚本基础
通过前两篇的学习，相信各位已经对 ASP 的动态网站设计有了一个基本的概念和整体的印象。从本篇开始作者将从脚本语言的使用着手，由浅入深地带领大家探索 ASP 动态网站设计的真正奥秘。
本文第二篇刊登后，很多朋友给我发了“妹儿”，希望能尽快看到本文的第三、第四、乃至第……篇，甚至有位朋友焦急地要我将 ASP 篇的全文发给他。看到有如此之多志同道合的朋友，令我精神大振。虽然 ASP 早在两年前就已经推出了，但直到今年它才以其灵活便捷的开发过程、良好的 WEB 数据库连接功能受到了国人的重视，然而由于目前国内尚缺乏关于 ASP 开发 WEB 应用程序的详尽教材，因此使得国内广大 WEB 开发者们仍处在闭门啃 E 文的阶段，也包括作者本人。也正因为如此，作者才蒙发了写文章的念头，在得到 Chinabyte 网络学院翁斌先生的大力支持后，各位才得以见到此文。
作者殷切希望能通过此文为广大 WEB 开发者和爱好者提供便利，使大家共同来参加 ASP 的学习和交流，为了顾全不同层次读者的需求作者还是决定从最基本的脚本语言的编制着手，随后再一步一步地讲解 ASP 内建对象、ActiveX 组件以及用 ASP 开发 WEB 应用程序的实例，相信通过一段时间持续的学习，不出几个月各位都能够得心应手地开发自己的动态网站。下面就先请大家跟我来学习一些 ASP 中应用脚本语言（以 VBScript 为主）的基础知识。
在开始学习脚本语言之前，你应该理解一些简单的概念 -- 变量、进程。所谓变量是计算机内存中已命名的存储位置，其中包含了数字或字符串等数据，它使用户便于理解脚本操作的名称，为用户提供了一种存储、检索和操作数据的途径。程序是由一个或多个进程组成的，在 VBScript 中，进程就是“指令块”，通常意义上的进程，如 Sub，只是为了简单的数据处理。
在 VBScript 中，严格的来讲变量是不用声明的，
[font=新宋体]如：< % Mystring="This is my string" % >[/font] 然而，即使在使用变量前不需要去声明变量，也应养成在编程时声明变量的良好习惯，因为这样有助于防止错误发生。声明一个变量意味着告诉脚本引擎，有一个特定名称的变量，这样就可以在脚本中引用该变量。在 VBScript 中声明一个变量可以使用“Dim”语句，如下：
[font=新宋体]< script language="VBScript" >
< !--
Option Explicit \' 要求在脚本中声明所有的变量
Dim Mystring
Mystring="This is my string"
-- >
< /script>
[/font]变量的作用域即生命期，决定哪些脚本命令可访问变量。在过程内部声明的变量具有局部作用域。每执行一次过程，变量就被创建然后消亡。而过程外部的任何命令都不能访问它。在过程外部声明的变量具有全局作用域，其值能被 ASP 页上的任何脚本命令访问和修改。声明变量时，局部变量和全局变量可以有相同的名称。而改变其中一个的值并不会改变另一个的值。如果没有声明变量，则可能不小心会改变一个全局变量的值。例如，以下脚本命令返回值 1，虽然有两个名为 Y 变量：
[font=新宋体]< %
Dim YY = 1Call SetLocalVariableResponse.Write Y
Sub SetLocalVariable
Dim Y
Y = 2End Sub % >
[/font]由于变量没有显式声明，以下的脚本命令将返回 2。当过程调用将 Y 设置为 2 时，脚本引擎认为该过程是要修改全局变量.
zyd2060 2008-1-14 21:03
第一章 asp基础入门篇 1.5 ASP脚本变量、函数、过程和条件语句
在上一期中作者向诸位简要介绍了 ASP 脚本语言之一 VBScript 的一些基本常识，本期将继续给大家讲解 VBScript 的脚本编写方法，并通过展示 VBScript 在 ASP 程序编写过程中的一系列实例使大家对 VBScript 有更进一层的理解。
大家在学习了脚本语言 VBScript 的变量、常量和过程的基本概念后，本期将继续向各位介绍 VBScript 的函数和语法。
函数和过程一样都是命名了的代码块，但它们却有很大的区别，过程完成程序任务，函数则返回值。我们可以这样理解，过程象一个完整的句子，而函数则象一个单词。举个例子，当你想获取某个数的平方根，你只要将该数传给 VBScript 的 Sqr() 函数，此函数会立即返回该数的平方根。如：
[font=新宋体]A=sqr(9)[/font] 则 A=3。熟练掌握脚本语言的函数将给你编写 ASP 程序带来极大的方便，就以上一期结尾处作者布置给大家的课后练习来说，如果你对脚本语言的函数掌握不够全面，那么解决如此之小的一个问题将很有可能花费你相当大的精力。现在让我们来回顾一下这道课后练习。
“作者正在用 ASP 制作一套基于 WEB 的 BBS 系统，希望能在其中添加一项特殊功能，即当任何用户登陆该 BBS 后都能够查阅近七天来所有新发布的信息。”
如果你不熟悉 VBScrip，就不会知道 VBScrip 本身提供了一个用来取得日期之间的差或和的函数 DateSerial，它的语法如下：
[font=新宋体]DateSerial(year, month, day)[/font] 如果你要指定一个日期，例如：1998 年11月10日，那么 DateSerial 函数中每个参数的取值范围都应该是可接受的，即日的取值应在1和31之间，月的取值应在1和12之间。但是，也可以使用表示某日之前或之后的年、月、日数目的数值表达式为每个参数指定相对日期。以下样例中使用了数值表达式代替绝对日期。在这里，DateSerial 函数返回1998年11月10日之前二十年 (1990-20) 零两个月 (11-2) 又一天 (10-1) 的日期：即 1978 年9月9日。程序如下：
[font=新宋体]Datep=DateSerial(1998-20, 11-2,10-1)[/font] 对于 year 参数，若取值范围是从 0 到99，则被解释为 1900 到 1999 年。对于此范围之外的 year 参数，则使用四位数字表示年份（例如 1800 年）。当任何一个参数的取值超出可接受的范围时，则会适当地进位到下一个较大的时间单位。例如，如果指定了35 天，则这个天数将被解释成一个月加上多出来的日数，多出来的日数取决于其年份和月份。但是如果参数值超出 -32,768 到 32,767 的范围，或者由三个参数指定（无论是直接还是通过表达式指定）的日期超出了可以接受的日期范围，就会发生错误。
当我们了解并掌握了函数 DateSerial 的使用方法后，再来看看作者布置的这道题目，一切就迎刃而解了。下面我将程序中的此部分代码公布如下： [font=新宋体]itemp=DateSerial(Year(date), month(date), day(date)-7)[/font]
[font=新宋体]itemp=DateValue(itemp)
sql="Select * from message Where message.creatime Between #"&date&"# And #"&itemp&"# "[/font] 在这里我们又接触到了一组函数 Year,month,day，它们是用来得到一个日期的年、月、日。date 是常数，表示今天日期，而函数 DateValue 则是将字符串变量转化为日期格式的变量。在本段程序的第三行，我们第一次接触到了标准的 SQL 查询语句，这句语句是什么意思呢？
“Select”是标准的 SQL 数据库查询命令，通过 SELECT 语句我们可以在数据库中检索数据，并将查询结果提供给用户，此处的“*”表示查询该名为“message”的数据库中的所有记录，而“where”的作用是设定一个查询条件，是为了将数据库中符合条件的记录取出来，“message.creatime”是一个储存了数据库中记录创建日期的变量。将整句语句连起来理解就是：查询名为 message 的数据库中的所有记录，并将其中创建日期在今天和今天以前七日以内的所有记录存储在变量 sql 中。可能由于大家第一次接触 SQL 语句，一时间无法完全理解它的作用，不过不用担心在今后的章节中作者将专门用一期给大家介绍 SQL 的使用方法。
通过上面的学习，大家应该已经能够理解函数在程序中的作用，当然我们不必去死背函数，但要做到熟练运用只有一条捷径 -- 多实践。接下来让我们来看看 VBScript 的基本语法。
了解编程语言的朋友一定知道在程序中控制程序流程的语句主要可以分为条件语句和循环语句，在 VBScript 中可使用以下条件语句： If...Then...Else 语句
Select Case 语句
If...Then...Else 语句用于计算条件是否为 True 或 False，并且根据计算结果指定要运行的语句。通常，条件是使用比较运算符对值或变量进行比较的表达式，If...Then...Else 语句可以按照需要进行嵌套。
让我们来创建两个范例文件：if1.asp 和 if2.asp
将以下语句剪贴到记事簿中，并保存为 if1.asp( 注意：请将程序中“<”后的空格去掉 ) < html>
[font=新宋体]< head>
< TITLE>if1.asp< /TITLE>
< /head>< body bgcolor="#FFFFFF">
< form action="if2.asp" method=get>
Your First Name< INPUT NAME="FirstName" MaxLength=20>< p>
Your Last Name< INPUT NAME="LastName" MaxLength=20>< p>
< INPUT TYPE=submit>< INPUT TYPE=reset>
< /form>
< /body>
< /html>
[/font]将以下语句剪贴到记事簿中，并保存为 if2.asp
[font=新宋体]< html>
< head>
< TITLE>ifrespond.asp< /TITLE>
< /head>
< % fname=request.querystring("Firstname")
lname=request.querystring("Lastname")
If fname="George" and lname="Washington" then %>
Hi.You must be the first president!
< % else %>
Hi!Nice to Meet You
< %end if %>
< /body>
< /html>
[/font]asp1.asp 产生一个文本输入框，要求用户输入姓、名，如下图：
[attach]195611[/attach]
asp2.asp 则是用 IF 语句判断用户输入的姓名是否为“George Washington”, 并做出相应的反馈。在此我们遇到了一个 ASP 的内建对象 request，通过使用 request 对象可以访问任何用 HTTP 请求传递的信息，包括从 HTML 表格中用 POST 方法或 GET 方法传递的参数、cookie 和用户认证。而 QueryString 集合检索 HTTP 查询字符串中变量的值，HTTP 查询字符串由问号 (?) 后的值指定。如：
http://localhost/if2.asp?Firstname=George&Lastname=Washington
生成值为 "Firstname=George&Lastname=Washington" 的变量名字符串。关于 ASP 对象作者将在今后的几篇里重点讲述。
If...Then...Else 语句的一种变形允许您从多个条件中选择，即添加 ElseIf 子句以扩充 If...Then...Else 语句的功能，使您可以控制基于多种可能的程序流程。
我们将 asp2.asp 的程序部分扩充如下：< %
[font=新宋体]fname=lcase(request.querystring("Firstname"))
lname=lcase(request.querystring("Lastname"))
If fname="george" and lname="washington" then %>
Hi.You must be the first president!< p>
< % elseIf fname="ronald" and lname="reagan" then %>
Hi.You must be the actor president!< p>
< % elseIf fname="jimmy" and lname="carter" then %>
Hi.You must be the peanut farmer president!< p>
< % elseIf fname="naoko" or fname="charles" then %>
Hi.Your name reminds me of someone,but I am not sure who!< p>
< % else %>
Hi!Nice to Meet You
< % end if %>
[/font]可以添加任意多个 ElseIf 子句以提供多种选择。但使用多个 ElseIf 子句经常会使程序变得很累赘。在多个条件中进行选择的更好方法是使用 Select Case 语句。
Select Case 结构提供了 If...Then...ElseIf 结构的一个变通形式，可以从多个语句块中选择执行其中的一个。Select Case 语句提供的功能与 If...Then...Else 语句类似，但是可以使代码更加简练易读。Select Case 结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个 Case 的值比较。如果匹配，则执行与该 Case 关联的语句块，我们同样可以用 Select Case 语句来写 asp2.asp 文件：
[font=新宋体]< %
fname=lcase(request.querystring("Firstname"))
lname=lcase(request.querystring("Lastname"))
name=fname+lname
Select case name
case "georgewashington"
response.write "Hi.You must be the first president!< p>"
case "ronaldreagan"
response.write "Hi.You must be the actor president!< p>"
case "jimmycarter"
response.write "Hi.You must be the peanut farmer president!< p>"
case "naokocharles"
response.write "Hi.Your name reminds me of someone,but I am not sure who!< p>"
case else
response.write "Hi!Nice to Meet You"
End Select %>[/font]
请注意 Select Case 结构只计算开始处的一个表达式，并且只计算一次，而 If...Then...ElseIf 结构计算每个 ElseIf 语句的表达式，这些表达式可以各不相同。因此仅当每个 ElseIf 语句计算的表达式都相同时，才可以使用 Select Case 结构代替 If...Then...ElseIf 结构。Select Case 语句也是可以是嵌套的，每一层嵌套的 Select Case 语句必须有与之匹配的 End Select 语句。
以上给大家介绍的脚本语言 VBScript 的函数和条件语句的使用方法，由于篇幅的缘故不能详细展开，希望各位有志学习 ASP 的朋友，能在课后进行一定程度的自学和练习。在日常开发 ASP 应用程序的过程中作者本人日渐体会到了脚本语言的重要性，灵活运用脚本语言将非但可以大大提高 ASP 应用程序的开发过程，给广大网站制作人员节省大量的时间，而且还能够增强 ASP 应用程序的执行效率和功能。欲善其事必先利其器，因此作者在此强烈建议诸君，熟练掌握脚本语言，这将对你的 ASP 程序开发大有帮助。由于本文不是 VBScript 教程，因此只能用较小的篇幅给大家简要介绍一些 VBScript 基本常识，在下一期介绍完 VBScript 的循环语句后，我们将正式开始学习 ASP 的内建对象，要深入 VBScript，建议大家找些教材进行自学。如果你在看完本文后有任何问题请及时 Mail 我，如果你有什么好的建议也请来信告知，谢谢。
zyd2060 2008-1-14 21:06
第一章 asp基础入门篇 1.6 ASP脚本循环语句
在本文上两篇中，我们学习了脚本语言 VBScript 的变量、函数、过程和条件语句，本篇将继续给大家介绍 VBScipt 的循环语句，并对脚本语言在 ASP 中的应用加以总结。
如果有人告诉你学习 ASP 不需要任何编程知识，那么他错了；如果我告诉你学习 ASP 必须掌握一门编程语言，那么我错了。ASP 动态服务器页面环境的特点就在于它是通过一种或几种脚本语言而写成的，脚本语言可以看作是编程语言的简化版，它易于学习和掌握，这给广大动态网站的设计者们提供了相当大的便利。可以这么说 : 脚本语言运用的得当与否直接关系到 ASP 应用程序的优与劣。继上一篇我们学习了脚本语言 VBScript 的函数和条件语句后，今天我们继续来看看 VBScript 中的循环语句。
循环语句的作用就是重复执行程序代码，循环可分为三类：一类在条件变为“假”之前重复执行语句，一类在条件变为“真”之前重复执行语句，另一类按照指定的次数重复执行语句。在 VBScript 中可使用下列循环语句：
Do...Loop: 当（或直到）条件为“真”时循环。
While...Wend: 当条件为“真”时循环。
For...Next: 指定循环次数，使用计数器重复运行语句。
For Each...Next: 对于集合中的每项或数组中的每个元素，重复执行一组语句。
我们先来看看 Do...Loop，它是可以多次（次数不定）运行语句块。当条件为“真”时或条件变为“真”之前，重复执行语句块。请看下例： < html>< head>
< title>DoLoop.asp< /title>< body bgcolor="#FFFFFF">< /head>< p>< /p> < p>请将今年到本月为止的每个月份的销售结算记录填写在本页之上。< P>
< %
counter = 1
thismonth = month(now())
Do while counter < thismonth + 1
response.write " " & counter & " 月份 : "
response.write "______________________________" & "< BR>< br>"
If counter >13 then
exit do
end if
counter = counter+1
Loop
%>
< hr>< /body>< /html> 这段 ASP 程序运用循环语句制作了一张销售结算记录表，将以上代码剪贴至记事簿保存为 DoLoop.asp，并在浏览器中以 HTTP 方式进行浏览，根据当前的月份的不同，你将看到如下图的结果。
[attach]195612[/attach]
我们来分析一下此段程序，我们的目的是要根据当前的月份打印一张表格，首先我们建立一个计数器“count”并将其值设为 1，然后我们用函数 month() 和 now() 得到当前的月份，最后建立循环，当 count 的值小于当前月份的值加 1 的时候，即显示月份值及一条横线并将 count 的值加 1，循环语句重复执行直到以上条件为假时退出循环。其中如果 count 大于 13 则用 exit do 立即退出循环。
Do Loop 语句还可以使用以下语法：
Do
[statements][Exit Do]
[statements]Loop [{While | Until} condition]
While...Wend 语句是为那些熟悉其用法的用户提供的。但是由于 While...Wend 缺少灵活性，所以建议最好使用 Do...Loop 语句。下面我们来看看 For Next 语句。For...Next 语句用于将语句块运行指定的次数，在循环中使用计数器变量，该变量的值随每一次循环增加或减少。
下面的示例将过程 MyProc 重复执行 50 次。For 语句指定计数器变量 x 及其起始值与终止值。Next 语句使计数器变量每次加 1。 Sub DoMyProc50Times()
Dim x
For x = 1 To 50
MyProc
Next
End Sub
关键字 Step 用于指定计数器变量每次增加或减少的值。在下面的示例中，计数器变量 j 每次加 2。循环结束后，total 的值为 2、4、6、8 和 10 的总和。
Sub TwosTotal()
Dim j, total
For j = 2 To 10 Step 2
total = total + j
Next
MsgBox " 总和为 " & total & "。"
End Sub
要使计数器变量递减，可将 Step 设为负值。此时计数器变量的终止值必须小于起始值。在下面的示例中，计数器变量 myNum 每次减 2。循环结束后，total 的值为 16、14、12、10、8、6、4 和 2 的总和。 Sub NewTotal()
Dim myNum, total
For myNum = 16 To 2 Step -2
total = total + myNum
Next
MsgBox " 总和为 " & total & "。"
End Sub
Exit For 语句用于在计数器达到其终止值之前退出 For...Next 语句。因为通常只是在某些特殊情况下（例如在发生错误时）要退出循环，所以可以在 If...Then...Else 语句的 True 语句块中使用 Exit For 语句。如果条件为 False，循环将照常运行。
最后，让我们来看看 For Each...Next 语句 ,For Each...Next 循环与 For...Next 循环类似。For Each...Next 不是将语句运行指定的次数，而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的数目时非常有用。它的语法如下： For Each element In group
[statements]
[Exit For]
[statements]Next [element]
如果 group 中有至少一个元素，就会进入 For Each 块执行。一旦进入循环，便首先对 group 中第一个元素执行循环中的所有语句。只要 group 中还有其他的元素，就会对每个元素执行循环中的语句。当 group 中没有其他元素时退出循环，然后从 Next 语句之后的语句继续执行。
至此，我们已经完成了对脚本语言 VBScript 所有的基本知识的学习，但是仅凭阅读现有的这几篇文章你是无法熟练运用 VBScript 的，你必须通过不断的实践来提高自己的等级。当然，如果你熟悉 C，你也可以选择JavaScript 来作为 ASP 应用程序的脚本语言。不知大家有没有发现 ASP 程序的调试比较困难，因为没有什么现成的工具，在这里我向大家简要介绍一下 Microsoft Script Debugger，我们可以运用它来进行一定量的程序调试工作。
IIS4.0 所包括的 Microsoft Script Debugger（Script 侦错工具），提供脚本程序的侦错功能。您可以使用 Microsoft Script 侦错工具来进行对使用 VBScript、JScript 编写的脚本程序，以及 Java applets、beans 和 ActiveX 组件的侦错工作。
有的脚本程序在用户端浏览器执行，有的脚本程序（< % … %>中的部份）在服务器端执行。Microsoft Script Debugger，可以侦错用户端执行的脚本程序以及服务器端执行脚本程序。 在用户端浏览器执行的脚本程序是在用户端的浏览器当中执行，包括在标准 HTML 代码中的 VBScript、Jscript 部份。在浏览器载入此 HTML 代码或譬如按下按钮触发事件时，将执行此包括脚本程序的 HTML 代码。用户端浏览器执行的脚本程序，主要用于对 HTML 表单输入的基本检查等功能。
在服务器端执行的脚本程序是在 IIS 服务器端执行，包括在 .asp 程序中。先在 IIS 服务器上执行，执行结果产生标准的 HTML 代码，再传送到用户端浏览器。服务器端执行的脚本程序，主要用于多个网页之间的连结，HTML 表单输入的处理，以及存取服务器上数据库的资料等。
Microsoft Script Debugger 提供以下的除错功能：
1、设定中断点
2、逐步追踪脚本程序。
3、设定书签。
4、检视呼叫堆叠。
5、检视和更改变数值。
6、执行脚本指令。
从下一篇开始，我们将开始学习 ASP 的内建对象，敬请关注。
zyd2060 2008-1-14 21:08
第一章 asp基础入门篇 1.7 ASP内建对象Request
从本篇开始作者从 ASP 内建对象着手，为大家详细剖析 ASP 的六个内建对象和各种组件的特性和方法。
在正式开始学习 ASP 的内建对象和组件之前，先让我们来认识一些基本概念，这将对各位今后的学习大有帮助。请看下表 :
[table=500][tr][td=1,1,100]Active Server[/td][td=1,1,400]随 Windows NT 交付的服务器方技术的集合。这些 技术为组件应用程序管理、数据库访问、事务和消息 提供一致的服务器方组件、脚本模型和一套集成的系 统服务。 [/td][/tr][tr][td=1,1,24%]Active Server Pages (ASP)[/td][td=1,1,76%]在服务器上运行 ActiveX 脚本和 ActiveX 组件的服 务器方脚本环境。开发人员可以将脚本和组件结合在 一起创建基于 Web 的应用程序。[/td][/tr][tr][td=1,1,24%]ActiveX[/td][td=1,1,76%]允许开发人员为 World Wide Web 创建交互式组件的 内涵丰富的Microsoft 技术术语。允许用不同语言编写的软 件组件在网络环境中一起工作的一组不依赖语言的 互操作技术。ActiveX 的关键元素是组件对象模型 (COM) 和 分布组件对象模型 (DCOM)。这些技术已得到开放组织的 许可，已移植到许多平台上。[/td][/tr][tr][td=1,1,24%]ADO [/td][td=1,1,76%]Active 数据对象。为基于 Internet 以数据为中心的 应用程序而优化的一组基于对象的数据访问接口。ADO 基于已发布的规范并且随带在Microsoft Internet Information Server 和 Microsoft Visual InterDev 中。[/td][/tr][tr][td=1,1,24%]DSN [/td][td=1,1,76%]数据源名称。开放式数据库接口 (ODBC)用于引 用访问数据所需的驱动程序或其他信息的逻辑名称。Internet信 息服务器用于连接到 ODBC 数据源（如 SQL Server 数据库）的 名称。[/td][/tr][tr][td=1,1,24%]event: 事件 [/td][td=1,1,76%]由用户或 ActiveX 控件产生的程序响应的任何 操作。一般事件包括按键盘键、通过使用鼠标单击选 择按钮和其他鼠标操作。编程人员编写响应这些操作 的代码。 [/td][/tr][tr][td=1,1,24%]object: 对象 [/td][td=1,1,76%]在面向对象编程中，由当作完整实体的操作 和数据组成的变量。对象是基于特定模型的，在对象 中客户使用对象的服务通过由一组方法或相关函数 的接口访问对象的数据。然后客户端可以调用这些方 法执行某中操作。[/td][/tr][tr][td=1,1,24%]ODBC[/td][td=1,1,76%]开放式数据库接口。允许应用程序从各种跨 平台数据访问的已有数据源标准规格中访问数据的 应用程序编程接口。 [/td][/tr][tr][td=1,1,24%]SQL[/td][td=1,1,76%]结构化查询语言 Structured Query Language。定义和访 问关系型数据库的国际标准。
[/td][/tr][/table]
什么是对象？它可不是指你恋爱的男伴或女伴。在面向对象编程中，对象就是指由当作完整实体的操作和数据组成的变量。对象是基于特定模型的，在对象中客户使用对象的服务通过由一组方法或相关函数的接口访问对象的数据，然后客户端可以调用这些方法执行某中操作。ActiveX 组件是建立 Web 应用程序的关键，组件提供了在脚本中执行任务的对象。ActiveX 组件是一个文件，该文件包含执行某项或一组任务的代码，由于组件可以执行公用任务，这样程序员们就不必自己去创建执行这些任务的代码。可以利用组件作为脚本和基于 Web 应用程序的基本构造块。只要知道如何访问组件提供的对象，即使是位编写脚本的新手，也可以在不了解组件运作方式的情况下编写脚本。总之，组件使您不用学习编程就能够编写强大的脚本。组件是包含在动态链接库 .dll 或可执行文件 .exe 中的可执行代码。组件可以提供一个或多个对象以及对象的方法和属性。要使用组件提供的对象，请创建对象的实例并将这个新的实例分配变量名。使用 ASP 的 Server.CreateObject 方法可以创建对象的实例，使用脚本语言的变量分配指令可以为对象实例命名。如下例：
Set db=Server.CreateObject("ADODB.Connection") 这里的变量 db 就是 ASP 程序创建的访问数据库的对象实例。
Active Server Pages 提供了可在脚本中使用的内建对象。这些对象使用户更容易收集通过浏览器请求发送的信息、响应浏览器以及存储用户信息 , 从而使对象开发者摆脱了很多烦琐的工作。目前的 ASP 版本总共提供了六个内建对象，下面让我们将通过实例分别来进行学习。
一、Request 对象
可以使用 Request 对象访问任何基于 HTTP 请求传递的所有信息，包括从 HTML 表格用 POST 方法或 GET 方法传递的参数、cookie 和用户认证。Request 对象使您能够访问客户端发送给服务器的二进制数据。
Request 的语法 :
Request[. 集合 | 属性 | 方法 ]( 变量 )
在这里作者将挑选一些常用的对象语法进行分析
1、Form
Form 集合通过使用 POST 方法的表格检索邮送到 HTTP 请求正文中的表格元素的值。
语法
Request.Form(element)[(index)|.Count] 参数
element 指定集合要检索的表格元素的名称。
index 可选参数，使用该参数可以访问某参数中多个值中的一个。它可以是 1 到 Request.Form(parameter).Count 之间的任意整数。
Count 集合中元素的个数
Form 集合按请求正文中参数的名称来索引。Request.Form(element) 的值是请求正文中所有 element 值的数组。通过调用 Request.Form(element).Count 来确定参数中值的个数。如果参数未关联多个值，则计数为 1。如果找不到参数，计数为 0。要引用有多个值的表格元素中的单个值，必须指定 index 值。index 参数可以是从 1 到 Request.Form(element).Count 中的任意数字。如果引用多个表格参数中的一个，而未指定 index 值，返回的数据将是以逗号分隔的字符串。
可以使用重述符来显示表格请求中的所有数据值。例如，用户通过指定几个值填写表格，见下图。
[attach]195613[/attach]
对于 hobby 参数，您可以使用下面的脚本检索这些值。 ＜ html＞
＜ head＞＜ title＞＜ /title＞＜ /head＞ ＜ body＞
＜ p＞ 请填写你的爱好 ＜ /p＞
＜ form method="POST" action="form.asp"＞
＜ p＞＜ input type="text" name="hobby" size="20"＞＜ br＞
＜ input type="checkbox" name="hobby" value=" 足球 "＞ 足球 ＜ input type="checkbox" name="hobby" value=" 乒乓球 "＞ 乒乓球 ＜ /p＞
＜ p＞＜ input type="submit" value=" 发送 " name="B1"＞＜ input type="reset" value=" 重填 " name="B2"＞＜ /p＞
＜ /form＞
＜ % For Each i In Request.Form("hobby") Response.Write i & "＜ BR＞" Next %＞
＜ /body＞＜ /html＞ [align=left]将以上代码剪贴到记事簿中（注意将“＜ ”后面的空格去掉），保存为 form.asp 文件并运行，request 对象可以根据你在 form 中填入或选择元素内容的不同将元素逐个显示出来。[/align][align=left]当然使用 For...Next 循环也可以生成同样的输出，如下所示 :[/align] ＜ %
For i = 1 To Request.Form("hobby").Count<
Response.Write Request.Form("hobby")(i) & "＜ BR＞"Next<
%＞
2、QueryString
QueryString 集合检索 HTTP 查询字符串中变量的值 ,HTTP 查询字符串由问号 (?) 后的值指定。如：
＜ A HREF= "example.asp?string=this is a sample"＞string sample＜ /A＞
[align=left]生成值为 "this is a sample" 的变量名字符串。通过发送表格或由用户在其浏览器的地址框中键入查询也可以生成查询字符串。[/align][align=left]语法[/align]Request.QueryString(variable)[(index)|.Count]
[align=left]QueryString 集合可以让您以名称检索 QUERY_STRING 变量。Request.QueryString( 参数 ) 的值是出现在 QUERY_STRING 中所有参数的值的数组。通过调用Request.QueryString(parameter).Count 可以确定参数有多少个值。[/align][align=left]我们也可以使用 QueryString 来达到与前一个范例相同的功能。只需要将 request.form 部分替换如下：[/align] ＜ %
For Each i In Request.querystring("hobby")
Response.Write i & "＜ BR＞"
Next
%＞
3、Cookies
[align=left]什么是 Cookie?Cookie 其实是一个标签，当你访问一个需要唯一标识你的站址的 WEB 站点时，它会在你的硬盘上留下一个标记，下一次你访问同一个站点时，站点的页面会查找这个标记。每个 WEB 站点都有自己的标记，标记的内容可以随时读取，但只能由该站点的页面完成。每个站点的 Cookie 与其他所有站点的 Cookie 存在同一文件夹中的不同文件内（你可以在 Windows 的目录下的 Cookie 文件夹中找到它们）。一个 Cookie 就是一个唯一标识客户的标记，Cookie 可以包含在一个对话期或几个对话期之间某个 WEB 站点的所有页面共享的信息，使用 Cookie 还可以在页面之间交换信息。Request 提供的 Cookies 集合允许用户检索在 HTTP 请求中发送的 cookie 的值。这项功能经常被使用在要求认证客户密码以及电子公告板、WEB 聊天室等 ASP 程序中。[/align][align=left]语法[/align]Request.Cookies(cookie)[(key)|.attribute]
[align=left]参数[/align][align=left]cookie 指定要检索其值的 cookie。[/align][align=left]key 可选参数，用于从 cookie 字典中检索子关键字的值。[/align][align=left]attribe 指定 cookie 自身的有关信息。如：HasKeys 只读，指定 cookie 是否包含关键字。[/align][align=left]可以通过包含一个 key 值来访问 cookie 字典的子关键字。如果访问 cookie 字典时未指定 key，则所有关键字都会作为单个查询字符串返回。例如，如果 MyCookie 有两个关键字 , First 和 Second，而在调用 Request.Cookies 时并未指定其中任何一个关键字，那么将返回下列字符串。[/align]First=firstkeyvalue&Second=secondkeyvalue
[align=left]如果客户端浏览器发送了两个同名的 cookie，那么 Request.Cookie 将返回其中路径结构较深的一个。例如，如果有两个同名的的 cookie，但其中一个的路径属性为 /www/ 而另一个为 /www/home/，客户端浏览器同时将两个 cookie 都发送到 /www/home/ 目录中，那么 Request.Cookie 将只返回第二个 cookie。[/align][align=left]要确定某个 cookie 是不是 cookie 字典（cookie 有否有关键字），可使用下列脚本。[/align] ＜ %= Request.Cookies("myCookie").HasKeys %＞
[align=left]如果 myCookie 是一个 cookie 字典，则前面的赋值为 TRUE。否则，为 FALSE。下面我们来看看一个 cookie 的应用实例：[/align] ＜ %
nickname=request.form("nick")response.cookies("nick")=nickname
\' 用 response 对象将用户名写入 Cookie 之中
response.write " 欢迎 "&request.cookies("nick")&" 光临小站！"
%＞
＜ html＞＜ head＞＜ meta http-equiv="Content-Type" c＞
＜ title＞cookie＜ /title＞
＜ meta name="GENERATOR" c＞＜ /head＞
＜ body＞
＜ form method="POST" action="cookie.asp"＞
＜ p＞＜ input type="text" name="nick" size="20"＞
＜ input type="submit" value=" 发送 " name="B1"＞＜ input type="reset" value=" 重填 " name="B2"＞＜ /p＞＜ /form＞
＜ /body＞＜ /html＞
[align=left]这其实是一个在基于 WEB 的 BBS 或 CHAT 的 ASP 程序中常用的手法，它将用户在起始页面上填入的姓名保存在 cookie 中，这样后面的程序就可以很容易地调用该用户的 nick 了。[/align]
[align=left] 4、ServerVariables[/align][align=left] 大家都知道在浏览器中浏览网页的时候使用的传输协议是 HTTP，在 HTTP 的标题文件中会记录一些客户端的信息，如 : 客户的 IP 地址等等，有时服务器端需要根据不同的客户端信息做出不同的反映，这时候就需要用 ServerVariables 集合获取所需信息。[/align][align=left] 语法[/align][align=left] Request.ServerVariables ( 服务器环境变量 )[/align][align=left] 由于服务器环境变量较多，作者仅将一些常用的变量在下表中列出 : [/align][table=500][tr][td=1,1,100]ALL_HTTP[/td][td=1,1,400]客户端发送的所有 HTTP 标题文件。[/td][/tr][tr][td=1,1,27%]CONTENT_LENGTH[/td][td=1,1,73%]客户端发出内容的长度。 [/td][/tr][tr][td=1,1,27%]CONTENT_TYPE[/td][td=1,1,73%]内容的数据类型。如：“text/html”。同附加信息 的查询一起使用，如 HTTP 查询 GET、POST 和 PUT。[/td][/tr][tr][td=1,1,27%]LOCAL_ADDR[/td][td=1,1,73%]返回接受请求的服务器地址。如果在绑定多 个 IP 地址的多宿主机器上查找请求所使用的地址 时，这条变量非常重要。[/td][/tr][tr][td=1,1,27%]LOGON_USER[/td][td=1,1,73%]用户登录 Windows NT 的帐号。[/td][/tr][tr][td=1,1,27%]QUERY_STRING[/td][td=1,1,73%]查询 HTTP 请求中问号（?）后的信息。 [/td][/tr][tr][td=1,1,27%]REMOTE_ADDR[/td][td=1,1,73%]发出请求的远程主机 (client) 的 IP 地址。 [/td][/tr][tr][td=1,1,27%]REMOTE_HOST[/td][td=1,1,73%]发出请求的主机 (client) 名称。如果服务器无此 信息，它将设置为空的 MOTE_ADDR 变量。[/td][/tr][tr][td=1,1,27%]REQUEST_METHOD[/td][td=1,1,73%]该方法用于提出请求。相当于用于 HTTP 的 GET、HEAD、POST等 等。[/td][/tr][tr][td=1,1,27%]SERVER_NAME[/td][td=1,1,73%]出现在自引用 URL 中的服务器主机名、DNS 化名 或 IP 地址。[/td][/tr][tr][td=1,1,27%]SERVER_PORT[/td][td=1,1,73%]发送请求的端口号。[/td][/tr][/table]
我们可以使用以下脚本打印出所有的服务器环境变量。
＜ TABLE＞
＜ TR＞＜ TD＞＜ B＞Server Variable＜ /B＞＜ /TD＞＜ TD＞＜ B＞Value＜ /B＞＜ /TD＞＜ /TR＞＜ % For Each name In Request.ServerVariables %＞
＜ TR＞＜ TD＞ ＜ %= name %＞ ＜ /TD＞＜ TD＞ ＜ %= Request.ServerVariables(name) %＞ ＜ /TD＞＜ /TR＞＜ /TABLE＞
＜ % Next %＞
今天我们详细学习了 ASP 内建对象中的 request 对象，这也是 ASP 程序中使用最频繁的对象，希望大家在课后多多实践。
zyd2060 2008-1-14 21:10
第一章 asp基础入门篇 1.8 ASP内建对象Response
在上一篇中作者给大家详细介绍了 ASP 内建对象之一 Request 的使用方法，相信各位通过一系列的实践已经能够熟练掌握，本篇将继续给大家介绍 ASP 的另一个内建对象 Response。[font=楷体_GB2312][/font] 最近，有很多朋友来“妹儿”催我加快 ASP 篇一文的写作速度，并急切地询问哪里有关于 ASP 的教材。我深深地被大家的学习热情所打动，因此决定将自己平时所搜集的一些 ASP 信息资料拿出来和大家共享，也希望所有的朋友能慷慨地将自己搜集的有关 ASP 的资料告诉作者，谢谢。由于目前国内有关 ASP 的中文教材凤毛麟角，而专门针对 ASP 网站开发的中文教材作者更是闻所未闻（可能是作者孤陋寡闻），只是最近听说出了一本清华大学出版社出版的关于 MS InterDev 的傻瓜书，其中有 ASP 的教学，和一本 Active Server Page 2.0 的中文手册，因此目前作者还是主要通过国外网站来获取 ASP 的有关信息和资料，这也是作者写本文的一个主要原因。下面我就将 bookmark 中的一些较经典的 ASP 站点罗列出来：
1、[url]http://www.activeserverpage.com/[/url]
这是作者访问最频繁的 ASP 网站，也是世界上最大最全的关于 ASP 的网站之一，它里面不但有最新的 ASP 文献资料，免费组件，还有一本完整的 ASP 入门教材，它更是 ASP 网站的中枢站点，通过它你可以到达无数的 ASP 相关站点。
2、[url]http://www.asphole.com/[/url]
这本是一个针对 ASP 漏洞而建立的站点，但是它却无疑是一个完备的 ASP 信息站点，它非但提供了 ASP 的文章，及组件还提供详尽透彻的联接地址。
3、[url]http://www.15seconds.com/faq[/url] 和 [url]http://www.15seconds.com/search[/url]
这是一个作者所看到的最大的网上 ASP 交流站点，它拥有 ASP 解疑的答案，ASP 邮件清单信息，ASP 技巧，你可能需要需要几个月的时间才能读完这些信息。而在 [url]http://www.15seconds.com/AllComponents.asp[/url] 你可以读到最新的 ActiveX 组件和大量免费组件的详细介绍，并附有非常实用的文档与例子。
4、[url]http://www.microsoft.com/workshop/server/asp/aspfeat.asp[/url]
大家都知道 Active Server Page 是微软提出的一套基于 NT IIS 的 WEB 服务器端环境，那么这个由微软自己建立的 ASP 技术说明站点，大家当然是不可不看的。
5、[url]http://www.serverobjects.com/[/url]
在这里你可以获得无数实用的 ActiveX 组件 , 并下载它们的试用版，只可惜其中的大部分极好的组件都是要 Money 的。
6、[url]http://www.cyscape.com/asp/browscap/[/url]
大家还记得作者在 ASP2 一文中介绍的那个用来辨别客户端浏览器版本的 Browser Capabilitie 组件吗？在这个站点你可以获得最新的 BROWSCAP.INI 文件，它拥有每一个 ASP 安装时微软没有提供的浏览器的信息，这样你在 ASP 中判断客户浏览器是就能够万无一失了。
7、[url]http://www.microsoft.com/data/ado/[/url]
ASP 最强大且便捷的功能莫过于同数据库的连接，通过 ASP 内建的 ActiveX 组件，我们可以轻而易举的将 WEB 与所有和 ODBC 兼容的数据库连接起来，在这个微软的站点上你可以获取很多实用的 ADO 资料。
8、[url]http://www.cobb.com/m_sbn4/[/url]
一个不错的 ASP 论坛，你可以在那里贴你的问题，读取别人的问题和解答。
下面，我们开始学习 ASP 的另一个内建对象 Response。
与 Request 是获取客户端 HTTP 信息相反 ,Response 对象是用来控制发送给用户的信息，包括直接发送信息给浏览器、重定向浏览器到另一个 URL 或设置 cookie 的值。
语法
Response.collection|property|method
[b]一、属性[/b]
1、Buffer
Buffer 属性指示是否缓冲页输出。当缓冲页输出时，只有当前页的所有服务器脚本处理完毕或者调用了 Flush 或 End 方法后，服务器才将响应发送给客户端浏览器，服务器将输出发送给客户端浏览器后就不能再设置 Buffer 属性。因此应该在 .asp 文件的第一行调用 Response.Buffer。
2、Charset
Charset 属性将字符集名称附加到 Response 对象中 content-type 标题的后面。对于不包含 Response.Charset 属性的 ASP 页，content-type 标题将为 :content-type:text/html。
我们可以在 .asp 文件中指定 content-type 标题，如 :
[font=新宋体] < % Response.Charset="gb2312") %>[/font] 将产生以下结果 :
[font=新宋体] content-type:text/html; charset=gb2312[/font] 注意，无论字符串表示的字符集是否有效，该功能都会将其插入 content-type 标题中。且如果某个页包含多个含有 Response.Charset 的标记，则每个 Response.Charset 都将替代前一个 CharsetName。这样，字符集将被设置为该页中 Response.Charset 的最后一个实例所指定值。
3、ContentType
ContentType 属性指定服务器响应的 HTTP 内容类型。如果未指定 ContentType，默认为 text/HTML。
4、Expires
Expires 属性指定了在浏览器上缓冲存储的页距过期还有多少时间。如果用户在某个页过期之前又回到此页，就会显示缓冲区中的页面。如果设置 response.expires=0，则可使缓存的页面立即过期。这是一个较实用的属性，当客户通过 ASP 的登陆页面进入 WEB 站点后，应该利用该属性使登陆页面立即过期，以确保安全。
5、ExpiresAbsolute
与 Expires 属性不同 ExpiresAbsolute 属性指定缓存于浏览器中的页面的确切到期日期和时间。在未到期之前，若用户返回到该页，该缓存中的页面就显示。如果未指定时间，该主页在当天午夜到期。如果未指定日期，则该主页在脚本运行当天的指定时间到期。如下示例指定页面在 1998 年 12 月 10 日上午 9:00 分 30 秒到期。
[font=新宋体] < % Response.ExpiresAbsolute=#Dec 12,1998 9:00:30# %>[/font] [b]二、方法[/b]
1、Clear
可以用 Clear 方法清除缓冲区中的所有 HTML 输出。但 Clear 方法只清除响应正文而不清除响应标题。可以用该方法处理错误情况。但是如果没有将 Response.Buffer 设置为 TRUE，则该方法将导致运行时错误。
2、End
End 方法使 Web 服务器停止处理脚本并返回当前结果。文件中剩余的内容将不被处理。如果 Response.Buffer 已设置为 TRUE，则调用 Response.End 将缓冲输出。
3、Flush
Flush 方法立即发送缓冲区中的输出。如果没有将 Response.Buffer 设置为 TRUE，则该方法将导致运行时错误。
4、Redirect
Redirect 方法使浏览器立即重定向到程序指定的 URL。这也是一个我们经常用到方法，这样程序员就可以根据客户的不同响应，为不同的客户指定不同的页面或根据不同的情况指定不同的页面。一旦使用了 Redirect 方法任何在页中显式设置的响应正文内容都将被忽略。然而，此方法不向客户端发送该页设置的其他 HTTP 标题，将产生一个将重定向 URL 作为链接包含的自动响应正文。Redirect 方法发送下列显式标题，其中 URL 是传递给该方法的值。如:
[font=新宋体] < % Response.redirect("www.chinabyte.com") %>[/font] 5、Write
Write 方法是我们平时最常用的方法之一，它是将指定的字符串写到当前的 HTTP 输出。
[b]三、集合[/b]
Response 对象只有一个集合 --Cookie
Cookies 集合设置 cookie 的值。若指定的 cookie 不存在，则创建它。若存在，则设置新的值并且将旧值删去。
语法
[font=新宋体] Response.Cookies(cookie)[(key)|.attribute]=value[/font] 这里的 cookie 是指定 cookie 的名称。而如果指定了 key，则该 cookie 就是一个字典。attribute 指定 cookie 自身的有关信息。attribute 参数可以是下列之一 :
Domain 若被指定，则 cookie 将被发送到对该域的请求中去。
Expires 指定 cookie 的过期日期。为了在会话结束后将 cookie 存储在客户端磁盘上，必须设置该日期。若此项属性的设置未超过当前日期，则在任务结束后 cookie 将到期。
HasKeys 指定 cookie 是否包含关键字。
Path 若被指定，则 cookie 将只发送到对该路径的请求中。如果未设置该属性，则使用应用程序的路径。
至此，我们已经学习的 Response 对象的所有属性、方法和集合的理论知识，下面作者将给大家演示一段简单的程序，通过实践让大家加深理解。先将以下程序剪贴到记事簿中，并保存为 asp7.asp。( 注意将 < 和 % 之间的空格去掉 !!!)
[font=新宋体] < %
Dim user
Dim flag
Dim pwd
Dim say
Response.buffer=true \\\' 开启缓冲页面功能
Response.C
Response.Charset="gb2312"
user=Request.Form("username")
pwd=Request.Form("password")
say=Request.QueryString("say")
%>
< form method="POST" action="asp7.asp">
< p>用户名 :< input type="text" name="username" size="12">< br>
口 令 :< input type="password" name="password" size="12">< br>
< input type="submit" value=" 提交 " name="B1">< input type="reset" value=" 取消 " name="B2">< /p>< /form>
< %
If say=1 then
Response.Write " 欢迎书生大驾光临 !"
End If
If say >1 then
Response.Write " 欢迎再次光临书生的 ASP 网站 !"
End If
If user="Adm" and pwd="shusheng" Then
Response.Expires=1 \\\' 设置该页面在浏览器的缓冲中存储 1 分钟后过期。
flag=1
ElseIf user="guest" and pwd="guest" Then
Response.Expires=0 \\\' 使缓存的页面立即过期。
Response.Clear \\\' 清空存储在缓存中的页面
flag=2
ElseIf user="vip" and pwd="vip" Then
Response.Write " 欢迎 VIP 光临书生的 ASP 网站 "
flag=3
Else
flag=0
Response.End \\\' 立即停止脚本处理，并将缓存中的页面输出
End If
Response.write "< p>< a href=\\\'asp7b.asp?flag="&flag&"\\\'>动态网站设计十八般武艺 --ASP 篇 (7) 实践练习 < /a>< /p>"
\\\' 将变量 flag 的值传送给 asp7b.asp
%>
< p>动态网站设计十八般武艺 --ASP 篇 (7) 实践练习 < /p>
再将以下程序保存为 asp7b.asp。
< %
Dim saysay=Request.QueryString("flag")
Select case say
case "1"
Response.Redirect "asp7.asp?say=1"
case "2"
Response.Redirect "asp7.asp?say=2"
case "3"
Response.Redirect "asp7.asp?say=3"
case "0"
Response.Redirect "asp7.asp?say=0"
End Select
%>[/font]
将这两个程序放在有执行权限的 WEB 虚拟目录下，并以 http 方式访问 asp7.asp。在这两个程序中我们充分运用了至今为止所学过的两个 ASP 内建对象 :Request 和 Response。当你第一次访问 asp7.asp 文件时，页面上出现一个 Form 并提示输入用户名和口令，如果你输入用户名 :Adm、口令 :shusheng, 则会出现如下页面 :
[attach]195614[/attach]
如果你输入用户名 :guest、口令 :guest, 则仅出现如下页面 :
[attach]195615[/attach]
这是为什么呢？因为我们设置了页面缓存，当使用 guest 登陆时，判断程序自动清空其之前所有存储在缓存中的页面，而仅将其后脚本程序执行的结果显示出来。
那为什么第一次登陆 asp7.asp 页面时仅仅只显示一个 Form 对话框呢？因为此时程序判断到用户既非 Adm, 也不是 guest 和 vip，所以执行 Response.End, 立即将存储在缓存中的 Form 显示出来，并停止其后的一切脚本处理，包括纯 HTML 代码的显示。
无论你是用 Adm 还是 guest 或 vip 登陆该页面你都可以看到一个超链，该超链指向文件 asp7b.asp，当我们点击该超链时，asp7.asp 将变量 flag 的值作为参数发送给 asp7b.asp, 而后者则根据该参数的值来做出判断，并依据不同情况使用 Response.Redirect 再强行返回 asp7.asp, 并也将一个变量 say 的值作为参数发送给 asp7.asp。如此一来，asp7.asp 又会根据此参数来做出不同的反应。
大家现在都看到了我们仅仅用了两个很简单的程序，就可以做到对同一个页面的多种不同显示结果，这正是 ASP 的魅力所在，各位可以以此示范程序为基础，来进行一些改动，以熟练掌握我们所学的这两个内建对象。
zyd2060 2008-1-14 21:12
第一章 asp基础入门篇 1.9 ASP内建对象Application和Session
在上一篇中作者给大家详细介绍了 ASP 内建对象 Response 的使用方法，在这一篇中作者将继续给大家介绍另两个非常实用且重要的 ASP 的内建对象 Application 和 Session。
在 ASP 的内建对象中除了用于发送、接收和处理数据的对象外，还有一些非常实用的代表 Active Server 应用程序和单个用户信息的对象。
让我们先来看看 Application 对象。在同一虚拟目录及其子目录下的所有 .asp 文件构成了 ASP 应用程序。我们非但可以使用 Application 对象，在给定的应用程序的所有用户之间共享信息，并在服务器运行期间持久的保存数据。而且，Application 对象还有控制访问应用层数据的方法和可用于在应用程序启动和停止时触发过程的事件。
下面就让我们一起来学习 Application 对象。
[b]一、属性[/b]
虽然 Application 对象没有内置的属性，但我们可以使用以下句法设置用户定义的属性也可称为集合。
Application(" 属性 / 集合名称 ")= 值
我们可以使用如下脚本声明并建立 Application 对象的属性。
[font=新宋体]< %
Application("MyVar") = "Hello"
Set Application("MyObj") = Server.CreateObject("MyComponent")
%>[/font] 一旦我们分配了 Application 对象的属性，它就会持久地存在，直到关闭 WEB 服务器服务使得 Application 停止。由于存储在 Application 对象中的数值可以被应用程序的所有用户读取，所以 Application 对象的属性特别适合在应用程序的用户之间传递信息。
[b]二、方法[/b]
Application 对象有两个方法，它们都是用于处理多个用户对存储在 Application 中的数据进行写入的问题
1、Lock 方法禁止其他客户修改 Application 对象的属性。
Lock 方法阻止其他客户修改存储在 Application 对象中的变量，以确保在同一时刻仅有一个客户可修改和存取 Application 变量。如果用户没有明确调用 Unlock 方法，则服务器将在 .asp 文件结束或超时后即解除对 Application 对象的锁定。
让我们来看看下面这段用 Application 来记录页面访问次数的程序 :
[font=新宋体]< %
Dim NumVisitsNumVisits=0
Application.LockApplication("NumVisits") = Application("NumVisits") + 1
Application.Unlock
%>[/font] 欢迎光临本网页，你是本页的第 < %= Application("NumVisits") %>位访客 !
将以上脚本保存在你的 .asp 文件中，就轻而易举地给你的页面添加了一个计数器。
2、和 Lock 方法相反，Unlock 方法允许其他客户修改 Application 对象的属性。
在上面的例子中，上述例子中，Unlock 方法解除对象的锁定，使得下一个客户端能够增加 NumVisits 的值。
[b]三、事件[/b]
1、Application_OnStart
Application_OnStart 事件在首次创建新的会话 ( 即 Session_OnStart 事件 ) 之前发生。当 WEB 服务器启动并允许对应用程序所包含的文件进行请求时就触发 Application_OnStart 事件。Application_OnStart 事件的处理过程必须写在 Global.asa 文件之中。
Application_OnStart 事件的语法如下 :
[font=新宋体]< SCRIPT LANGUAGE=ScriptLanguage RUNAT=Server>
Sub Application_OnStart. . .
End Sub
< /SCRIPT>[/font] 2、Application_OnEnd
Application_OnEnd 事件在应用程序退出时于 Session_OnEnd 事件之后发生，Application_OnEnd 事件的处理过程也必须写在 Global.asa 文件之中。
下面让我们来看看在使用 Application 对象时必须注意的一些事项。
不能在 Application 对象中存储 ASP 内建对象。例如，下面的每一行都返回一个错误。
[font=新宋体]< %
Set Application("var1")=Session
Set Application("var2")=Request
Set Application("var3")=Response
Set Application("var4")=Server
Set Application("var5")=Application
Set Application("var6")=ObjectContext
%>
[/font]若您将一个数组存储在 Application 对象中，请不要直接更改存储在数组中的元素。例如，下列的脚本无法运行。
< % Application("StoredArray")(3) = "new value" %>
这是因为 Application 对象是作为集合被实现的。数组元素 StoredArray(3) 未获得新的赋值。而此值将包含在 Application 对象集合中，并将覆盖此位置以前存储的任何信息。建议您在将数组存储在 Application 对象中时，在检索或改变数组中的对象前获取数组的一个副本。在对数组操作时，您应再将数组全部存储在 Application 对象中，这样您所做的任何改动将被存储下来。下列的脚本对此进行演示。
---asp8a.asp---
[font=新宋体]< %
dim MyArray()
Redim MyArray(5)
MyArray(0)="hello"
MyArray(1)="some other string"
Application.Lock
Application("StoredArray")=MyArray
Application.Unlock
Response.Redirect "asp8b.asp"
%>
[/font]---asp8b.asp---
[font=新宋体]< %
LocalArray=Application("StoredArray")
LocalArray(1)=" there"
Response.Write LocalArray(0)&LocalArray(1)
Application.Lock
Application("StoredArray")=LocalArray
Application.Unlock
%>
[/font] 与 Application 对象具有相近作用的另一个非常实用的 ASP 内建对象就是 Session。我们可以使用 Session 对象存储特定的用户会话所需的信息。当用户在应用程序的页之间跳转时，存储在 Session 对象中的变量不会清除，而用户在应用程序中访问页面时，这些变量始终存在。当用户请求来自应用程序的 Web 页时，如果该用户还没有会话，则 Web 服务器将自动创建一个 Session 对象。当会话过期或被放弃后，服务器将终止该会话。
通过向客户程序发送唯一的 Cookie 可以管理服务器上的 Session 对象。当用户第一次请求 ASP 应用程序中的某个页面时，ASP 要检查 HTTP 头信息，查看是否有在报文中有名为 ASPSESSIONID 的 Cookie 发送过来，如果有，则服务器会启动新的会话，并为该会话生成一个全局唯一的值，在把这个值作为新 ASPSESSIONID Cookie 的值发送给客户端，正是使用这种 Cookie，可以访问存储在服务器上的属于客户程序的信息。Session 对象最常见的作用就是存储用户的首选项。例如，如果用户指明不喜欢查看图形，就可以将该信息存储在 Session 对象中。另外其还经常被用在鉴别客户身份的程序中。要注意的是，会话状态仅在支持 cookie 的浏览器中保留，如果客户关闭了 Cookie 选项，Session 也就不能发挥作用了。
[b]一、属性[/b]
1、SessionID
SessionID 属性返回用户的会话标识。在创建会话时，服务器会为每一个会话生成一个单独的标识。会话标识以长整形数据类型返回。在很多情况下 SessionID 可以用于 WEB 页面注册统计。
2、TimeOut
Timeout 属性以分钟为单位为该应用程序的 Session 对象指定超时时限。如果用户在该超时时限之内不刷新或请求网页，则该会话将终止。
[b]二、方法[/b]
Session 对象仅有一个方法，就是 Abandon，Abandon 方法删除所有存储在 Session 对象中的对象并释放这些对象的源。如果您未明确地调用 Abandon 方法，一旦会话超时，服务器将删除这些对象。当服务器处理完当前页时，下面示例将释放会话状态。
[font=新宋体]< % Session.Abandon %>[/font] [b]三、事件[/b]
Session 对象有两个事件可用于在 Session 对象启动和释放是运行过程。
1、Session_OnStart 事件在服务器创建新会话时发生。服务器在执行请求的页之前先处理该脚本。Session_OnStart 事件是设置会话期变量的最佳时机，因为在访问任何页之前都会先设置它们。
尽管在 Session_OnStart 事件包含 Redirect 或 End 方法调用的情况下 Session 对象仍会保持，然而服务器将停止处理 Global.asa 文件并触发 Session_OnStart 事件的文件中的脚本。
为了确保用户在打开某个特定的 Web 页时始终启动一个会话，就可以在 Session_OnStart 事件中调用 Redirect 方法。当用户进入应用程序时，服务器将为用户创建一个会话并处理 Session_OnStart 事件脚本。您可以将脚本包含在该事件中以便检查用户打开的页是不是启动页，如果不是，就指示用户调用 Response.Redirect 方法启动网页。程序如下 :
[font=新宋体]< SCRIPT RUNAT=Server Language=VBScript>
Sub Session_OnStart
startPage = "/MyApp/StartHere.asp"
currentPage = Request.ServerVariables("SCRIPT_NAME")
if strcomp(currentPage,startPage,1) then
Response.Redirect(startPage)
end if
End Sub
< /SCRIPT>[/font] 上述程序只能在支持 cookie 的浏览器中运行。因为不支持 cookie 的浏览器不能返回 SessionID cookie，所以，每当用户请求 Web 页时，服务器都会创建一个新会话。这样，对于每个请求服务器都将处理 Session_OnStart 脚本并将用户重定向到启动页中。
2、Session_OnEnd 事件在会话被放弃或超时发生。
关于使用 Session 对象需要注意的事项 Application 对象相近，请参照前文。
会话可以通过以下三种方式启动 :
1、一个新用户请求访问一个 URL，该 URL 标识了某个应用程序中的 .asp 文件，并且该应用程序的 Global.asa 文件包含 Session_OnStart 过程。
2、用户在 Session 对象中存储了一个值。
3、用户请求了一个应用程序的 .asp 文件，并且该应用程序的Global.asa 文件使用 < OBJECT>标签创建带有会话作用域的对象的实例。
如果用户在指定时间内没有请求或刷新应用程序中的任何页，会话将自动结束。这段时间的默认值是 20 分钟。可以通过在 Internet 服务管理器中设置“应用程序选项”属性页中的“会话超时”属性改变应用程序的默认超时限制设置。应依据您的 Web 应用程序的要求和服务器的内存空间来设置此值。例如，如果您希望浏览您的 Web 应用程序的用户在每一页仅停留几分钟，就应该缩短会话的默认超时值。过长的会话超时值将导致打开的会话过多而耗尽您的服务器的内存资源。对于一个特定的会话，如果您想设置一个小于默认超时值的超时值，可以设置 Session 对象的 Timeout 属性。例如，下面这段脚本将超时值设置为 5 分钟。
[font=新宋体]< % Session.Timeout = 5 %>[/font] 当然你也可以设置一个大于默认设置的超时值，Session.Timeout 属性决定超时值。你还可以通过 Session 对象的 Abandon 方法显式结束一个会话。例如，在表格中提供一个“退出”按钮，将按钮的 ACTION 参数设置为包含下列命令的 .asp 文件的 URL。
[font=新宋体]< % Session.Abandon %>[/font] 今天，我们学习了两个在 WEB 页面特别是基于 WEB 的 BBS 或 Chat 上经常使用 ASP 内建对象，由于这两个对象在实际运用中很实用，因此在下一篇中作者将运用至此我们所学过的 4 个 ASP 内建对象，给大家演示一个完整的 ASP 应用程序，相信通过这个练习，能大大加深你对 ASP 应用程序的理解和掌握。敬请关注“动态网站设计十八般武艺 --ASP 篇 (9)”。
zyd2060 2008-1-14 21:15
第一章 asp基础入门篇 1.10 Global.asa文件的使用及Chat程序
在上一篇中作者给大家详细介绍了两个非常实用的 ASP 内建对象 Application 和 Session 的使用方法。由于这两者的 OnStart、OnEnd 事件的脚本都必须在 Global.asa 文件中声明 , 因此，本篇将给大家详细介绍 Global.asa 文件的使用方法。为使大家熟练掌握至今所学过的知识，本篇还将举出一个 ASP 的 Chat 程序，供各位参考。
最近很多朋友来信问我，为什么前两期的范例程序运行时有这样那样的错。首先，我要向大家声明，这些程序都是我自己写的，在出“厂”前都经过合格检验，绝无“假冒伪劣产品”。:) 由于程序中使用了 cookie 记录客户信息，所以如果你在浏览器中没有设置接受 cookie 则程序将不能正常运行。另外，程序将客户信息记录在客户端的 cookie 所使用的方法是 Response.Cookie，此语句必须写在 ASP 文件中的第一个 < HTML>标记前，这是因为 Cookie 是作为 HTTP 传输的头信息的一部分发送给客户的，如果当 HTTP 报头信息已经传输给客户后再使用 Response.Cookie，将出现以下错误 :“HTTP 标题已经写入到客户浏览器。任何 HTTP 标题的修改必须在写入页内容之前。”，可能一些朋友在剪贴程序的时候没有注意，打乱了程序的前后次序 , 或者是错误的将 HTML 代码添加在 ASP 范例程序之前，因而导致程序运行出错。因此，我建议大家一方面在首次运行例程的时候不要对程序进行任何改动，尽量在看懂程序的基础上逐步改进，另一方面在运行 ASP 程序时至少要在浏览器中选择可接受 Cookie，否则一旦 ASP 程序中使用了 Cookie 或 Session，它们都将无法正常运行。
下面我来向大家介绍 Global.asa 文件的使用方法。
什么是 Global.asa 文件？它其实是一个可选文件，程序编写者可以在该文件中指定事件脚本，并声明具有会话和应用程序作用域的对象。该文件的内容不是用来给用户显示的，而是用来存储事件信息和由应用程序全局使用的对象。该文件的名称必须是 Global.asa 且必须存放在应用程序的根目录中。每个应用程序只能有一个 Global.asa 文件。
在 Global.asa 文件中，如果包含的脚本没有用 < SCRIPT>标记封装，或定义的对象没有会话或应用程序作用域，则服务器将返回错误。我们可以用任何支持脚本的语言编写 Global.asa 文件中包含的脚本。如果多个事件使用同一种脚本语言，就可以将它们组织在一组 < SCRIPT>标记中。
在 Global.asa 文件中声明的过程只能从一个或多个与 Application_OnStart、Application_OnEnd、Session_OnStart 和 Session_OnEnd 事件相关的脚本中调用。在基于 ASP 的应用程序的 ASP 页中，它们是不可用的。如果要在应用程序之间共享过程，可在单独的文件中声明这些过程，然后使用服务器端包容 (SSI) 语句将该文件包含在调用该过程的 ASP 程序中。通常，包含文件的扩展名应为 .inc。
下面是一个很标准的 Global.asa 文件 :
[font=新宋体]< SCRIPT LANGUAGE="VBScript" RUNAT="Server">
\'Session_OnStart 当客户首次运行 ASP 应用程序中的任何一个页面时运行
\'Session_OnEnd 当一个客户的会话超时或退出应用程序时运行
\'Application_OnStart 当任何客户首次访问该应用程序的首页时运行
\'Application_OnEnd 当该站点的 WEB 服务器关闭时运行
< /SCRIPT>
< SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
VisitorCountFilename = Server.MapPath ("/ex2") + "\\VisitCount.txt"
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set Out= FileObject.OpenTextFile (VisitorCountFilename, 1, FALSE, FALSE)
Application("visitors") = Out.ReadLine
Application("VisitorCountFilename") = VisitorCountFilename
End Sub
\'=========================================================
SUB Application_OnEnd
Set FileOutObject = Server.CreateObject("Scripting.FileSystemObject")
Set Out= FileOutObject.CreateTextFile (Application("VisitorCountFilename"), TRUE,FALSE)
Out.WriteLine(application("visitors"))
End Sub
\'=========================================================Sub Session_OnStart
Session.Timeout = 5
Application("visitors") = Application("visitors") + 1
Session("ID")=Session.SessionID
End Sub
< /SCRIPT>
[/font] 在这个 Global.asa 程序中，涉及到了 ASP 的 File Access 组件，它可以提供用于访问文件系统的方法、属性和集合。这将在以后 ASP 的组件中进行展开讨论。在这里，它起到了在服务器上创建新文件并对文件进行写操作的作用。这其实是一个 ASP 页面访问记数器应用程序的 Global 文件，首先当客户首次访问该应用程序的首页时 , 过程 Application_OnStart 定义了在服务器上指定的虚拟目录下新建一个 VisitCount.txt 的文本文件，并将文件的路径和内容保存在应用程序级的变量中。而当任何一个客户访问 ASP 应用程序中的任何一个页面时，过程 Session_OnStart 定义将应用程序级的变量 visitors 的值自动加一。这样，每当有客户访问页面时，变量 visitors 都将自动加一，以起到统计点击率的作用。由于变量 visitors 的值是存储在系统内存之中，所以如果服务器关闭或重新启动，存储在变量中的数据将自动丢失，所以通过定义过程 Application_OnEnd，在服务器关闭或重启之前将数据写入事先建立的文本文件之中，这样就能确保当服务器再次启动时， Application_OnStart 过程可以从 VisitCount.txt 文件中读取以前的统计数。
经过这段时间的学习，相信大家已经能够比较熟练的运用我们所学过的这些 ASP 内建对象来编写一些较简单的 ASP 应用程序，可别小看你现在所掌握的这些 ASP 基本知识哦 ! 其实你已经能够开发一些简单但实用的 ASP 应用程序了。下面我就举一个非常简单的 ASP WEB 聊天室程序，你会发觉写聊天室原来是一件这么容易、轻松的事。可能朋友们已经在一些杂志上看到过 ASP 聊天程序的编写方法，但作者在这里自己写了一个更简单的程序，仅仅使用了一个 .asp 文件。请将以下代码剪贴到记事簿并保存为 chat.asp。
[font=新宋体]< %@ Language=VBScript %>
< %
Response.Buffer=true \' 设置输出缓存，用于显示不同页面。
On error resume next \' 忽略程序出错部分
If Request.ServerVariables("Request_Method")="GET" then
\' 判断客户是以什么方式请求 WEB 页面
\'------------------------
\' 客户登陆界面
\'------------------------
%>
< form method="POST" action="chat.asp">< p>
< input type="text" name="nick" size="20" value="nick" style="background-color: rgb(192,192,192)">< br>
< input type="submit" value=" 进入聊天室 " name="B1" style="color: rgb(255,255,0); font-size: 9pt; background-color: rgb(0,128,128)">
< p>< input type="hidden" name="log" size="20" value="1">< br>< /p>
< /form>
< %
Response.End \' 结束程序的处理
Else
Response.clear \' 清空缓存中的内容
dim talk
If Request.Form("nick")<>"" then
\' 判断客户是是否在聊天界面中
Session("nick")=Request.Form("nick")
End If
\'------------------------\'
客户聊天界面
\'------------------------
%>
< form method="POST" action="chat.asp" name=form1>< p>< %=Session("nick")%>说话：< input type="text" name="talk" size="50">< br>
< input type="submit" value=" 提交 " name="B1">
< input type="reset" value=" 取消 " name="B2">< /p>
< /form>
< A HREF="/asptest/shusheng/chat.asp">离开 < /a>< br>< br>
< %
If Request.Form("log")<>1 then
If trim(Request.Form("talk"))="" then
\' 判断用户是否没有输入任何内容
talk=Session("nick")&" 沉默是金。"
Else
talk=trim(Request.Form("talk"))
\' 去掉字符后的空格
End If
Application.lock
Application("show")="< table border=\'0\' cellpadding=\'0\' cellspacing=\'0\' width=\'85%\' >< tr>< td width=\'100%\' bgcolor=\'#C0C0C0\'>< /td>< /tr>< tr>< td width=\'100%\'>< font color=\'#0000FF\'>来自 "&Request.ServerVariables("remote_addr")&" 的 "&Session("nick")&time&" 说：< /font>"&talk&"< /td>< /tr>< tr>< td width=\'100%\' bgcolor=\'#C0C0C0\'>< /td>< /tr>< /table>< br>"&Application("show")
Application.UnLock
Response.Write Application("show")
End If
End If
%>
[/font]第一次运行 chat.asp 程序，你首先将看到如下页面 :
[attach]195616[/attach]
选择你的 nick 进入聊天室后，将看到如下页面 :
[attach]195617[/attach]
输入你想要说的话，对话将出现在输入框的下方，如下图 :
[attach]195618[/attach]
下面我们来对这个聊天室程序进行逐步的分析。
首先，由于聊天室的所有客户都要能够共享信息，所以不可避免的要用到具有应用程序级变量的对象 Application，这是建立 Chat 程序的关键所在，所有的谈话数据都存放在一个应用程序级变量中，以便让所有的客户读取。我们可以用所学过的 request 对象获取客户所输入的谈话，并保存在变量 talk 中 , 然后将 talk 的值存入应用程序级变量 show 中，如下 :
< % Application("show")=talk&Application("show") %>
接下来要考虑的是当不同的客户同时向 Chat 应用程序进行操作的时候如何处理。这个问题其实与在数据库中的两个用户同时写入同一个记录一样，如果两个用户同时对同一个应用程序级变量进行写操作，则一个用户所作的修改会被另一个用户的操作所覆盖，所以，如果对 Application 对象数据的并发访问不采取一定措施，则会导致当两个用户试图同时对 Asp 聊天室应用程序提交时，一个用户的提交内容会被另一个用户的提交内容所覆盖，在被参加到会话中的任何人看到之前就消失了。为了避免这类问题的出现，我们需要使用 Application 对象的 Lock 属性来约束只允许当前的用户编辑或增加 Application 对象的属性，这样当用户开始修改应用程序级变量开始，到 Application 对象被显式地 Unlocked 为止，Application 对象的属性只能被该用户编辑，如果此时有其他用户请求编辑 Application 对象，则这些用户要排队等待，知道应用程序被 Unlock 为止。如下所示 :
[font=新宋体]Application.lock
Application("show")=talk&Application("show")
Application.UnLock
[/font]现在整个程序的核心部分你已经了解了，下面考虑如何保存客户信息，这里我们要用到一个会话级变量，即将客户的 nick 保存在 Session 中。如:
[font=新宋体]Session("nick")=Request.Form("nick")[/font]
最后，我们要考虑的是如何仅在一个 .asp 文件中处理各种事件 , 如 : 客户登陆界面、客户聊天界面。由于客户第一次请求 .asp 文件时，采用的是简单的 HTTP GET 方式，但是当客户向页面上的表单字段中增加的数据并向自身提交表单后，.asp 文件会再次被请求，不过这次数据是经过 HTTP POST 方式进行传递的。文件被请求的方式可以用两种方法来确定。一是测试 Request.Form 集合是否包含成员，若没有，则表明没有发送给表单处理的数据。二是使用 Request.ServerVariables("Request_Method") 变量。如果表单是通过 HTTP GET 方式被请求的，则这个变量会返回“GET”，如果表单被提交处理则返回“POST”。由于后一种方法对于确定文件的请求方式更直接，所以我们使用如下代码进行判断 :
[font=新宋体]if Request.ServerVariables("Request_Method")="GET" then[/font]
由于我们设置了 ASP 缓存，所以当程序判断页面请求方式为 GET 时，程序运行 Response.End，来结束后面的所有操作，否则则运行 Response.clear, 清空缓存中已有的内容，并继续程序的运行。这样我们就得以用同一个 .asp 文件根据不同情况给客户显示不同的界面。
好了，我已经将这个 ASP Chat 程序的核心部分告诉大家了，剩下的一些细节性问题请各位自己读程序吧，其实这个程序还存在很多不足之处，最大的毛病是我没有写自动刷新的功能，因此如果你在 Chat 中不说话，那也就看不到其他客户所说的话了。Chat 在 Internet 中的魅力大家是知道的，其实 , 用 ASP 也完全能做到同 irc 类似的强大功能，当然这就需要写更多的代码，如果大家有兴趣请写信给我，我将在今后的文章中逐步提升这个 chat 程序的等级，让大家也过过“Oper”的隐。注：有了这个 chat 程序，你就可以用来在自己的 PWS 上建一个 chat 应用程序，只要将你的 IP 地址告诉朋友，如 [url]http://202.96.210.33/asp/chat.asp[/url]，你们就可以通过你的电脑在网上聊天了，很爽的，不信你试试 !
zyd2060 2008-1-14 21:16
第一章 asp基础入门篇 1.11 ASP内建对象Server
通过前九篇的理论和实践，相信大家已经对 ASP 有了系统的了解，虽然至今为止，我们只学了 ASP 的 4 个内建对象，但已经完全能够写出一些实用的小程序了。今天，作者将继续给大家讲解最后一个 ASP 内建对象——Server。
在开始本次课程之前，我仍要在这里回答一些朋友们提出的比较普遍的问题。最近仍有不少朋友来信问我，如何构建服务器端的 Active Server Page 环境。我想可能是我在前几篇中没有讲清楚，因此，在本篇的开头有必要把这个问题详细阐述一遍。
ASP 的应用完全是基于 Microsoft Internet Infomation Server（简称 IIS）之上的，IIS 有分别用于 Windows NT Server 和 WorkStation 的两个版本中（当然 IIS4.0 也有 Windows98 版，这里暂且不提），其功能几乎完全相同，所不同的只是安装过程。一般来说，我们使用的都是基于 NT 服务器上的 IIS 版本。在 NT Server 的环境中，发布信息、管理站点的工作一般都是通过 IIS 来完成的。通常我们在 NT4.0 版本中运行的是 IIS2.0 版，但它不具有支持 ASP 的功能。ASP 必须在安装完 IIS 后单独安装，安装文件是一个微软发布的 ASP 安装包，大约有 9 兆多，应该可以在微软的网站上下载。当 IIS2.0 中增添了支持 ASP 的功能后，其也就自动升级为 3.0 版本。2.0 和 3.0 对于 WEB 服务器来说，并没有什么大的改动，只是单纯地增加了运行 ASP 的能力。当安装完成后，运行 Internet 服务管理器，你将看到如下画面:
[attach]195619[/attach]
可以到在 IIS3.0 中提供了三种服务：WWW、Gopher、FTP，WWW 服务为客户浏览器提交 WEB 页，并允许客户访问 .asp 文件。当然，你可以直接安装最新的 IIS4.0 版本，作者也建议各位安装此版本，因为它具有更强更高的 WEB 管理机能和安全性。在 IIS4.0 中 IIS 的管理界面发生了根本性的改变，熟悉的 Internet 服务管理器，被取而代之为 Microsoft 管理控制台，简称 MMC。其界面如下图:
[attach]195620[/attach]
那么如何安装 IIS4.0 呢？在 NT4.0 上安装 IIS4.0 时，你的系统中必须已经安装了 NT SP3，以及 Internet Explorer4.01，注意这里的 Internet Explorer 的版本必须是 4.01，版本号为 4.72.3110.8。这点很重要，否则你将不能安装 IIS4.0。作者为了安装该版本特意花费了一个晚上在微软的站点上升级 IE 版本。
IIS 支持虚拟目录，通过在“服务器属性”对话框中的“目录”标签可以管理虚拟目录。建立虚拟目录对于管理 WEB 站点具有非常重要的意义。首先，虚拟目录隐藏了有关站点目录结构的重要信息。因为在浏览器中，客户通过选择“查看源代码”，很容易就能获取页面的文件路径信息，如果在 WEB 页中使用物理路径，将暴露有关站点目录的重要信息，这容易导致系统受到攻击。其次，只要两台机器具有相同的虚拟目录，你就可以在不对页面代码做任何改动的情况下，将 WEB 页面从一台机器上移到另一台机器。还有就是，当你将 WEB 页面放置于虚拟目录下后，你可以对目录设置不同的属性，如：Read、Excute、Script。读访问表示将目录内容从 IIS 传递到浏览器。而执行访问则可以使在该目录内执行可执行的文件。当你需要使用 ASP 时，就必须将你存放 .asp 文件的目录设置为“Excute（执行）”。作者建议大家在设置 WEB 站点时，将 HTML 文件同 ASP 文件分开放置在不同的目录下，然后将 HTML 子目录设置为“读”，将 ASP 子目录设置为“执行”，这不仅方便了对 WEB 的管理，而且最重要的提高了 ASP 程序的安全性，防止了程序内容被客户所访问。因为在今年 7 月底的时候 IIS 被一些网络高手发现了一个可怕的 bug，那就是，当你在一个站点的 .asp 文件后加上 ::$DATA 后，客户将能在浏览器中看到该 .asp 文件的所有源代码，这对于一个站点来说是非常可怕的。当然微软已经针对这个 bug，编写了补丁，但是为了彻底杜绝这种可能性的发生，作者还一建议大家不要将 .asp 所在的目录设置为可读。
我想，现在各位应该已经完全了解 ASP 的服务器端设置了，下面我们就进入正题 -- 学习 ASP 的最后一个内建对象 Server。
Server 对象提供对服务器上的方法和属性的访问 , 其中大多数方法和属性是作为实用程序的功能服务的。有了 Server 对象，你就可以在服务器上启动 ActiveX 对象例程，并使用 Active Server 服务提供象 HTML 和 URL 编码这样的函数。
一、语法
Server.property|method
二、属性
ScriptTimeout 超时值，在脚本运行超过这一时间之后即作超时处理。如下代码指定服务器处理脚本在 100 秒后超时。
< % Server.ScriptTimeout=100 %>
这里需要注意的是，通过使用元数据库中的 AspScriptTimeout 属性可以为 Web 服务或 Web 服务器设置缺省的 ScriptTimeout 值。ScriptTimeout 属性不能设置为小于在元数据库中指定的值。例如，如果 NumSeconds 设置为 60，而元数据库设置包含了默认值 90 秒，则脚本在 90 秒后超时。
三、方法
1、HTMLEncode 方法
HTMLEncode 方法允许你对特定的字符串进行 HTML 编码，虽然 HTML 可以显示大部分你写入 ASP 文件中的文本，但是当你需要实际包含 HTML 标记中所使用的字符，就会遇到问题。这是因为，当浏览器读到这样的字符串时，会试图进行解释。例如下面的这段文本 :
这是对 HTMLEncode 方法的测试。< br>这里应该不会另起一行。
会被浏览器显示为 :
这是对 HTMLEncode 方法的测试。
这里应该不会另起一行。
为了避免此类问题，我们就需要使用 Server 对象的 HTMLEncode 方法，采用对应的不由浏览器解释的 HTML Character Code 替代 HTML 标记字符。所以，用下面的代码才能显示正确的 HTMLEncode 字符串，从而在浏览器中按你的需要输出文本。
[font=新宋体]< %
Response.write Server.HTMLEncode(" 这是对 HTMLEncode 方法的测试。< br>这里应该不会另起一行。")
%>[/font]
2、URLEncode 方法
就象 HTMLEncode 方法使客户可以将字符串翻译成可接受的 HTML 格式一样，Server 对象的 URLEncode 方法可以根据 URL 规则对字符串进行正确编码，当字符串数据以 URL 的形式传递到服务器时，在字符串中不允许出现空格，也不允许出现特殊字符。为此，如果你希望在发送字符串之前进行 URL 编码，可以使用 Server.URLEncode 方法。
3、MapPath 方法
MapPath 方法将指定的相对或虚拟路径映射到服务器上相应的物理目录上。
语法如下 :Server.MapPath(Path)
Path 指定要映射物理目录的相对或虚拟路径。若 Path 以一个正斜杠 (/) 或反斜杠 (\\) 开始，则 MapPath 方法返回路径时将 Path 视为完整的虚拟路径。若 Path 不是以斜杠开始，则 MapPath 方法返回同 .asp 文件中已有的路径相对的路径。这里需要注意的是 MapPath 方法不检查返回的路径是否正确或在服务器上是否存在。
对于下列示例，文件 data.txt 和包含下列脚本的 test.asp 文件都位于目录 C:\\Inetpub\\Wwwroot\\asp 下。C:\\Inetpub\\Wwwroot 目录被设置为服务器的宿主目录。下列示例使用服务器变量 PATH_INFO 映射当前文件的物理路径。以下脚本
[font=新宋体]< %= server.mappath(Request.ServerVariables("PATH_INFO"))
%>[/font]
输出
c:\\inetpub\\wwwroot\\asp\\test.asp
由于下列示例中的路径参数不是以斜杠字符开始的，所以它们被相对映射到当前目录，此处是目录 C:\\Inetpub\\Wwwroot\\asp。以下脚本
[font=新宋体]< %= server.mappath("data.txt")%>
< %= server.mappath("asp/data.txt")%>
输出
c:\\inetpub\\wwwroot\\asp\\data.txt
c:\\inetpub\\wwwroot\\asp\\asp\\data.txt[/font]
4、CreateObject 方法
Server.CreateObject 恐怕是 ASP 中最为实用，也是最强劲的功能了。它用于创建已经注册到服务器上的 ActiveX 组件实例。这是一个非常重要的特性，因为通过使用 ActiveX 组件能够使你轻松地扩展 ActiveX 的能力，正是使用了 ActiveX 组件，你可以实现至关重要的功能，譬如数据库连接、文件访问、广告显示和其他 VBScript 不能提供或不能简单地依靠单独使用 ActiveX 所能完成的功能。正是因为这些组件才使得 ASP 具有了强大的生命力。
其语法如下：
[font=新宋体]Server.CreateObject("Component Name")[/font]
默认情况下，由 Server.CreateObject 方法创建的对象具有页作用域。这就是说，再当前 ASP 页处理完成之后，服务器将自动破坏这些对象。如果要创建有会话或应用程序作用域的对象，可以使用 < OBJECT>标记并设置 SESSION 或 APPLICATION 的 SCOPE 属性，也可以在对话及应用程序变量中存储该对象。如下例程 :
[font=新宋体]< % Set Session("ad") = Server.CreateObject("MSWC.AdRotator")%>[/font]
这里需要注意的是，不能创建与内建对象同名的对象实例，否则，如下列脚本将返回错误。
[font=新宋体]< % Set Response = Server.CreateObject("Response") %>[/font]
至今为止，我们已经学习完了 ASP 所有的内建对象，不知大家是不是很兴奋？其实 ASP 是很简单的，只要大家不断的实践，相信一段时间后都不难成为 ASP 的高手。从下一篇起作者将开始介绍 ASP 内建 ActiveX 组件，这也是 ASP 运用中非常重要和实用的一部分。敬请关注。
zyd2060 2008-1-14 21:18
第一章 asp基础入门篇 1.12 数据库查询语言(1)
原定计划从本篇开始就要给大家介绍 ASP 内建的 ActiveX 组件，但是考虑到我们在往后的学习中将会接触到大量的数据库查询，因此作者临时决定花一到两篇的篇幅向大家简要介绍一些数据库查询语言的基本知识，这其实也是学习 ASP 所必须掌握的一门知识。是否能够灵活地运用数据库查询语言，将直接关系到 ASP 程序的执行效率等一系列问题，所以请各位务必重视。
相信很多朋友都听说过 SQL 这个名字，如果你是计算机方面的行家，SQL 的大名一定是如雷贯耳。那么 SQL 究竟是什么呢？SQL 一词实际上是 "Structured Query Language" 结构式查询语言的缩写，是用于对存放在计算机数据库中的数据进行组织、管理和检索的一种工具；是一种特定类型的数据库 -- 关系数据库。而控制这种数据库的计算机程序就是我们常说的 DBMS-- 数据库管理系统。譬如：SQL Server、Oracle、Sybase、DB2 等等。当用户想要检索数据库中的数据时，就通过 SQL 语言发出请求，接着 DBMS 对该 SQL 请求进行处理并检索所要求的数据，最后将其返回给用户，此过程被称作为数据库查询，这也就是数据库查询语言这一名称的由来。
SQL 并不是象 C、COBOL 和 Fortran 语言那样的完整的计算机语言。SQL 没有用于条件测试的 IF 语句，也没有用于程序分支的 Goto 语句以及循环语句 For 或 Do。确切的讲，SQL 是一种数据库子语言，SQL 语句可以被嵌入到另一种语言中，从而使其具有数据库存取功能。SQL 也非严格的结构式语言，它的句法更接近英语语句，因此易于理解，大多数 SQL 语句都是直述其意，读起来就象自然语言一样明了。SQL 还是一种交互式查询语言，允许用户直接查询存储数据，利用这一交互特性，用户可以在很短的时间内回答相当复杂的问题，而同样问题若让程序员编写相应的报表程序则可能要用几个星期甚至更长时间。
在大部分 ASP 应用程序中我们都会接触到数据库，而我们在编写 ASP 应用程序时用来进行数据库操作的标准语法正是 SQL，因此 SQL 语法的重要性是不言而喻的。下面，我们就从最常用的 SQL 语句 SELECT 着手，一步一步地来学习 SQL。
查询是 SQL 语言的核心，而用于表达 SQL 查询的 SELECT 语句则是功能最强也是最为复杂的 SQL 语句，它从数据库中检索数据，并将查询结果提供给用户。在本文中我们将建立一个名为 tianjiao 的简单数据库，该库中存放了一个叫 sales 的销售记录表，如下所示 :
姓名性别工资销售目标销售额地区书生男250080009000上海吴冠军男3000100009999北京雷鸣男2000800010000四川雪儿女250050006000广州顾一男260090009800大连阿卓女200040004000天津熠天男40002000020000全国
在该表中有六列即六个字段 : 姓名、性别、工资、销售目标、销售额、地区，首先我们用 Select 语句列出姓名、销售目标和销售额 :
Select 姓名，销售目标，销售额 From sales
结果如下 : 姓名销售目标销售额书生80009000吴冠军100009999雷鸣800010000雪儿50006000顾一90009800阿卓40004000熠天2000020000
然后，我们再列出所有男性的姓名、销售目标和销售额 :
Select 姓名，销售目标，销售额 From sales Where 性别 =" 男 "
结果如下 :姓名销售目标销售额书生80009000吴冠军100009999雷鸣800010000顾一90009800熠天2000020000
接下来，我们做一个相对复杂的查询，列出销售额大于销售目标的所有男性的姓名、销售目标和销售额，并且按销售目标排序。
[font=新宋体]Select 姓名，销售目标，销售额
Form sales
Where 销售额 >销售目标
And 性别 =" 男 "
Order By 销售目标[/font] 结果如下 : 姓名销售目标销售额书生80009000雷鸣800010000顾一90009800熠天2000020000
大家可以看到，对于简单查询，SQL Select 语句和英文语法很相象，我们来分析一下 SELECT 语句的完整格式，它包括六个子句，其中 SELECT 和 FROM 子句是必须的，其它子句可以任选，每个子句的功能如下 :
1、Select 子句列出所有要求 SELECT 语句检索的数据项。它放在 SELECT 语句开始处，指定此查询要检索的数据项。这些数据项通常用选择表表示，即一组用“，”隔开的选择项。按照从左到右的顺序，每个选择项产生的一个列的查询结果，一个选择项可能是以下项目：
(1)、列名：标识 FROM 子句指定表中的列。如果列名作为选择项，则 SQL 直接从数据库表中每行取出该列的值，再将其放在查询结果的相应行中。
(2)、常数：指定在查询结果的每行中都放上该值。
(3)、SQL 表达式：说明必须将要放入查询结果中的值按表达式的规定进行计算。
2、From 子句列出包含所要查询数据的表，它由关键字 FROM 后跟一组用逗号分开的表名组成。每个表明都代表一个包括该查询要检索数据的表。这些表称为此 SQL 语句的表源，因为查询结果都源于它们。
3、Where 子句告诉 SQL 只查询某些行中的数据，这些行用搜索条件描述。
4、Group By 子句指定汇总查询，即不是对每行产生一个查询结果，而是将相似的行进行分组，再对每组产生一个汇总结果。
5、Having 子句告诉 SQL 只产生有 Group By 得到的某些组的结果，和 Where 子句一样，所需要的组也用一个搜索条件指定。
6、Order By 子句将查询结果按一列或多列中的数据排序。如果省略此子句，则查询结果将是无序的。
下面作者将提供一个简单但实用的运用 SQL 语句查询的 ASP 程序供大家参考。
为了使大家更清楚更直接地了解 SQL 语法在 ASP 中的应用，我们先将查询的所有核心过程写成一个名为 query2table 的 SUB，然后利用 ASP 的服务器端包容功能调用该 SUB。请将以下语句剪贴到记事簿，保存为 subdbtable.inc 文件，并置于虚拟目录 asptest 下 :
[font=新宋体]< %
sub query2table(inputquery)
set conntemp=server.createobject("adodb.connection")
conntemp.open "DSN=Student;uid=student;pwd=aspmagic"
set rstemp=conntemp.execute(inputquery)
howmanyfields=rstemp.fields.count -1
\' 统计数据库中的列数
%>
< table border=1>< tr>
< %
for i=0 to howmanyfields
%>
< td>< b>< %=rstemp(i).name%>< /B>< /TD>
< % next %>
< /tr>
< %
do while not rstemp.eof
%>
< tr>
< % for i = 0 to howmanyfields
thisvalue=rstemp(i)
If isnull(thisvalue) then
thisvalue="?
\' 如果字段为空，则将变量 thisvalue 的值定义为一个空格
end if%>
< td valign=top>< %=thisvalue%>< /td>
< % next %>
< /tr>
< %rstemp.movenext
loop%>
< /table>
< %
rstemp.close
set rstemp=nothing
conntemp.close
set conntemp=nothingend sub%>[/font] 完成了 SUB 的定义过程，在下面几个 ASP 程序中我们只要加入想要使用的 SQL 查询语句，并调用该过程就可以非常方便的得到查询结果。将以下四段代码分别保存为 asp11a.asp、asp11b.asp、asp11c.asp、asp11d.asp 四个 .asp 文件。
[font=新宋体]< HEAD>< TITLE>asp11a.asp< /TITLE>< /HEAD>
< HTML>< body bgcolor="#FFFFFF">
< %
call query2table("select * from publishers where name like \'A%%\'")
\' 将表 publishers 中所有姓名中有字母 A 的记录查询出来
%>
< !--#include virtual="/asptest/subdbtable.inc"-->< /BODY>< /HTML>
< HEAD>< TITLE>asp11b.asp< /TITLE>< /HEAD>< HTML>< body bgcolor="#FFFFFF">
< %
call query2table("select * from titles where Year_Published >= 1998")
\' 将表 titles 中所有发表年份大于或等于 1998 年的记录查询出来
%>
< !--#include virtual="/asptest/subdbtable.inc"-->< /BODY>< /HTML>
< HEAD>< TITLE>asp11c.asp< /TITLE>< /HEAD>< HTML>< body bgcolor="#FFFFFF">
< %
call query2table("select * from publishers where amount>10000 and sex=\'male\'")
\' 将表 publishers 中所有数量大于 10000 且性别为男的记录查询出来
%>
< !--#include virtual="/asptest/subdbtable.inc"-->< /BODY>< /HTML>
< HEAD>< TITLE>asp11d.asp< /TITLE>< /HEAD>< HTML>< body bgcolor="#FFFFFF">
< %
call query2table("select * from publishers where state< >\'NY\'")
\'将表 publishers 中所有所在城市不为纽约的记录查询出来。
%>
< !--#include virtual="/asptest/subdbtable.inc"-->< /BODY>< /HTML>
[/font]利用 subdbtable.inc 文件中的所定义的过程 query2table，你就可以非常迅速地对数据库进行查询，你所要做的只是将“conntemp.open "DSN=Student;uid=student;pwd=aspmagic"”中的数据库名称、用户身份和密码稍加改动，并在调用 query2table 时输入想要使用的 SQL 查询语句即可。是不是很简单 ? 这就是 ASP 和 SQL 的魅力所在 !!!
今天，我们虽然用了一整篇的篇幅只学习了一个 SQL 指令，但请你相信你所获得远不同于一个 DOS 指令，SELECT 指令使得你可以非常容易地对数据库进行查询，或许在这之前你对数据库查询还一无所知，但是通过本篇的学习，你其实已经会使用 ASP 进行常用的数据库查询了，是不是很激动 ? 在下一篇中，作者将继续给大家介绍 SQL 的其它几个基本指令。
zyd2060 2008-1-14 21:19
第一章 asp基础入门篇 1.13 数据库查询语言(2)
在本篇的开头，我要感谢一些朋友来信给我指出了前几篇文章中的错误。不知大家是否记得在第八篇中我举了一个简单的利用 Application 制作的页面访问计数器？有位朋友来信问我，为何当他改变计数器起始变量 NumVisits 的值后对最后的记数结果没有任何作用？起初我也大惑不解，让我们来回忆一下这段源程序，如下：
[font=新宋体]< %
Dim NumVisits
NumVisits=0
Application.Lock
Application("NumVisits") = Application("NumVisits") + 1
Application.Unlock
%>
[/font] 欢迎光临本网页，你是本页的第 < %= Application("NumVisits") %>位访客 !在这段程序中，如果你试图通过改变变量 NumVisits 的值来改变记数器结果，是绝对办不到的。因为用变量的值去改变 Application 的值是不可以的，这两者是不相关的。所以这里对变量的定义和赋值都是多余的。那么我们究竟应该如何来给 Application("NumVisits") 定义一个初始值呢？请看以下修正后程序：
[font=新宋体]< %
If Application("NumVisits")< 999 then
Application("NumVisits")=999
End If
Application.Lock
Application("NumVisits")=Application("NumVisits")+1
Application.Unlock
%>
[/font] 欢迎光临本网页，你是本页的第 < %= Application("NumVisits") %>位访客 !
这里的 999 就是你要设定的计数器初始值，如此一来问题就迎刃而解了。我非常感谢这位姓康的朋友给我指出了这个错误，虽然这只是一个很小的漏洞，但我们在共同学程序写程序的过程中非常需要这种严谨细致的作风，希望今后朋友们们一旦发现文中的错误即刻来信告知，我也能及时纠正，谢谢。
SQL 语言可以分为两大部分：数据定义语言和数据操纵语言，继上一篇我们学习了数据操纵语言中的 Select 语句后，今天作者要继续给大家简要介绍其余的 SQL 语句。
SQL 是一种完备的数据处理语言，不仅用于数据库查询，而且用于数据库中的数据修改和更新，与支持 SQL 查询的 Select 语句的复杂性相比较，更改数据库内容的 SQL 语句就格外简单。然而对于一个 DBMS 来说，数据更新所造成的风险大大超出了数据查询。数据库管理系统必须在更改期内保护所存储的数据的一致性，确保有效的数据进入数据库，数据库必须保持一致性， DBMS 还必须协调多用户的并行更新，以确保用户和他们的更改不至于影响其他用户的作业。
用于修改数据库内容的 SQL 语句主要有以下三个：
1、 Insert，向一个表中加入新的数据行
2、 Delete，从一个表中删除数据行
3、 Update，更改数据库中已经存在的数据
首先我们来看看 Insert 的用法：
标准语法：
[font=新宋体] INSERT INTO table_name
(col1, col2...)
VALUES(value1, value2...)[/font]
下例要将书生作为一个新的销售员加入表 Salesreps 中
[font=新宋体] Insert Into
Salesreps (name,num,sales,hire_date,income)
values (\\\'shusheng\\\',9,10000,\\\'23-Feb-99\\\',2000)[/font]
在此语句中，列的名称列在括号中以逗号隔开，接下去是 Value 短语和括号中同样以逗号隔开的每列数据，应该注意的是数据和列名称的顺序是相同的，而且若是字符串型则以单引号隔开。从概念上来讲， Insert 语句建立的一个与表列结构相一致的数据行，用取自 Values 子句的数据来填充它，然后将该新行加入表中，表中的行是不排序的，因此不存在将该行插入到表的头或尾或两行之间的这个概念。 Insert 语句结束后，新行就是表的一部分了。
Insert 语句还可以将多行数据添加到目标表中去，在这种形式的 Insert 语句中，新行的数据值不是在语句正文中明确地指定的，而是语句中指定的一个数据库查询。添加的值来自数据库自身的行，这乍看起来似乎有些奇怪，但是在某些特定的状态下，这是非常有用的。比如，你想把 1998 年 12 月 30 日之前产生的订单编号、日期和数目从 order 表中拷贝到另一个名为 oldorder 的表中去，多行 Insert 语句为拷贝数据提供了一种紧凑而高效的方法，如下：
[font=新宋体] Insert into oldorder (Num,Date,Amount)
Select Num,Date,Amount
From order
Where Date<\\\'30-12-98\\\'[/font]
这条语句看起来有些复杂，其实很简单，语句标识了接收新行的表 oldorder 和接收数据的列，完全类似于单行 Insert 语句。语句的剩余部分是一个查询，它检索 order 表中的数据。 SQL 先执行对 order 表的查询，然后将查询结果逐行插入到 oldorder 表中去。
下面我们来看看 Update 的用法， Update 语句用于更新单表中选定行的一列或多列的值。要更新的目标表在语句中定义， Set 子句则指定要更新哪些列并计算他们的值。 Update 语句总是包含 Where 语句，而且 Update 语句比较危险，所以您必须明确地认识到 Where 语句的重要性， Where 语句被用来指定需要更新的行。
标准语法：
[font=新宋体] UPDATE table_name
SET columnname1 = value1
[, columname2 = value2]...
WHERE search_condition[/font]
以下是一个简单的 Update 语句的例子 :
[font=新宋体] Update customers
Set credit=100000.00,id=99
Where name=\\\'asp\\\'[/font]
在此例中我们将表 customers 中客户名为 asp 的客户的信贷值更新为 10 万并将他的 ID 变更为 99。再看下例：
[font=新宋体] Update customers
Set credit=200000.00,state=021
Where ID in (80,90,100,120)[/font]
我们可以发现，其实 SQL 处理 Update 语句的过程就是逐行遍历所指定的表，更新其搜索条件结果为“真”的行，跳过其搜索条件结果为“假”或“空”的行。
最后，来看看 Delete 语句。
标准语法：
DELETE FROM tablename
WHERE condition
由于它过于简单，所以所造成的后果也是严重的，虽然其中的 Where 子句是任选的，但它几乎总是存在的，若将 Where 子句从 Delete 语句中省略掉，则目标表的所有行都将被删除。看下例：
Delete from order Where ID=99
在文章的末尾，作者在给大家简要介绍一下数据定义语言。它是用来创建和修改数据库结构的一种语句，包括 Create 和 Drop 语句。
1、 Create 语句
标准语法：
[font=新宋体] CREATE TABLE table_name
( field1 datatype [ NOT NULL ],
field2 datatype [ NOT NULL ],
field3 datatype [ NOT NULL ]...)[/font]
如：
[font=新宋体] CREATE TABLE BILLS
( NAME CHAR(30),
AMOUNT NUMBER,
ACCOUNT_ID NUMBER)[/font]
尽管 Create Table 比前面介绍的语句难理解一些，但仍然很直观。它将 bills 赋予一个新表，并指定表中三列的名称和数据类型。表被建立后我们就可以添入数据了。如：
[font=新宋体] Insert into bills(name,amout,account_id) values(\\\'gates\\\',100,1)[/font] 如果，你觉得不再需要保存产品信息，则可用 Drop table 语句将该表及其所包含的所有数据从数据库中删除掉。
标准语法：
[font=新宋体] DROP TABLE table_name[/font] 至此，我们已经了解了所有常用的 SQL 语句，可别小看这些貌似英文的简单语句，它们的功能十分强大，当我们编写 asp 程序时必须使用他们对数据库进行操作。从下一篇开始，作者将给大家介绍 ASP 的内建 ActiveX 组件，敬请关注。
zyd2060 2008-1-14 21:21
第一章 asp基础入门篇 1.14 ActiveX 组件
当你用 ASP 编写服务器端应用程序时，必须依靠 ActiveX 组件来强大 Web 应用程序的功能，譬如：你需要连接数据库，对数据库进行在线操作等等，本文从本篇开始将陆续给大家介绍 ASP ActiveX 组件的使用方法。 从今天开始我们将正式学习 ASP 的精华部分 --ActiveX 组件。事实上，当你用 ASP 编写服务器端应用程序时，必须依靠 ActiveX 组件来强大 Web 应用程序的功能，譬如：你需要连接数据库，对数据库进行在线操作或者对 WEB 服务器上的文件系统进行操作，亦或你需要一个 WEB 广告交换程序，所有这一切你都必须通过调用 ASP 内建的 ActiveX 组件或自己编写所需的组件来完成。
那么，究竟什么是 ActiveX 组件呢？它又是如何运作的呢？其实 ActiveX 组件是一个存在于 WEB 服务器上的文件，该文件包含执行某项或一组任务的代码，组件可以执行公用任务，这样就不必自己去创建执行这些任务的代码。例如，股票行情收报机组件可以在 Web 页上显示最新的股票报价。当你在 WEB 服务器上安装完 ASP 环境后，就可以直接使用它自带的几个常用组件，如 Database Access 组件。当然你也可以从第三方开发者处获得可选的组件 , 也可以编写自己的组件。你可以利用组件作为脚本和基于 Web 应用程序的基本构造块，只要知道如何访问组件提供的对象，即使你是位编写脚本的新手，也可以在不了解组件运作方式的情况下编写 ASP 程序。总而言之， ActiveX 组件使您不用学习复杂的编程就能够写出强大的 WEB 服务器端脚本。如果您是位 Web 应用程序的开发者，可以使用任何支持组件对象模型（COM）的语言来编写组件，如， C、 C++、 Java 或 Visual Basic。如果你熟悉 COM 编程， ActiveX 组件就是 Automation 服务器。但是要在 Web 服务器上运行， ActiveX 组件不能有图形用户接口元素，如 Visual Basic 的 MsgBox 函数。组件是可以重复使用的。在 Web 服务器上安装了组件后，就可以从 ASP 脚本、 ISAPI 应用程序、服务器上的其他组件或由另一种 COM 兼容语言编写的程序中调用该组件。
那么我们在 ASP 中应该如何调用组件呢？如前所述，组件是包含在动态链接库 (.dll) 或可执行文件 (.exe) 中的可执行代码。组件可以提供一个或多个对象以及对象的方法和属性。要使用组件提供的对象，我们首先要创建对象的实例并将这个新的实例分配变量名。使用 ASP 的 Server.CreateObject 方法可以创建对象的实例。接着，使用脚本语言的变量分配指令为对象实例命名。创建对象实例时，必须提供实例的注册名称“PROGID”。如下要创建一个 Ad Rotator 对象的实例 :
＜% Set MyAds = Server.CreateObject("MSWC.AdRotator") %> 我们必须使用 ASP 的 Server.CreateObject 方法来创建对象实例，否者 ASP 无法跟踪脚本语言中对象的使用。
使用 HTML＜ OBJECT>标签同样可以创建对象实例，但必须为 RUNAT 属性提供服务器值，同时也要为将在脚本语言中使用的变量名提供 ID 属性组。使用注册名 (PROGID) 或注册号码 (CLSID) 可以识别该对象。下面的例子使用注册名 (PROGID) 创建 Ad Rotator 对象的实例：
＜OBJECT RUNAT=Server ID=MyAd PROGID="MSWC.AdRotator">＜ /OBJECT>
下面列出了 ASP 可安装的常用组件。
[table=500][tr][td][b]Ad Rotator[/b][/td][td]创建一个 [b]AdRotator[/b]对象，该对象可按指定计划在同一页上自动轮换显示广告。 [/td][/tr][tr][td][b]Browser Capabilities[/b][/td][td]创建一个 [b]BrowserType[/b]对象，该对象决定访问 Web 站点的每个浏览器的性能、类型及版本。 [/td][/tr][tr][td][b]Database Access[/b][/td][td]提供用 ActiveX Data Objects (ADO) 对数据库的访问。 [/td][/tr][tr][td][b]Content Linking[/b][/td][td]创建一个 [b]NextLink [/b]对象，该对象可生成 Web 页内容列表，并象书一样将各页顺续连接。 [/td][/tr][tr][td][b]File Access 组件 [/b][/td][td]提供文件的输入输出访问。 [/td][/tr][tr][td][b]Collaboration Data Objects for NTS 组件 [/b][/td][td]可以快速、简便的在 Web 页上添加收发邮件功能。该组件只适用于 Internet Information Server for Windows NT? Server 。 [/td][/tr][tr][td][b]MyInfo[/b][/td][td]创建一个 [b]MyInfo[/b]对象，该对象追踪个人信息，例如站点管理员的姓名、地址及显示选择。 [/td][/tr][tr][td][b]Counters[/b][/td][td]创建一个 [b]Counters[/b]对象，该对象可以创建、保存、增加或检索任意数量的独立计数器。 [/td][/tr][tr][td][b]Content Rotator[/b][/td][td]自动翻转 Web 主页上的 HTML 内容字符串。 [/td][/tr][tr][td][b]Page Counter[/b][/td][td]记录并显示 Web 页被打开的次数。 [/td][/tr][/table] 现在 WEB 广告几乎充斥了整个网络，那么究竟如何在你自己的网站上建立一个符合广告领域标准功能的广告系统呢？答案是利用 ASP AD Rotator 组件 ! 它允许在每次访问 ASP 页面时在页面上显示新的广告，并且提供了很强的功能，例如 : 旋转显示在页面上的广告图象的能力、跟踪特定广告显示次数的能力以及跟踪客户端在广告上单击次数的能力。 AD Rotator 组件的工作是通过读取 AD Rotator 计划文件来完成的，该文件包括与要显示的图象文件的地点有关的信息以及每个图象的不同属性，下面就是一个标准的 AD Rotator 计划文件 :
---ADROT.TXT---
REDIRECT /scripts/adredir.asp
WIDTH 440
HEIGHT 60
BORDER 1
*
ads/homepage/chinabyte.gif
http://www.chinabyte.com/
Check out the IT site
2
ads/homepage/gamichlg.gif
-
Sponsored by Flyteworks
3
ads/homepage/asp.gif
http:// [url]www.aspallian.com/[/url]
Good ASP site on net
3
ads/homepage/spranklg.gif
http://www.clocktower.com/
The #1 Sports site on the net
2
该段代码的前四行包含广告的全局设置。 Redirect 行指出广告将成为其热连接的 URL, 注意这里不是为广告本身指定的 URL，而是将调用的中间页面的 URL，这样我们就可以通过这个中间页面跟踪单击广告的次数。该 Redirect URL 将与包含两个参数的查询字符串一起调用 : 特定广告主页的 URL 和图象文件的 URL。星号上面的其余三行简单说明如何显示广告。前两行以像素为单位指定网页上广告的宽度和高度，默认值是 440 和 60 个像素。后一行，同样是以像素为单位指定广告四周超链接的边框宽度 , 默认值是 1 个像素。如果将该参数设置为 0，则将没有边框。
星号下面的行以每四行为一个单位描述每个广告的细节。在此例中共有 16 行，描述四个广告。每个广告的描述包含图象文件的 URL、广告的主页 URL（如果广告客户没有主页，请在该行写上一个连字符“-”，指出该广告没有链接）和图象的替代文字以及指定该页与其他页交替显示频率的数值。
图象是重定向页面的热连接，它在查询字符串中设置了两个值， url=/scripts/adredir.asp 以及 image=/ads/homepage/asp.gif。要确定广告显示的频率，可以将计划文件中所有广告的权值相加，在该例中总数是 10，那么 aspallian 的广告权值为 3，这意味着 AdRotator 组件每调用十次，它则显示 3 次。
重定向文件是用户创建的文件。它通常包含用来解析由 AdRotator 对象发送的查询字符串的脚本并将用户重定向到与用户所单击的广告所相关的 URL。用户也可以将脚本包含进重定向文件中，以便统计单击某一特定广告的用户的数目并将这一信息保存到服务器上的某一文件中。增加计数器和重定向用户是通过下面两行 ASP 脚本来实现的 :
＜ %
Counter.Increment(request.querystring("url"))
response.redirect(request.querystring("url"))
%>
现在我们看一下 Ad Rotator 组件是如何在页面中使用的，首先必须使用 Server.CreateObject 方法实例化 Ad Rotator 对象。 Ad Rotator 组件的 PROGID 属性是 MSWC.AdRotator。完整的代码如下 :
＜ % Set ad = Server.CreateObject("MSWC.AdRotator") %>
＜ %= ad.GetAdvertisement("/ads/adrot.txt") %>
Ad Rotator 组件支持的唯一方法是 GetAdvertisement，它只有一个参数 :AdRotator 计划文件的名称。注意指向文件的路径是从当前虚拟目录的相对路径，物理路径是不允许的。 GetAdvertisement 方法从 Rotator 计划文件中获取下一个计划广告的详细说明并将其格式化为 HTML 格式。下面的 HTML 由 GetAdvertisement 方法生成且被添加到网页的输出中，以便显示 Rotator 计划文件中的下一个广告。
＜ A HREF="http://www.chinabyte.com/scripts/adredir.asp?[url]http://www.aspallian.com/[/url]">＜ IMG
SRC="http://www.chinabyte.com/ads/homepage/asp.gif" ALT="Good ASP site on net" WIDTH=440 HEIGHT=60 BORDER=1>＜ /A>
使用 AdRotator 组件我们可以直接通过对象属性而不是计划文件中的设置来直接控制某些广告特性，其可用属性如下 :
Border 指定广告边框的大小。
Clickable 指定广告是否为超链接。
TargetFrame 指定显示广告的框架的名称。
＜ %
Set ad = Server.CreateObject("MSWC.AdRotator")
ad.Border = 0
ad.Clickable = true
ad.TargetFrame = AdFrame
ad.GetAdvertisement("/ads/adrot.txt")
%>
通过上面的学习，相信你已经能够熟练运用 ASP 的内建 AdRotator 组件为自己的网站建立一个标准的广告显示程序了。你是否难以相信一切竟是如此的简单？其实真正能令你震惊的还在后头呢，敬请关注下一篇 ASP ActiveX 组件大揭密！
zyd2060 2008-1-14 21:22
第一章 asp基础入门篇 1.15 常用的 ASP ActiveX 组件
当你用 ASP 编写服务器端应用程序时，必须依靠 ActiveX 组件来强大 Web 应用程序的功能，譬如：你需要连接数据库，对数据库进行在线操作等等，继上篇介绍了 AD Rotator 组件后，本篇将接着给大家介绍其它一些常用的 ASP ActiveX 组件的使用方法。 最近仍有不少朋友来信问我， ASP 是否只能在 Microsoft IIS 上运行，是否可以在非 NT 平台上运作？本来这个问题我已经回答过很多遍了 : 我只是听说过有某种可以支持的软件，却从没见过。但一些热情的朋友仍然孜孜不倦地来信询问，于是在朋友们的盛情之下，我访遍了ASP 相关站点，竟惊奇的发现，原来 ASP 的确是可以运行在其它非 NT 平台上的，因此在本篇的开头，我就给来信的朋友们简要介绍一下如何在非 NT 平台上使用 ASP。
要在非 NT 平台上开发并运行 ASP 应用程序我们可以依赖于一套名为 Instant ASP 的第三方软件，它的广告标语非常吸引人“ASP Anytime, Anywhere”，我想所有 ASP 的开发者们看到如此的标语必然兴奋不已。这套由 Halcyon 软件公司开发的软件使得你无需重复开发原有 ASP 应用程序即可以将它运行在任何操作平台上 ! 这样非但节省了大量的开发时间，而且使得 ASP 真正成为了一种跨平台的 Internet、 Intranet 或 Extranet 应用程序。 Instant ASP 本身其实是一套基于 Java 的应用程序，因此通过它你可以将基于 WEB 的 ASP 应用程序运行在任何平台上，下表列出了Instant ASP 目前版本所支持的操作平台。
[attach]195622[/attach]
更令人吃惊的是 Instant ASP 不仅提供了 ASP 的运作环境，而且它较目前市场上的 ASP 应用还提供了更为强大和实用的功能，它将 ActiveX 组件和 Enterprise Java Beans 或者 CORBA-compliant objects 组合起来，从而使ASP 有了更为广泛的应用。它同样提供了通过 ADO 接口访问连接各种数据库，并生成动态页面的强大功能。对于开发者而言可以使用自己擅长的编程语言或工具如 :Visual Basic, JScript, VBScript, C++, Java, HTML, Delphi , MS Visual InterDev 等等来进行开发。关于 Instant ASP 具体安装和操作我就不在这里展开了，有兴趣的朋友可以到它的站点上去看看 halcyonsoft.com，你还可以免费下载一个试用版试试。
继上一篇中作者给大家介绍了 AD Rotator 组件的使用方法后，今天我们接着来看看其它的一些 ASP 常用组件。
[b]一、 Database Access 组件
[/b] 我们在 WEB 服务器上运用 WEB 应用程序进行的最常见和最实用的任务就是访问服务器端的数据库。而 ASP 内建的 Database Access 组件使得我们能够轻而易举地通过 ActiveX Data Objects (ADO) 访问存储在服务器端的数据库或其他表格化数据结构中的信息。 ADO 是对当前微软所支持的数据库进行操作的最有效和最简单直接的方法，它是一种功能强大的数据访问编程模式，从而使得大部分数据源可编程的属性得以直接扩展到你的 Active Server 页面上。可以使用 ADO 去编写紧凑简明的脚本以便连接到 Open Database Connectivity (ODBC) 兼容的数据库和 OLE DB 兼容的数据源，这样 ASP 程序员就可以访问任何与 ODBC 兼容的数据库，包括 MS SQL SERVER、Access、 Oracle 等等。如果您是一个对数据库连接有一定了解的脚本编写人员，那么您将发现ADO 命令语句并不复杂而且容易掌握。同样地，如果您是一个经验丰富的数据库编程人员，您将会正确认识 ADO 的先进的与语言无关性和查询处理功能。熟悉 VB 数据库编程的朋友会发现 ADO 与 RDO (Remote Data Objects) 有某种类似的地方。但据说 ADO 的访问的速度更快，内存需要更小。
下面给大家简要介绍一下利用 ASP 的 Database Access 组件通过 ADO 连接并操作 WEB 数据库的步骤
第一步 : 指定想要连接的数据库，有 DSN 和 DSN-less 两种方法。
DSN(Data Source Name 数据源名称 ): 建立一个系统数据源名称，方法如下 :
1、单击“开始”，选设置控制面板。
2、双击图标“32 位 ODBC” , 将弹出一个对话框，选标签“System DSN”
3、单击“Add”添加一个 DSN 入口 , 选择如“Microsoft Access Drive”并确认。
4、在“Data Source Name”栏里输入你希望指定的 DSN, 然后单击“Select”选择数据库
存放位置，你可以按“Browse”来选取。
5、以上步骤完成后在 ASP 程序中指定 DSN，如下 :
< %c%>
DSN-less: 是另一种通过在 ASP 文件里直接指定数据库文件所在位置，而无需建立 DSN 的
方法。由于许多公司没有自己的 WEB 服务器，他们的网站往往是存放在远端的虚拟服务器上，因此
要建立和修改 DSN 的设置比较麻烦。而使用 DSN-less 方法直接指定远端数据库所在位置恰恰解决了
这一问题，方法如下 :
[font=新宋体]< %
c+server.mappath("database/source.mdb")+";
DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};
DriverId=25;FIL=MSAccess;
ImplicitCommitSync=Yes;
MaxBufferSize=512;
MaxScanRows=8;
PageTimeout=5;
SafeTransactions=0;
Threads=3;
UserCommitSync=Yes;"
%>[/font]
在指定了想要连接的数据库后，就可以通过以下方法连接并打开数据库 :
[font=新宋体]< %
Set Conn = Server.CreateObject("ADODB.Connection")Conn.Open constr
%>[/font]
第二步 : 指定想要执行的 SQL 指令，可以使用 RecordSet。
当连接了数据库后就可以对数据库进行操作，比如查询、删除、更新等等，这些操作都是通过SQL 指令来完成的，如下例在数据库表 datebase 中查询所有姓名中有“A”的记录 :
[font=新宋体]< %
sql="select * from datebase where name like \'A%%\'"
Set rs = Conn.Execute(sql)
%>[/font]
尽管 Connection 对象简化了连接数据库和查询任务，但 Connection 对象仍有许多不足。确切地说，检索和显示数据库信息的 Connection 对象不能用于创建脚本，您必须确切知道要对数据库作出的更改，然后才能使用查询实现更改。对于检索数据、检查结果、更改数据库， ADO 提供了 Recordset 对象。正如它的名称所暗示的那样， Recordset 对象有许多您可以使用的特性，根据您的查询限制，检索并且显示一组数据库行，即记录。 Recordset 对象保持查询返回的记录的位置，允许您一次一项逐步扫描结果。根据 Recordset 对象的指针类型属性设置，您可以滚动和更新记录。数据库指针可以让您在一组记录中定位到特定的项。指针还用于检索和检查记录，然后在这些记录的基础上执行操作。 Recordset 对象有一些属性，可用于精确地控制指针的行为，提高您检查和更新结果的能力。
Recordset 的使用方法如下 :
[font=新宋体] Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL 指令 , Conn, 1, 1 \' 读取
[/font] 或
[font=新宋体] rs.Open SQL 指令 , Conn, 1, 3 \' 新增、修改、或删除[/font]
第三步 : 使用 RecordSet 属性和方法，并显示执行的结果。
通过以上指令，我们创建了一个包含数据的游标 (RecordSet)“rs”，事实上游标是存储在活动内存中的类似记录和字段的数组的东西，当通过 RecordSet 组件创建一个游标时，它从数据提供者的得到一个数据集，并用它来充实游标，我们可以想象 ADO 产生的 RecordSet 是一个象电子表格的记录，它有一行行的记录，在任何时候都有一行是它的当前行，而 RecordSet 的字段是用 RecordSet 的 Field 集合表示的。下面列出了所创建的 RecordSet 对象 ( 游标 ) 的一些属性和方法 :
rs.Fields.Count: RecordSet 对象的字段总数。
rs(i).Name: 第 i 个字段的名称， i 由 0 算起到 rs.Fields.Count-1。
rs(i): 读取第 i 个字段的数据， i 由 0 算起到 rs.Fields.Count-1。
rs(" 字段名称 "): 读取指定字段的数据。
rs.RecordCount: 游标中的数据记录总数。
rs.EOF: 是否已指到最后一条记录。
rs.MoveNext: 将指标移到下一笔记录。
rs.MovePrev: 将指标移到上一笔记录。
rs.MoveFirst: 将指标移到第一笔记录。
rs.MoveLast: 将指标移到最后一笔记录。
rs.Close: 关闭 RecordSet 对象
有关 ADO 的其他介绍，作者将在今后给大家详细讲解。
[b] 二、 Content Linking 组件[/b]
如果你的网站有一系列相互关联的页面的话， Content Linking 组件将非常适合你的需求，它非但可以使你在这些页面中建立一个目录表，而且还可以在它们中间建立动态连接，并自动生成和更新目录表及先前和后续的 Web 页的导航链接。这对于列出联机报刊、电子读物网站以及论坛邮件是十分理想的选择。
Content Linking 组件创建管理 URL 列表的 Nextlink 对象，要使用 Content Linking 组件，必须需要先创建 Content Linking List 文件。 Content Linking 组件正是通过读取这个文件来获得处理我们希望链接的所有页面的信息。事实上该文件是一个纯文本文件，其内容如下 :
[font=新宋体]page1.htm one
page2.htm two
page3.htm three
page4.htm four
page5.htm five
page6.htm six[/font]
这个文本文件的每行有如下形式 :
[font=新宋体] url description comment[/font]
其中， URL 是与页面相关的超链地址， description 提供了能被超链使用的文本信息， comment 则包含了不被 Content Linking 组馐偷淖⑹托畔ⅲ淖饔萌缤绦蛑械淖⑹汀?description 和 comment 参数是可选的。
下面我们来看看如何具体使用 Content Linking 组件 :
[font=新宋体]< html>
< head>
< meta http-equiv="Content-Type" c>
< title>网络电子读物宝藏 < /title>
< /head>
< body>
< p>网络电子读物导航
< %
Set Link = Server.CreateObject("MSWC.NextLink")
count = Link.GetListCount("nextlink.txt")
Dim I
For I=1 to count
%>
< ul>< li>< a href="< %= Link.GetNthURL("nextlink.txt", I) %>">< %= Link.GetNthDescription("nextlink.txt", I) %>< /a>
< % Next %>
< /body>
< /html>[/font]
在以上代码中，我们先用 GetListCount 方法确定在文件 nextlink.txt 中有多少条项目，然后利用循环语句，并使用 GetNthURL、 GetNthDescription 方法逐一将存储在 nextlink.txt文件中的内容读出并显示给客户端浏览器。
下面列出了 Content Linking 组件所有可使用的方法 GetListCount(file) 统计内容链接列表文件中链接的项目数。
GetNextURL(file) 获取内容链接列表文件中所列的下一页的 URL。
GetPreviousDescription(file) 获取内容链接列表文件中所列的上一页的说明行。
GetListIndex(file) 获取内容链接列表文件中当前页的索引。
GetNthDescription(file,index) 获取内容链接列表文件中所列的第 N 页的说明。
GetPreviousUR(file) 获取内容链接列表文件中所列的上一页的 URL。
GetNextDescription(file) 获取内容链接列表文件中所列的下一页的说明。
GetNthURL(file,index) 获取内容链接列表文件中所列的第 N 页的说明。
在我们创建了网站的总导航页面后，我们当然还希望在每一页中添加一个“上一页”、“下一页”的导航超链，下面我们就来看看如何实现导航超链。
由于考虑到你的网站可能包含了上千或更多的页面，所以我们不可能在每一个页面中都编写实现导航超链的 ASP 代码。因此，我们必须利用前几篇中所学到的服务器端包容 SSI，这样就避免了大量的重复作业，请看下例 :
[font=新宋体] < !--#include file="nextprev.inc"-->[/font]
只要将这端代码放在每个页面中即可。 nextprev.inc 文件的内容如下 :
[font=新宋体]< %
Set Link = Server.CreateObject("MSWC.NextLink")
count = Link.GetListCount("nextlink.txt")
current = link.GetListIndex("nextlink.txt")
If current >1 Then
%>
< a href="< %= Link.GetPreviousURL("nextlink.txt") %>">上一页 < /a>
< %
End If
If current < count Then
%>
< a href="< %= Link.GetNextURL("nextlink.txt") %>">下一页 < /a>
< % End If %>[/font]
今天的学习又到此结束了，在这里我要再次感谢所有关心我的文章的朋友们，你们的来信给了
我很大的鼓舞，不过请大家不要再称我为“老师”，其实我也和你们一样是在不断的学习和摸索中，
有问题我们可以一起探讨，我的文章中肯定还存在很多不足或漏洞，也希望大家发现后能及时向我
提出。由于近来 ASP 已经在国内的网站中广泛运用起来，所以应朋友们的要求，在国内 ASP � 