asp数据库连接函数
2018-09-06 11:57
  复制代码 代码如下:
******************************************** 
以下为数据库相关函数 
******************************************** 
============================================ 
初始化数据库连接对象 
使用原则:最迟调用,最早释放 
============================================ 
SubDBConnBegin() 
如果数据库对象已打开,不要再打开 
IfIsObject(oConn)=TrueThenExitSub 
你可以不需要打开数据库连接对象而直接打开记录集对象,但如果你需要打开多个记录集对象的话,效率是很低的。 
如果你不创建一个数据库连接对象,ADO会在每个记录集打开时自动创建一个新的数据库连接对象,就算你用的是相同的SQL语句。 
OnErrorResumeNext 
oConn.OpenProvider=Microsoft.Jet.OLEDB.4.0;DataSource=&Server.MapPath(db/lbedit.mdb) 
IfErr.Number>0Then 
显示错误信息,并且发送邮件通知管理员 
CallDBConnError(Err) 
完全地退出正在运行的脚本 
Response.End 
EndIf 
创建一个记录集 
SetoRs=Server.CreateObject(ADODB.Recordset) 
EndSub 
下一篇:Web代理(Asp版)