苏州阿里云代理商：asp教程第六课–

ASP中的对象与组件

在ASP中，对象与组件是非常重要的概念，因为这些是我们在构建ASP网站时需要调用的核心元素。

对象

在ASP中，对象通常是一个抽象的概念，表示一些特定的功能或数据。对象可以理解为有方法和属性的实体，在ASP中有许多预定义的对象。下面是一些常见的对象：

• Request：封装HTTP请求的对象，包含了所有通过HTTP协议传输到服务器的数据，如查询字符串和表单数据。
• Response：封装HTTP响应的对象，在ASP中用于输出网页内容。
• Server：用于对服务器的操作，包括文件操作、数据库连接等。
• Session：封装了一些状态信息，用于在多个页面之间共享数据。
• Application：封装了应用程序的信息，如应用程序的名称、路径等。

组件

组件是由程序员编写的代码，封装了一些特定的功能，如数据库连接、邮件发送、验证码生成等。组件可以用于复用代码，提高代码的可维护性和可重用性。

在ASP中，组件有两种类型，分别是服务器组件和客户端组件：

• 服务器组件：在服务器上运行的组件，可以与所有的ASP页面共享。通常是用COM技术开发的，必须在服务器上安装和注册。
• 客户端组件：在客户端浏览器上运行的组件，通常是用JavaScript或VBScript编写的，不需要安装。

组件的开发需要使用一些具体的开发工具和技术，如Visual Studio、COM、ActiveX等。在此不做详细介绍。

总结

在ASP中，对象和组件是构建一个Web应用程序的重要元素。对象通常是预定义的，用于封装一些常见的功能和数据；组件是由程序员编写的，用于封装一些特定功能，提高代码的可重用性和可维护性。了解和掌握这些概念，对于ASP的学习和开发非常重要。

数据库连接

在 ASP 中连接到数据库通常使用 ADO（ActiveX Data Objects）技术来完成，ADO 技术是 Microsoft 开发的与数据库通信的 COM 组件。

使用 ADO 连接数据库的步骤如下：

1.创建连接对象；

2.打开连接对象；

3.执行 SQL 语句；

4.关闭连接对象。

创建连接对象的代码如下：

<%
Dim conn ' 声明连接对象
Set conn = Server.CreateObject("ADODB.Connection") ' 创建连接对象
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/database/mysite.mdb") ' 打开连接
%>

代码说明：

1.声明了一个名为 conn 的变量，它是连接对象；

2.使用 Server.CreateObject 方法创建一个 ADODB.Connection 对象；

3.使用 conn.Open 方法打开连接，连接字符串中指定了数据库的物理路径。

执行 SQL 语句的代码如下：

<%
Dim rs ' 声明记录集对象
Set rs = Server.CreateObject("ADODB.Recordset") ' 创建记录集对象
rs.Open "select * from member where id = 1", conn ' 执行 SQL 语句并返回记录集
%>

代码说明：

1.声明了一个名为 rs 的变量，它是记录集对象；

2.使用 Server.CreateObject 方法创建一个 ADODB.Recordset 对象；

3.使用 rs.Open 方法执行 SQL 语句，并将连接对象 conn 作为参数传递给它，该语句将获取 id = 1 的 member 数据表记录并返回一个记录集。

关闭连接对象的代码如下：

<%
rs.Close ' 关闭记录集对象
Set rs = Nothing ' 销毁记录集对象
conn.Close ' 关闭连接对象
Set conn = Nothing ' 销毁连接对象
%>

代码说明：

1.使用 rs.Close 方法关闭记录集对象；

2.使用 Set rs = Nothing 语句将 rs 设置为空对象，相当于销毁了它；

3.使用 conn.Close 方法关闭连接对象；

4.使用 Set conn = Nothing 语句将 conn 设置为空对象，相当于销毁了它。

完整的代码示例如下：

<%
Dim conn, rs ' 声明连接对象和记录集对象
Set conn = Server.CreateObject("ADODB.Connection") ' 创建连接对象
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/database/mysite.mdb") ' 打开连接
Set rs = Server.CreateObject("ADODB.Recordset") ' 创建记录集对象
rs.Open "select * from member where id = 1", conn ' 执行 SQL 语句并返回记录集
If Not rs.EOF Then ' 如果记录集不为空
    Response.Write "用户名：" & rs("username") ' 输出用户名
    Response.Write "<br>密码：" & rs("password") ' 输出密码
End If
rs.Close ' 关闭记录集对象
Set rs = Nothing ' 销毁记录集对象
conn.Close ' 关闭连接对象
Set conn = Nothing ' 销毁连接对象
%>

代码说明：

1.使用 rs(“username”) 和 rs(“password”) 输出记录集中的 username 和 password 字段值；

2.使用 rs.EOF 判断记录集是否为空。

注意事项：

1.连接字符串中的 Data Source 参数指向的是物理路径，应该根据实际情况进行修改；

2.为了保证安全性，连接字符串中的用户名和密码应该使用加密字符串存储。