使用数据库成分

数据库成分使用Active Data objects(ADO)是你可以通过ODBC给

页面添加访问数据库的能力。在本课中，你可以将一个Access数

据库建立连接并将其中所有的内容显示出来。你将学到如何使用

SQL查询语言显示数据并用html的表格显示。

初始ODBC

在使用数据库成分之前，你必须在控制面版内对数据库ODBC初始

化。在本课中，你将用Access的数据库。

1 在你运行Web Server的计算机上，选择控制面版

2 双击odbc图标，并选择system dsn.

在这里有两个数据来源，

User:仅仅对于你是有效的

System:使任何一个使用该机器的人都可以使用。在WEB数据库

中，我们要选择system.

3 单击添加，选择access Driver,再选择结束。

4 在Data source Name对话框中，输入AWTutorial，选择Select.

请选择你的数据库所在的路径。

5 选择OK，关闭对话框。

建立成分实例：

1 请用你的文本编辑器打开Database.asp，这是教程自带的文件。

如果你没有安装Asp，请在这里下载Database.asp

2 查找字符串"Tutorial Lesson-ADO connection"

3 请将下面的语句剪贴到程序内：

<%Set OBJdbConnection = Server.CreateObject("ADODB.Connection")

4 在数据库成分中，你还需要初始化你的ODBC数据库来源，这样

你就可以和数据库建立连接：

OBJdbConnection.Open "AWTutorial"

5 使用数据库成分的Execute方法可以提供SQL中的Select方法。

并且可以返回记录。

SQLQuery = "SELECT * FROM Customers"

Set RSCustomerList = OBJdbConnection.Execute(SQLQuery)

%>

显示返回的成果

你可以考虑用符合select语句中定义的字段组成表格来返回成果。

用的形式显示查询结果，可以预定义查询所返回的行。在本例中，

返回数据是用HTML的表格。

1 在Database.aps在"Turial Lesson-display ADO Data"后面剪

贴下面代码：

<% Do While Not RScustomerList.EOF %>

<TR>

<TD BGCOLOR="f7efde" ALIGN=CENTER>

<FONT STYLE="ARIAL NARROW" SIZE=1>

<%= RSCustomerList("CompanyName")%>

</FONT></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER>

<FONT STYLE="ARIAL NARROW" SIZE=1>

<%= RScustomerList("ContactLastName") & ", " %>

<%= RScustomerList("ContactFirstName") %>

</FONT></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER>

<FONT STYLE="ARIAL NARROW" SIZE=1>

<A HREF="mailto:">

<%= RScustomerList("ContactLastName")%>

</A></FONT></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER>

<FONT STYLE="ARIAL NARROW" SIZE=1>

<%= RScustomerList("City")%>

</FONT></TD>

<TD BGCOLOR="f7efde" ALIGN=CENTER>

<FONT STYLE="ARIAL NARROW" SIZE=1>

<%= RScustomerList("StateOrProvince")%>

</FONT></TD>

</TR>

Do..Loop结构在条件为真的时候返回一个元素块。返回的元素可

以是脚本命令或是Html标签。所以，在每次循环中，你定义了一

个table行（使用Html），并且插入了一个返回数据（用脚本命令）。

2 为了完成循环，请使用MoveNext。

<%

RScustomerList.MoveNext

Loop

%>