ASP教程：第三篇 ASP基础

    本文 ASP 篇 (1) 展示了 ASP 动态网站设计的一些最基本的方法，相信通过实践各位对 ASP 已经有了最基本的了解，本篇在答复大家所提问题的同时，将进一步介绍 ASP 动态网站的一些基本技巧。

　 自本文第一篇刊登后 , 络绎不绝地收到了一些朋友的来信，出乎作者的意料，其中有相当一部分是初次接触 ASP ，因此有许多朋友都提出为何在浏览器中浏览 ASP 篇 (1) 中的范例时看到的竟然是原代码？由于遇到此问题的朋友较多，故作者在此一并回答。首先，我要再次强调 ASP 是一套服务器端的脚本环境，当用户从浏览器向 Web 服务器请求 .asp 文件时， ASP 脚本开始运行，然后 Web 服务器调用 ASP ， ASP 全面读取请求的文件，执行所有脚本命令，并将 Web 页传送给浏览器，这就意味着你不能简单地在现有的操作系统 ( 如 Win95 、 98) 下，用浏览器中的 " 打开 " 命令来浏览 .asp 文件；其次，运行 .asp 文件需要服务器端的支持，目前除了 WindowsNT 下的 Microsoft Internet Information Server 支持 Active Server 技术外， Active Server 还可用于 MS Windows NT Workstation 和 MS Windows 95/98 中的 Personal Web Server 的构件，因此无论你安装的是 NT 还是 WIN95/98 ，都必须在原系统上安装支持 ASP 的服务器端环境，才能使你的机器得以运行 .asp 文件。由于目前绝大多数朋友安装的是 Win95 或是 98 ，因此作者就在这里着重介绍如何在 Win95/98 下运行和浏览 .asp 文件。因为 MSPersonal Web Server 支持通用网关接口 (CGI) 应用程序、 Internet 数据库接口 (IDC) 应用程序和 IIS 应用程序接口 (ISAPI) 应用程序，并且支持运行和开发 ASP 应用程序，所以使得 Win95 及其以后操作平台具备了近似于 NT 的健全的网站运作和管理功能。你所要做的只是在现有的 Win95/98 系统上安装 MS Personal Web Server ，建议安装最新的 4.0 版本。当安装完成后， PWS4.0 会在系统启动时自动加载。打开 PWS ，选择左栏中的 " 高级 " 按钮 ( 见下图 Asp2a.gif) ，点取 " 虚拟目录 " 下的 "/_private" 目录，然后点击右边的 " 编辑属性 " 按钮，如图所示，在对话框中你可以编辑该虚拟目录的物理路径和目录名，上图中 "/_private" 的物理路径为 "D:\Inetpub\wwwroot" ，该目录是系统默认的 WWW 发布根目录，将上一篇中的范例 test1.asp 文件复制到 "D:\Inetpub\wwwroot" 目录下。最后，你只要将该虚拟目录的访问权限选择为 " 执行 " ，并在浏览器的 " 地址 " 栏中输入 "http://localhost/test1.asp" 就可以运行并浏览该 ASP 程序了。
　　知道了如何运行并浏览 ASP 程序，下面我们就继续 ASP 动态网站设计的学习。

　　上一篇给大家介绍了几个最基本的 ASP 程序，相信大家已经对 ASP 的应用有了大致的了解，本篇将继续介绍一些用 ASP 编写的 WEB 动态功能。由于 WEB 浏览器标准的不一致从而使得如何能够让自己制作的网站去适应各种不同的浏览器成为了广大网站设计者最为头疼的事，在如今的形势之下，我们不肯也不可能去抛弃 Netscape 或 IE 中的任何一种客户群，但我们有时候又不得不去考虑客户端浏览器的实际浏览效果，过去我们常用 javascript 编写一段程序来辨别客户端使用的不同的浏览器，那么今天就让我们来看看如何使用 ASP 更为便捷且精确地达到这一目的。将以下代码，剪贴到你的 Notebook 中，并保存为 browser.asp 。 　　< %@ LANGUAGE = VBScript %>
　　< HTML>
　　< HEAD>
　　　　 < TITLE>用ASP提供的浏览器性能组件来辨别客户浏览器< /TITLE>
　　 < /HEAD>
　　 < BODY BGCOLOR="White" topmargin="10" leftmargin="10">
　　　　< font size="4" face="Arial, Helvetica">
　　　　< b>用ASP提供的浏览器性能组件来辨< br>别客户浏览器< /b>< /font>< br>
　　　　< hr size="1" color="#000000">
　　　　 < !-- 定义并创建浏览器性能对象 -->
　　　　 < %
　　　　　 Dim bc
　　　　　 Set bc = Server.CreateObject("MSWC.BrowserType")
　　　　 %>
　　　　 < !-- 在表格中描述客户浏览器的信息 -->
　　　　 < Table border=1>
　　　　　　 < tr>
　　　　　　 < td>Browser Name< /td>
　　　　　　 < td> < %=bc.Browser %> < /Td>
　　　　　　 < tr>
　　　　　　 < td>Browser Version< /td>
　　　　　　 < td> < %=bc.Version %> < /Td>
　　　　　　 < tr>
　　　　　　 < td>Major Version< /td>
　　　　　　 < td> < %=bc.Majorver %> < /Td>
　　　　　　 < tr>
　　　　　　 < td>Minor Version< /td>
　　　　　　 < td> < %=bc.Minorver %> < /Td>
　　　　　　 <