ASP讲座之一：网页开发利器：高效易学的ASP

诸起看官莫怪，起这么一个不伦不类的名字，而不是“ASP初步（入门、基础）”，原因有二：一怕过于俗套，但更重要的是怕众多的徘徊在ASP门槛之外的主页制作群连内容都不曾谋面就逃掉了，实在是可惜！其实，只要您有制作网页的经验，您就应该知道点ASP，不然，您的主页恐怕就不够“Cool”了。此话怎讲？如果您作主页时一直在写.htm或.html文件，一定会很奇怪，如何在主页上显示IP地址、在线人数？怎样让客户端不能获取自己主页文件的源代码？或者怎样实现时下非常时髦的个性化服务（根据浏览者的不同要求自动生成页面），又或者怎样自己动手制作计数器、留言薄、自动的友情链接甚至实现电子购物？那么，当您读完这篇讲座之后，恐怕就会觉得这些东西的实现原理原来如此简单。既然如此，就继续往下看吧。

一、首先让我们了解一下学习ASP的基本要求。

1．ASP起步所需个人最低配置：

（1）懂一点HTML知识（有维护制作网页的经验）；

（2）一点数据库知识，如会使用Microsoft Access或者会使用.mdb数据库。

（3）最好有一点点编程基础（最好是VB系列，要求会使用If…Then…End If选择分支语句和循环语句）。如果您一点编程基础也没有，那只有试试看了。

2．调试、运行ASP所需软件环境：

（1）Win9x+PWS(Win98的光盘中“\add－ons\pws\setup.exe”安装一下就行了)。至于怎样安装Personal Web Server，很多杂志上都有介绍（不要太多哦，电脑商情报去年就有过一篇《ASP个人上手指南》），其实非常简单，没有文章写得那么复杂。如果这关过不了，我只好建议您打电话到编辑部咨询了。

（2）或者使用Windows NT4.0+IIS4.0（在Windows NT4.0 Option Pack安装程序中），若要在单位里组建Intranet，使用这种组合是比较好的。

安装完毕后，如果在浏览器中输入http://localhost/default.asp有结果出来，则安装成功（默认情况下，你的主页文件应放在“\InetPub\wwwroot”目录下）。如果你想将调试好的ASP文件上传到远程的主页服务器上，必须确信该服务器支持ASP，不过，目前声明支持ASP的免费主页空间并不多，这里给大家提供两个：东莞视窗(http://www.homecn.com/)和NET668(http://freenet.net668.net/),您可以测试一下我的ASP文件运行结果：http://202.103.176.81/grun/kissher/asp/ipfound2.asp。

3．ASP学习支持：

（1）ASP技术网站：http://www.chinasp.com/，从这里还可以找到一些ASP相关的英文站点。

（2）ASP动感网络：http://active.t500.net/

（3）Windows NT4.0 Option Pack说明文件和Active Server Pages3.0说明文件。

（4）Visual Studio6.0的MSDN Library光盘中有两个文件asp.chm、aspdoc.chm是ASP帮助文件，没有可去我的站点http://wuf.bentium.net下载（还可下载本文所有源程序）。

（5）本讲座的目的只是教您能依样画葫芦，在自己的主页中使用ASP（包括直接使用能下载到的ASP程序），以实用为先。如果你想进一步深入，建议买一本ASP手册，如：《ASP实务经典》（中国铁道出版社，林金霖编著）。

二、自己动手试试。为了加强感性认识，我们先通过两个实例来说明如何编辑和使用ASP文件。打开Windows附件的记事本，输入以下代码，保存为wuf1.asp（如果有任何问题，可以去我的主页向我咨询）：

<% @LANGUAGE = VBScript %>

Response.Write "<HTML><BODY>" '相当于编程语言中的输出语句

Response.Write "输出结果到浏览器."

Response.Write "</BODY></HTML>"

编辑好后，将wuf1.asp放到安装默认Web站点的主目录“\InetPub\wwwroot”下，在浏览器中输入http://localhost/wuf1.asp就会看到输出结果。下面再看一个实例（wuf2.asp）：

<html>

<body>

IP address = <%=Request.ServerVariables("Remote_Addr")%>

</body>

</html>

输出结果即为本机IP地址，简单吧。在上面两个例子中，我们使用记事本作编辑器（因为ASP文件是文本文件），但是，如果真想使用ASP的话，我给你推荐以下几个工具：

1． HomeSite：不仅是制作主页最好的工具之一，编写ASP文件也很不错。

2． ASP-Edit Professional：不仅可按不同颜色显示ASP代码，还有ASP课程和VBScript帮助，这两个文件可去华军主页（http://www.newhua.com）下载。

3． Microsoft Visual InterDev6.0：虽是牛刀，却是编辑ASP文件最好的工具，如果你使用过VB，它的好处就不用我多说了。

应该说明的一点是，时下流行的DreamWeaver3.0作主页不错，但最好不要用来编辑有ASP代码的文件，以免越编越乱。

三、理解ASP脚本编程环境

ASP（Active Server Pages）是一种功能强大、灵活易学的服务器端脚本编程环境，它的源代码均在服务器端运行,运行的结果以HTML代码的形式输出到客户端。利用ASP不仅可以快速创建交互性的动态网页，而且程序代码完全保密，更重要的是不用考虑客户端用户使用何种浏览器，可以适用于各种浏览器。若使用客户端脚本编程(如：VBScript或JavaScript)，则须考虑用户所使用的浏览器。我们可以这样来理解ASP程序：

1．从以上两例可看出，ASP文件的扩展名为.asp，一个ASP文件通常由ASP脚本命令和HTML标记、文本组成，ASP命令必须用“<% %>”括起来（关于<% @LANGUAGE = VBScript %>，先不急于搞清楚，以后再谈）。

2．初学者要看懂ASP程序，只要一分为二即可（切不可搅在一起，稀里糊涂）。注意除掉<% %>括起来的代码后，就与你用过的.htm文件一样，你一看就懂。而<% %>括起来的部分在服务器端运行后，得到的输出结果就是你所熟悉的HTML代码。如Response.Write "<HTML><BODY>"得到的就是<HTML><BODY>，而<%=Request.ServerVariables("Remote_Addr")%>的运行结果即为IP地址，如wuf2.asp输出后实际上如同下面：

<html>

<body>

IP address = 16.62.5.60

</body>

</html>

你可以通过选择IE中“查看”菜单下的“源文件”来加深理解。

四、磨刀不误砍柴工——ASP基础

1．将结果（字符串信息）输出到浏览器，语法为：Response.Write 显示的内容。从例wuf2.asp可以看出，可以用“<%=显示的内容%>”来代替“<%Response.write 显示的内容%>”。

2．使用变量，wuf2.asp可改为：

<% @LANGUAGE = VBScript %>

<% '单引号后加注释 – wuf3.asp

Option Explicit '要求变量声明,使用它可减少程序出错的可能,提高效率

Dim IPaddr '使用变量前最好先声明

Ipaddr = Request.ServerVariables("Remote_Addr")

<html>

<body>

IP address = <%=IPaddr%>

</body>

</html>

||||||3．在程序中使用函数：

<%@ Language=VBScript %>

<%Response.Expires = 0%>

<HTML>

<HEAD>

</HEAD>

<BODY>

<P>今天的日期: <% = Date%></P>

<P>现在的时间: <% = Time%></P>

<P>现在的时间: <font color="#CC0033"><% = Time%></font></P>

<%Response.Write "<P>现在的时间: <font color='#CC0033'>" & Time & "</font></P>"%>

</BODY>

</HTML>

上例中，“&”相当于“+”号，Date和Time就是函数（注意：这里所获得的时间是Web服务器的时间，而不是浏览器所在机器的时间，从这里可验证ASP命令是在服务器端执行的），ASP还有许多其他的函数，本文不可能一一列举，请自己查阅。

至于<%Response.Expires = 0%>，我们知道，浏览器可以缓存Web页，以加速访问，而Response.Expires就是用来设置网页保留在客户端浏览器缓存中的时间（分钟）。若设置为0，则表明网页数据不会被保留在客户端的缓存中。它必须放置在<HTML>标签之前。具体到这个例子中，如果没有这个设置，你只有按“刷新”按钮，时间才会更新，而仅在地址栏敲回车，时间是不会变化的，而加上这句设置后，每敲一次回车，时间就会更新一次。

4．使用条件语句：

<%@ Language=VBScript %>

<% 'wuf5.asp

If Time<=#12:00:00# Then

Response.Redirect "wuf1.asp"

ElseIf time<=#18:00:00# Then

Response.Redirect "wuf2.asp"

Else

Response.Redirect "wuf3.asp"

End If

日期用##引起来，Response.Redirect负责引导客户端浏览器显示新的网页，即通常说的重定向，请记住，这个功能是非常有用的。

5．使用循环语句：

<%@ Language=VBScript %>

<%Option Explicit%>

<HTML>

<BODY>

dim I

While I<=5

Response.Write "<P>" & "还有其他循环结构,如:Do...Loop While, " &_

"Do While...Loop, For...Next,For Each...Next等" & "</P>"

I=I+1

Wend

</BODY>

</HTML>

从上例中，你应该注意如何使用“_”换行。

6．使用include file。对于一个Web站点而言，一般每个页面的顶部或尾部基本上都是相同的，那么你可以将这些相同的部分放一个文件中，然后再在需要时引用它。先如下编辑一个名为comm.asp的文件：

<html>

<head>

<!--

font { font-family: "宋体", "Times New Roman"; font-size: 9pt}

-->

</style>

</head>

<body>

<td align="center" height="18" colspan="2"><font color="#FFFFFF">⊙

</td> </tr>

</table>

</body>

</html>

再编辑以下文件：

<% @LANGUAGE = VBScript %>

<HTML>

<BODY>

<% 'wuf7.asp

Response.Write "输出结果到浏览器."

</BODY>

</HTML>

include file可放在网页的任意位置，但必须位所有ASP代码块的外部。

此外，还有过程、函数、参数传递等概念，如果你以前未接触过的话，还是先放着为妙，先从总体上了解ASP，然后再逐步细化。