加入收藏 | 设为首页 | 会员中心 | 我要投稿 汽车网 (https://www.0577qiche.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

一种获取与 ASP 数据库进行交互的函数的方法

发布时间:2023-11-24 14:31:13 所属栏目:Asp教程 来源:
导读:复制代码 代码如下:
' ********************************************
' 以下为数据库相关函数
' ********************************************
' ==========================================
复制代码 代码如下:
' ********************************************
' 以下为数据库相关函数
' ********************************************
' ============================================
' 初始化数据库连接对象
' 使用原则:最迟调用,最早释放
' ============================================
Sub DBConnBegin()
 ' 如果数据库对象已打开,不要再打开
 If IsObject(oConn) = True Then Exit Sub

 ' 你可以不需要打开数据库连接对象而直接打开记录集对象,但如果你需要打开多个记录集对象的话,效率是很低的。
 ' 如果你不创建一个数据库连接对象,ADO会在每个记录集打开时自动创建一个新的数据库连接对象,就算你用的是相同的SQL语句。
 Set oConn = Server.CreateObject("ADODB.Connection")

 On Error Resume Next
 oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db/lbedit.mdb")

 If Err.Number > 0 Then
  ' 显示错误信息,并且发送邮件通知管理员
  'Call DBConnError(Err)

  ' 完全地退出正在运行的脚本
  Response.End
 End If

 ' 创建一个记录集
 Set oRs = Server.CreateObject( "ADODB.Recordset" )
End Sub

(编辑:汽车网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章