同 Webclass 一起使用数据库

您可以使用 Visual Basic 的 ADO 特性在响应用户请求时检索和操作保存在数据库中的信息。在这种方式下使用 webclass 可以帮助您创建一个功能强大的应用程序。通过 ADO，您可以打开一个到数据库的连接、创建记录集、检索数据和更新数据库中的信息。

注意如果您正在使用一个数据库，在您的 web 服务器上必须有合适的数据库程序。另外，当访问一个数据库时，应利用 ODBC 的连接池和 ADO 没有连接的记录集。关于这些特性的详细信息，请参阅 MSDN 库中的 ActiveX Data Objects 文档。

在应用程序中您可以通过多种方式使用数据库。例如，您可以创建一个应用程序，在该程序中一个目录的一系列图像被保存在一个数据库中。当 IIS 应用程序的用户从内容的目录表中选择一个连接时，webclass 能够截取这个连接、打开一个到数据库的连接、获取图像并将它返回到浏览器。或者您可以使用一个搜索页面在数据库中查询匹配的项目并在产生的表格中显示结果。

您可以使用合适的 webitem 的Respond 事件或其他事件来进行数据库的连接和处理。例如，下面的代码显示了如何打开一个连接到一个 ADO 数据库、创建一个记录集和从其中检索信息：

Private Sub AuthorList_Respond()

   '为数据库连接和记录集声明对象变量
   Dim cn As New ADODB.Connection
   Dim rs As New ADODB.Recordset

'打开数据库连接
cn.ConnectionString = "DSN=csmith;UID=sa;PWD=sa;DATABASE=pubs"cn.Open
'创建记录集。
Open "select * from customer", cn, adOpenStatic, adLockReadOnly

   '将结果信息逐个记录地写到一个表格
   With Response
      .Write "<HTML>"
      .Write "<BODY>"
      .Write "<TABLE BORDER CELLSPACING=1 CELLPADDING=7>"

      Do While rs.EOF = False
         .Write "<TR><TD>"
         .Write rs("authorlast") & ", " & rs("authorfirst")
         .Write "</TD><TD>"
         .Write rs("title")
         .Write "</TD><TD>"
         .Write rs("publisher")
         .Write "</TD><TR>"
         rs.MoveNext
      Loop
      .Write "</TABLE>"
      .Write "</BODY>"
      .Write "</HTML>"

   End With

   '关闭记录集和数据库连接
   rs.Close
   cn.Close
  
End Sub

详细信息 关于 ADO 处理的详细信息，请搜索 MSDN 库中的“ActiveX Data 对象”。