Asp 制作从入门到精通

Asp制作从入门到精通本文由646649703贡献第一课：创建一个简单的ASP页学习ASP页的最佳途径是动手编写自己的ASP页。创建ASP页其实很简单，只要使用文本编辑器将脚本命令插入到HTML页中就行了。将这个主页以.asp为文件扩展名保存，ASP服务器就知道处理其中的脚本命令了。若要查看脚本的结果，只要使用HTTP协议在Web浏览器中请求查看该页就行了。也就是键入http://localhost/iishelp/iis/htm/tutorial/filename.asp。在本课中，您将创建流行的“HelloWorld!”脚本，方法是从教程中将HTML和ASP脚本命令复制到文本编辑器中。当您在文本编辑器中保存文件后，就能用浏览器查看脚本的输出效果了。下面的HTML创建一个简单的主页，其中只有以大字体显示的文字“HelloWorld!”:〈HTML〉〈BODY〉〈FONTSIZE=7〉HelloWorld!〈BR〉〈/FONT〉〈/BODY〉〈/HTML〉如果您想将这段文字重复几次，并且每次字体越来越大。一种方法是重复字体标记和HTML文本，每次重复分别给出不同的字体大小。当浏览器打开这个HTML页的时候，这行文字将被显示好几次。另一种方法是，使用ASP来生成相同的内容，不过方式将更加灵活。创建并保存主页启动文本编辑器（如“记事本”）或字处理软件（如Microsoft?Word）。在屏幕上调整一下编辑器窗口和浏览器窗口，以便能够同时看到它们。将下列HTML标记复制并粘贴到文件的开头：〈%@LANGUAGE="VBScript"%〉〈HTML〉〈BODY〉注意第一个标记是一个特殊的ASP标记，用来将您的默认脚本语言设置为VBScript。一定要将该标记添加到您所有.asp文件的第一行。将文件以Hello.asp保存到localhostWeb服务器的Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)中。如果您使用的是字处理软件（包括“写字板”），请确保以纯文本方式保存该文件。ASP页必须以.asp作后缀才能正常工作。如果在此之前，另一个用户已经创建了Hello.asp文件并且学完了教程的这一部分，您就可以覆盖旧的Hello.asp文件了。在〈BODY〉标记后另起新行，将下列脚本命令复制并粘贴过去：〈%Fori=3To7%〉脚本命令用〈%和%〉符号括起来，这两个符号通常叫做起止符)。起止符中的文字将作为脚本命令处理。右侧起止符以后的任何文字都将作为HTML文本显示在浏览器中。上面这段脚本命令开始了一个VBScript循环，用于控制显示“HelloWorld”的次数。循环的第一次，计数器变量(i)被设置为3。循环的第二次，计数器被设置为4。循环将继续下去，直到计数器大于7为止。按下回车键，然后复制并粘贴下列行:〈FONTSIZE=〈%=i%〉〉在每次循环中，字体大小都设置为计数器变量(i)的当前值。因此，文字第一次显示的时候，字体大小是3。第二次，字体大小是4。最后一次，字体大小是7。注意脚本命令是可以包含在HTML标记中的。按下回车键，然后复制并粘贴下列行:HelloWorld!〈BR〉〈/FONT〉〈%Next%〉〈/BODY〉〈/HTML〉VBScript的Next命令重复循环，直到计数器大于7为止。完整的Hello.asp文件还必须包含以下文字:〈%@LANGUAGE="VBScript"%〉〈HTML〉〈BODY〉〈%Fori=3To7%〉〈FONTSIZE=〈%=i%〉〉HelloWorld!〈BR〉〈/FONT〉〈%Next%〉〈/BODY〉〈/HTML〉保存文件。注意要以纯文本格式保存，并且文件名后缀必须是.asp。在某些文本编辑器中，当您在“保存”对话框中选择“纯文本”格式时，编辑器会自动将文件名后缀更改为.txt。如果出现了这种情况，需要先将.txt后缀改为.asp，然后再单击“保存”按钮。退出文本编辑器。因为当HTML页被文本编辑器打开时，浏览器可能无法再访问它。若要查看您的工作成果，请将您的浏览器导向http://localhost/iishelp/iis/htm/tutorial/hello.asp。（此后若要返回本教程，只要在浏览器中单击“上一页”或“Back”按钮即可。）您将看到一个主页显示了5次“HelloWorld”，每次的字体都越来越大。祝贺您！您已经完成了您的第一个ASP主页。正象您已经学过的内容一样，创建ASP主页的过程就是如此简单。您可以使用任何文本编辑器来创建HTML内容，将ASP脚本命令写在〈%和%〉起止符之间，然后将文件以.asp后缀名保存。若要测试ASP页并看一看结果，只要在浏览器中请求该主页即可（若该主页已经被打开，只要刷新即可）。第二课:创建HTML表格Intranet和Internet服务器应用程序的一个常用功能，是处理浏览器提交的表格。以前，您需要编一个程序来处理表格提交的数据。有了ASP，您可以将VBScript脚本直接嵌入到HTML文件中来处理表格。ASP服务器将处理脚本命令并将结果返回给浏览器。在本课中，您将创建一个ASP主页，用来处理用户通过HTML表格提交的数据。若要查看.asp文件是如何工作的，请首先填写下面的表格。使用Tab键可以在表格中移动。然后单击提交按钮，将您的数据发送到Web服务器并交给ASP处理。表格样本请提供下列信息，然后单击“提交”：名字：姓氏：称呼：先生女士创建表格我们已经创建了一个表格来询问用户信息，您可以在Tutorial目录(/iishelp/iis/htm/tutorial)下的Form.htm文件中找到它：〈HTML〉〈HEAD〉〈TITLE〉Order〈/TITLE〉〈/HEAD〉〈BODY〉〈H2〉示范订购表格〈/H2〉〈P〉请提供以下信息，然后单击“提交”:〈FORMMETHOD="POST"ACTION="response.asp"〉〈P〉姓氏:〈INPUTNAME="lname"SIZE="48"〉〈P〉名称:〈INPUTNAME="fname"SIZE="48"〉〈P〉称谓:〈INPUTNAME="title"TYPE=RADIOVALUE="mr"〉先生〈INPUTNAME="title"TYPE=RADIOVALUE="ms"〉女士〈P〉〈INPUTTYPE=SUBMITVALUE="提交"〉〈INPUTTYPE=RESETVALUE="重置"〉〈/FORM〉〈/BODY〉〈/HTML〉象所有HTML表格一样，这个表格将数据按变量和数值成对发送到Web服务器。例如，用户在“名”文字框中键入的内容将赋值给变量“fname”。ASP提供内建的对象，您能够使用这些对象来访问表格提供的变量的名称和数值。创建ASP响应页现在要学习的内容是如何处理Web服务器从HTML表格收到的数据。在本课中，我们已经创建了一个.asp文件Response.asp，它将处理并显示从Form.asp收到的数据，不过需要您添加一些额外的脚本命令才行。使用您的文本编辑器，打开localhostWeb服务器Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)下的Response.asp文件。查找文字“DefineScriptingLanguage”，将以下脚本复制并粘贴到这一行下面:〈%@LANGUAGE="VBScript"%〉请记住将这个标记作为第一行脚本添加到您的.asp文件中，这样Web服务器才知道您的脚本是用哪种语言编写的。现在查找文字“TutorialLesson”，将以下脚本复制并粘贴到找到的行后面：〈%Title=Request.Form("title")如果在此以前，另一个用户已经学完了教程的这一部分，那么此脚本命令就已经在“TutorialLesson”命令行下了。用复制的脚本覆盖已有的脚本，或者将未使用过的Response.asp从Template目录复制到Tutorial目录中。您的表格向ASP提交了3个不同的变量或值：fnamelnametitleASP将HTML表格提供的信息存储在Request对象的Forms集合中。若要进一步学习表格和对象的知识，请参阅使用HTML表格和内建的ASP对象。若要从Request对象获取信息，您只需键入：Request.集合名称(或属性名称)。所以，Request.Form("title")将得到mr或ms，依用户提交的值而定。复制以下脚本，并粘贴到第2步中插入的行之后：LastName=Request.Form("lname")IfTitle="mr"Then%〉〈%=LastName%〉先生〈%ElseIfTitle="ms"Then%〉〈%=LastName%〉女士如果在此以前，另一个用户已经学完了教程的这一部分，那么这些脚本就已经存在了。用复制的脚本覆盖已有的脚本，或者将未使用过的Response.asp从Template目录(C:\WINNT\Help\iis\htm\tutorial\template)复制到Tutorial目录中。VBScript语句If……Then..Else语句将依据“称谓”的值执行3种不同的操作。如果称谓是mr，将称用户为“先生”。如果称谓是ms，将称用户为“女士”。否则，将称用户的全名。使用表达式〈%=变量名%〉可以显示变量的值。如果需要当用户没有选择称谓时显示全名，请将以下脚本复制并粘贴到在第3步插入的行之后：〈%Else%〉〈%=LastName&Request.Form("fname")%〉〈%EndIf%〉再说一遍，如果在此以前，另一个用户已经学完了教程的这一部分，则这些脚本就已经存在了。请用复制的脚本覆盖已有的脚本，或者将未使用过的Response.asp从Template目录(C:\WINNT\Help\iis\htm\tutorial\template)复制到Tutorial目录中。其中的“并”号(&)将变量的值合并到一个字符串中。最后的EndIf语句表明条件语句结束了。保存文件Response.asp并退出文本编辑器。注意文件后缀.asp不要被文本编辑器替换。若要验证您创建的表格是否正常运行，请将您的浏览器导向http://localhost/iishelp/iis/htm/tutorial/form.htm。（此后若要返回本教程，只要在浏览器中单击“上一页”或“Back”按钮即可。）祝贺您！您的第一个能将结果发送到.asp文件的HTML表格已经运行了。若要学习ActiveX服务器组件，请转到模块2：使用ActiveX组件。模块2：使用ActiveX组件请选择本课的脚本语言。ActiveX服务器组件增强了脚本语言的功能，它提供简洁、可重用和安全的方法来访问信息。例如，ASP的DatabaseAccess（数据库访问）组件，使得脚本可以查询数据库。因此，无论何时要从脚本查询数据库，您都可以使用DatabaseAccess组件，而不必编写复杂的脚本。您还能从任何脚本或支持Automation的编程语言来调用这些组件（ActiveX服务器组件就是Automation服务器）。在本模块中，您将使用插入到ASP中的ActiveX组件，来运行一个示范Web节点。现在，您通常应该具备了编写.asp文件的基本知识。如果您还不具有，请首先学完本教程的“模块1”。要点要保存并查看您在本模块中的工作结果，必须在localhostWeb服务器上对/iishelp/iis/htm/Tutorial虚拟目录具有“写(Write)”和“改编Web服务器(ScriptWebserver)”权限，当然必须已经安装了ActiveServerPages。第二课演示了一个动态HTML脚本小程序。这个脚本小程序显示了一系列交替显示的广告图像，每幅图像之间都动态过渡。若要运行这个脚本小程序并查看效果，您必须使用InternetExplorer4.0或更高版本。关于InternetExplorer的详细信息，请访问Microsoft的Web节点。第一课：使用AdRotator（广告轮换器）组件InternetWeb节点通常提供广告空间。要让节点看起来有趣，并且要在有限的空间内显示好几个客户的广告，您也许希望循环显示不同的广告。AdRotator组件简化了按顺序显示每幅广告的任务，并且让添加新广告的工作变得更轻松。另外，您能够轻松地添加或更改广告的超级链接，这样用户就可以通过单击广告来访问广告客户的Web节点。在本课中，您将创建一个脚本，通过调用AdRotator组件来轮换4个随机选择的广告。单击下面的“演示(ShowMe)”按钮，可以看到一个示例广告，然后再次单击该按钮，轮换到另一个广告。创建广告文件我们已经为一项虚构的业务创建了一个Web页，名叫“BayshoreTravel”，您将在该页中插入广告轮换脚本。您可以创建一个简单的文本文件来告诉AdRotator组件要插入哪些广告以及每个广告显示时间的百分比。我们已经为您创建了一个包含广告的文件。要查看它，请用文本编辑器打开localhostWeb服务器上Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)中的Adrot.txt文件。文件第一行设置的脚本文件（此处是Redirect.asp）将在用户单击广告时被调用。通过修改Redirect.asp文件，可以在链接到广告客户的Web节点之前执行指定的操作，比如追踪广告受欢迎的程度。后面3行规定了广告图像的宽、高和边框。redirect/iishelp/iis/htm/tutorial/redirect.aspwidth180height180border1接下来，文件包含了广告数据。对每一个广告，都包括使用的图像、用户单击时转向的URL（此处是调用Redirect.asp之后）、图像的说明文字以及广告显示时间的百分比：/iishelp/iis/htm/tutorial/nyc.jpgBigDealsintheBigApple35通过在分离的文件中维护广告信息，您单位中的不同小组就能够更新Adrot.txt文件，而不用您来更新ASP页。不同的小组能够维护节点中不同部分的广告文件。创建脚本用文本编辑器打开localhostWeb服务器上Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)中的Bayshore.asp文件。在Bayshore.asp文件的开头，在任何HTML标记或ASP语句之前，粘贴以下脚本：〈%@LANGUAGE="VBScript"%〉此脚本是一个ASP指令语句，告诉Web服务器您的脚本是用VBScript编写的。这个指令语句必须位于ASP文件的第一行。查找文字“TutorialLesson:AdRotator.”，您的脚本将插入到这一行之后。下列脚本命令创建一个AdRotator组件实例，然后将其赋值给变量Ad。请将下列脚本命令复制并粘贴到文本编辑器中（在上一步找到的文字行之下）：〈%SetAd=Server.CreateObject("MSWC.Adrotator")%〉将一个组件实例赋值给一个变量，这样就能在随后的脚本中引用这个组件。如果在此以前，另一个用户已经学完了教程的这一部分，那么此脚本命令就已经存在了。请用复制的脚本覆盖已有的脚本，或者将未使用过的Bayshore.asp从Template目录(C:\WINNT\Help\iis\htm\tutorial\template)复制到Tutorial目录中。若要显示新广告，可以使用AdRotator组件的GetAdvertisement方法。将以下命令添加到您的脚本中：〈%=Ad.GetAdvertisement("adrot2.txt")%〉GetAdvertisement方法需要一个参数，就是包含广告信息的文件的名称。该名称可以与Adrot.txt不同，此处是Adrot2.txt。以该参数为基础，此方法返回一个全格式的HTML〈IMG〉标记，其中包含适当的广告。您赋予AdRotator组件实例的变量名Ad在前，然后是GetAdvertisement方法，最后是文件路径Adrot2.txt。等号将方法返回的值（真正的广告）发送给用户的浏览器。以纯文本格式保存文件Bayshore.asp，然后退出文本编辑器。注意文件后缀.asp不要被文本编辑器替换。若要验证您创建的ASP页是否正常运行，请将您的浏览器导向http://localhost/IISHelp/IIS/Help/Htm/Tutorial/Bayshore.asp。（此后若要返回本教程，只要在浏览器中单击“上一页”或“Back”按钮即可。）第二课：使用BrowserCapabilities（浏览器性能）组件并不是所有浏览器都支持现今Internet技术的方方面面。有一些特性，某些浏览器支持而另一些浏览器却不支持，ActiveX控件、影像流、动态HTML以及脚本小程序就是这样的。使用ASP的BrowserCapabilities组件，就能够设计“智能”的Web页，以适合浏览器性能的格式呈现内容。例如，可以设计一个Web页，使用BrowserCapabilities组件来检测用户的浏览器是否支持您的主页上由ActiveX驱动的徽标，并且如果浏览器不支持，可以在替代的表格中显示该徽标（如静态图像）。在本课中，您将扩展在第一课中创建的AdRotator脚本，包含激活脚本小程序的脚本。脚本小程序是一些简单的Web页，其中包含了脚本和HTML，Web编撰人员可以将它创建为可重用的客户端对象。若要在Web页中包含脚本小程序，只需要插入一个HTML〈OBJECT〉标记，其中包含脚本小程序的类型和位置信息。在本课中，您要插入AdRotator脚本中的脚本小程序，使用了“动态HTML(DHTML)”来创建一个激动人心的广告轮换器，它的每一幅图像之间都进行动态过渡。目前，只有MicrosoftInternetExplorer4.0或更高版本才支持脚本小程序和一定的DHTML特性。这就意味着，您的AdRotator脚本必须能够检测浏览器类型：如果浏览器是InternetExplorer4.0或更高版本，用户将能够看到一组连续出现的广告，并且有变化的动态过渡。如果浏览器不是InternetExplorer4.0或更高版本，每当用户刷新Web页时都将看到交替显示的静态广告（它们由AdRotator组件生成）。单击“演示”按钮，可以看到一个由脚本小程序方式生成的DHTML广告轮换器示例。（如果您的浏览器不是MicrosoftInternetExplorer4.0或更高版本，您将看到与第一课相同的静态广告。）创建脚本要点开始本课以前，您必须学完第一课。启动文本编辑器并打开Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)中的Bayshore.asp文件。查找文字“TutorialLesson:StartBrowserCapabilities.”，您的脚本将插到这一行之后。下列脚本命令创建一个BrowserCapabilities组件的实例，并且将它赋值给变量objBrowser。请将这些脚本命令复制并粘贴到Bayshore.asp文件中：〈%SetobjBrowser=Server.CreateObject("MSWC.BrowserType")%〉如果在此以前，另一个用户已经学完了教程的这一部分内容，那么这些脚本就已经存在了。用复制的脚本覆盖已有的脚本，或者将未使用过的Bayshore.asp从Template子目录(C:\WINNT\Help\iis\htm\tutorial\template)复制到Tutorial目录中。使用VBScript的If……Then……Else语句来检测用户的浏览器是不是InternetExplorer4.0或更高版本。如果是，将使用脚本小程序；如果不是，则不支持脚本小程序，就使用服务器端的AdRotator组件。要完成该逻辑判断功能，请将下列脚本复制并粘贴到第2步插入的〈%SetobjBrowser……%〉语句之后：〈%IfobjBrowser.browser="IE"andobjBrowser.majorver〉=4Then%〉〈OBJECTID="scriptlet"STYLE="position:relative;height:200;width:200"TYPE="text/x-scriptlet"DATA="..\tutorial\rotate5.htm"〉〈/OBJECT〉〈%Else%〉如果在此以前，另一个用户已经学完了教程的这一部分，那么这些脚本就已经存在了。请用复制的脚本覆盖已有的脚本，或者将未使用过的Bayshore.asp从Template子目录(C:\WINNT\Help\iis\htm\tutorial\template)复制到Tutorial目录中。BrowserCapabilities组件的browser和majorver属性可以检测用户的浏览器是不是InternetExplorer4.0或更高版本。使用HTML〈OBJECT〉标记可以将脚本小程序插入到Web页中。这个标记的属性指定了脚本小程序的类型(x-scriptlet)、位置和大小。真正的脚本小程序源文件名叫Rotate5.htm。如果您感兴趣，可以在Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)中找到它。您可以用“记事本”或任何HTML编辑工具来打开它。查找文字“TutorialLesson-EndBrowserCapabilities.”，将以下脚本命令复制并粘贴到找到的文字行之后，以结束If……Then……Else语句：〈%EndIf%〉如果在此以前，另一个用户已经学完了教程的这一部分，那么这些脚本命令就已经存在了。请用复制的脚本覆盖已有的脚本，或者将未使用过的Bayshore.asp从Template子目录(C:\WINNT\Help\iis\htm\tutorial\template)复制到Tutorial目录中。以纯文本格式保存Bayshore.asp文件，并且退出文本编辑器。注意文件后缀.asp不要被文本编辑器替换。若要验证您创建的ASP页是否正常运行，请将您的浏览器导向http://localhost/IISHelp/IIS/Help/Htm/Tutorial/Bayshore.asp。（此后若要返回本教程，只要在浏览器中单击“上一页”或“Back”按钮即可。）注意Browscap.ini文件（默认情况下位于Winnt\System32\Inetsrv）包含了必需的数据，BrowserCapabilities组件用该文件识别浏览器及其性能。当新浏览器开发出来后，需要将新数据添加到该文件中。如果正使用的浏览器独有特性没有列在默认的Browscap.ini文件中，也需要将新数据添加进去。第三课：使用DatabaseAccess（数据库访问）组件ASP的DatabaseAccess组件使用ActiveXDataObjects(ADO)提供一种轻而易举的方法，可以访问存储在数据库或其他表格式数据结构（如电子表格）中的信息，只要它们遵循OpenDatabaseConnectivity(ODBC)标准即可。在本课中，您将连接到一个Microsoft?Access客户数据库，并且显示目录列表。您将学习如何使用SQLSELECT语句来检索数据，并且创建一个HTML表格来显示结果。识别数据库在通过DatabaseAccess组件使用一个数据库之前，必须在“控制面板”的ODBC程序中识别这个数据库。在本例中，您将使用本教程提供的一个Microsoft?Access数据库。在运行Web服务器(localhost)的计算机上，打开“控制面板”。双击“ODBC”图标，然后单击“系统DSN”选项卡。DSN将告诉数据库驱动程序（用来配置数据库并与其通讯的程序）数据库文件所在的位置。您可以创建3种类型的DSN:用户DSN(UserDSN)，只能对您起作用；系统DSN(SystemDSN)，可以对计算机的所有用户起作用；文件DSN(FileDSN)，将DSN信息保存为文件，并且允许所有用户使用相同的数据库驱动程序。本教程使用的DSN必须是系统DSN(SystemDSN)。单击“添加”，选择“MicrosoftAccess驱动程序”，然后单击“完成”。在“数据源名称”框中，键入ASPTutorial，然后单击“选择”。选择BTCustmr.mdb文件（默认情况下位于WINNT\Help\IIS\Htm\Tutorial目录中），然后单击“确定”。单击“确定”关闭对话框。创建组件实例用文本编辑器打开localhostWeb服务器上Tutorial目录(C:\WINNT\Help\iis\htm\tutorial)中的Database.asp文件。查找文字“DefineScriptingLanguage”，将下列脚本插入找到的文字行之后：〈%@LANGUAGE="VBScript"%〉必须保证这个标记是所有.asp文件的第一个脚本行。查找文字“TutorialLesson-ADOConnection”，脚本将插入到找到的文字行之后。必须先创建一个对象的实例，然后才能使用它。请复制并粘贴以下脚本命令：〈%SetobjConnection=Server.CreateObject("ADODB.Connection")如果在此以前，另一个用户已经学完了教程的这一部分，那么这些脚本命令就已经在“TutorialLesson”注释行以下了。请用复制的脚本覆盖已有的脚本，或者将未使用过的Database.asp从Template子目录(C:\WINNT\Help\iis\htm\tutorial/template)复制到Tutorial目录中。对于DatabaseAccess组件来说，您必须指定ODBC数据源（要从其中检索数据的数据库），方法是打开一个到数据库的连接。复制并粘贴以下脚本命令：objConnection.Open"ASPTutorial"使用DatabaseAccess组件的Execute方法，可以向数据库发送一个将结构化查询语言(StructuredQueryLanguage,SQL)的SELECT命令，并且将返回的记录保存到结果集合(rsCustomersList)中。请将下列脚本命令复制并粘贴到objConnection.Open语句之后：SQLQuery="SELECT*FROMCustomers"SetrsCustomersList=objConnection.Execute(SQLQuery)%〉如果将SQL查询字符串直接传递给Execute方法，而不是先给变量SQLQuery赋值，就可以将这两行合并。当SQLSELECT行比较长时，为使脚本易读一些，可以将字符串赋值给一个变量（如SQLQuery），然后将变量名传递给Execute方法。显示返回的结果集合您可以将结果集合视为一个表格，这个表格的结构由SQLSELECT语句中的字段决定。显示检索返回的行，就象在结果集合中按行数执行循环一样简单。在本示例中，返回的数据显示在HTML表格行中。在Database.asp文件中，查找文字“TutorialLesson-DisplayADOData”，将以下脚本复制并粘贴到找到的行之后：〈%DoUntilrsCustomersList.EOF%〉〈tr〉〈tdbgcolor="f7efde"align=center〉〈%=rsCustomersList("ContactFirstName")%〉〈%=rsCustomersList("ContactLastName")%〉〈/td〉〈tdbgcolor="f7efde"align=center〉〈ahref="mailto:〈%=rsCustomersList("ContactLastName")%〉"〉〈%=rsCustomersList("ContactLastName")%〉〈/a〉〈/td〉〈tdbgcolor="f7efde"align=center〉〈%=rsCustomersList("City")%〉〈/td〉〈tdbgcolor="f7efde"align=center〉〈%=rsCustomersList("StateOrProvince")%〉〈/td〉〈/tr〉如果在此以前，另一个用户已经学完了教程的这一部分，那么这些脚本命令就已经存在了。用复制的脚本覆盖已有的脚本，或者将未使用过的Bayshore.asp从Template目录复制到Tutorial目录中。当条件为“真”时，VBScriptDo……Loop语句重复执行一段语句。被重复执行的语句可以是脚本命令或HTML文本和标记。因此，在循环的每次重复中，您都可以用HTML画出表格行，并且用脚本命令插入返回的数据。要完成循环，还要使用MoveNext方法来移动行指针到下一行。因为这一语句仍然在Do……Loop语句中，所以它一直重复，直到到达文件结尾才停止。请复制以下脚本，并将其粘贴到“TutorialLesson-RetrieveNextRow”行之后：〈%rsCustomersList.MoveNextLoop%〉以纯文本格式保存Database.asp文件，并且退出文本编辑器。注意文件后缀.asp不要被文本编辑器替换。若要验证您创建的ASP页是否正常运行，请将您的浏览器导向http://localhost/IISHelp/IIS/Help/Htm/Tutorial/Database.asp。（此后若要返回本教程，只要在浏览器中单击“上一页”或“Back”按钮即可。）自学参考如果您正使用WindowsNT，要参阅更完整的DatabaseAccess组件示例，可以访问ExplorationAir示范节点。单击BehindtheScenes图像，可以学习用来创建这个Web节点的脚本的更多知识。在BayshoreTravelWeb页上也有指向ExplorationAir示范节点的链接。注意如果您还没有访问ExplorationAir示范节点，上面的链接将把您带到ExplorationAir主页。此后若要返回本教程，只要在浏览器中单击“上一页”或“Back”按钮即可。现在，您已经用过了ActiveX组件，让我们来学习模块3：编写自己的组件。模块3：编写自己的组件请选择本课的脚本语言。在模块2中，您已经熟悉了ASP提供的组件，现在该创建自己的组件来满足自己的特殊需要了。假设您需要创建一个ASP程序，以便通过Web节点提供特定的财务功能。ASP没有直接提供这样的功能，不过您可以通过创建自己的Java或ActiveX组件来解决问题。您将在本模块中学会这些。如果要学习如何创建并使用组件，首先使用下面的表格进行选择:选择本课要创建的组件类型：VisualBasic5.0ActiveX组件VisualJ++1.1Java?组件要点若要保存并查看您在本模块中的工作结果，需要：对localhostWeb服务器上的/iishelp/iis/htm/tutorial虚拟目录具有“写(Write)”和“改编Web服务器(ScriptWebserver)”权限。详细信息，请参阅设置Web服务器权限。您的WindowsNT帐号，必须在DriveLetter:\Winnt\System32\Inetsrv\目录及其子目录上具有WindowsNTFileSystem(NTFS)的读、写和运行程序权限（此处的DriveLetter代表localhostWeb服务器的适当的驱动器号，如果您没有安装到默认目录下，请用您的安装目录代替\Winnt\System32）。要完成本模块，必须在localhostWeb服务器上安装：Microsoft?VisualBasic5.0专业版的32位版本或VisualBasic5.0企业版开发系统。如果已经禁止了Web浏览器运行Java程序功能，请在开始教程以前启用该功能第一课：创建ActiveX财务组件组件将包含一组相关的方法（函数），用来提供脚本语言所不具有的功能。由于VBScript不提供财务函数，所以您必须通过自己的Finance服务器组件来提供对VisualBasic财务函数的使用能力。该服务器组件能提供所有的VisualBasic财务函数，包括DDB函数（双倍余额递减法）、FV函数（未来值）、IPmt函数（支付利息）、IRR函数（内部回报率）以及其他函数。不过，在本教程中，您将只使用FV函数，基于固定利率及等额定期支付方式，返回一笔年金。启动VisualBasic单击“开始”按钮，指向“程序”，然后指向“MicrosoftVisualBasic5.0”单击子菜单中的“VisualBasic5.0”，运行编程环境。开始并命名一个工程在“NewProject”对话框中，双击“ActiveXDLL”。在“Project”菜单上，单击“Project1Properties”。在“General”属性页的“ProjectName”框中，键入“MS”。选择“UnattendedExecution”。注意选择该选项表明这个工程运行时不需要用户交互，并且将不具有用户交互的基础。单击“OK”。现在工程被命名为“MS”。以后，您将从ASP脚本中以MS.Finance的形式引用Finance服务器组件。将FinanceClass添加到工程中在VisualBasic中，若要创建具有一组可以调用的函数组件，必须定义一个类。一个类包含一组方法和属性。在您的工程中，类就是您说明财务方法的地方。按下F4键打开类模块的“Properties”窗口，双击“Name”属性并键入“Function”，然后按Enter。双击“Instancing”。单击箭头，然后选择“5-MultiUse”。进一步学习VisualBasic财务函数VisualBasic的帮助系统描述了可以使用的财务函数。单击“Help”。选择“MicrosoftVisualBasicHelpTopics”。选择“Index”选项卡，然后键入“financialfunctions”作为查找的文字。双击“financialfunctions”索引条。单击“FVFunction”，学习该函数。学习完财务函数后，关闭“VisualBasicHelp”对话框。将CalcFV函数添加到Finance类Finance服务器组件需要一些代码。这些代码让使用您组件的语言可以调用VisualBasic内建的未来值函数。将下列行复制并粘贴到Finance类的代码窗口中：PublicFunctionCalcFV(rate,nper,pmt,Optionalpv,Optionalwhendue)CalcFV=FV(rate,nper,pmt,pv,whendue)EndFunction添加组件的入口点所有服务器组件都需要一个入口（起始）点。这是当对象第一次可用于一种语言时，将被调用的代码。在VBScript中，当您使用Server.CreateObject时，将创建对象的一个实例。当执行Server.CreateObject语句时，（由VisualBasic创建的）服务器组件上的SubMain过程将被调用。当您的财务组件被调用时，它不需要任何特殊代码来初始化自身。因此，需要提供一个空的（没有VisualBasic语句的）SubMain过程。选择“Project”菜单中的“AddModule”。在“Module1”对话框中，双击模块图标。在Module1代码窗口中，键入SubMain。按下Enter键。将自动进入如下代码：SubMain()EndSub保存Finance工程当保存所作的工作时，将询问您是否保存VisualBasic工程的全部3部分。其中包括工程文件、类模块和代码模块。打开“File”菜单。选择“SaveProject”。在“Filename”文本框中，键入“Finance”。选择localhostWeb服务器上的如下路径：DriveLetter:\Winnt\System32\Inetsrv\，其中DriveLetter是适当的驱动器号。（如果您没有接受默认的安装目录，请用您的安装目录替换\Winnt\System32。）单击“Save”按钮。如果在此以前，另一个用户已经学完了教程的这一部分，将出现一条消息，提示文件已经存在。请用您的文件覆盖旧文件。双击“Filename”文本框中的值“Project1”，选中它。为工程文件键入名称“Finance”(.vbp)。单击“Save”按钮保存工程。如果在此以前，另一个用户已经学完了教程的这一部分，将出现一条消信息，提示文件已经存在。请用您的文件覆盖旧文件。