gpt4 book ai didi

ASP程序中使用断开的数据记录集的代码

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 25 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章ASP程序中使用断开的数据记录集的代码由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

因此为了节省服务器资源,应该尽可能关闭连接以释放连接所占有的资源,这种关闭记录集的连接而不关闭记录集的技术叫做断开记录集,这个记录集本身则称为断开的记录集。 下面我们就通过一个实例来说明这种技术的使用方法(NorthWind.mdb是Microsoft Access97自带的一个数据库,文件adovbs.inc可在C:\Program Files\Common Files\System\ADO下找到):  。

复制代码代码如下

<% @LANGUAGE = VBScript %>  <!--#include file="adovbs.inc"-->  <%   Response.Expires = 0   Dim Cnn,objRS, strOut, strQ, strC   StrC= "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\asp24") & "\NorthWind.mdb;"   '建立连接   Set Cnn = Server.CreateObject("ADODB.Connection")   Cnn.Open StrC   '创建Recordset对象   Set objRS = Server.CreateObject("ADODB.Recordset")   objRS.CursorLocation =adUseClient   objRS.CursorType = adOpenStatic   objRS.LockType = adLockOptimistic   strQ = "SELECT 运货商ID, 公司名称, 电话 FROM 运货商 "   objRS.Open strQ, Cnn, , , adCmdText   Set objRS.ActiveConnection = Nothing   '断开记录集   Cnn.Close                 '关闭连接   Set Cnn = Nothing   Response.Write "<HTML><BODY>"   '下面使用断开的记录集   Do While (Not objRS.EOF)    strOut = objRS("运货商ID") & ", " & objRS("公司名称") & ", " & objRS("电话")    Response.Write Server.HTMLEncode(strOut) & "<BR>"    objRS.MoveNext   Loop   Response.Write "<BR>准备新增或插入记录: "   '若需要更新数据库, 则要重新建立连接   Set Cnn = Server.CreateObject("ADODB.Connection")   Cnn.Open strC   Set objRS.ActiveConnection = Cnn   objRS.Filter = "公司名称 = '吴丰'"   If objRS.EOF Then    objRS.AddNew    objRS("公司名称") = "吴丰"    objRS("电话") = "571-7227298"    objRS.Update    Response.Write "符合该条件的记录不存在, 则新增.<BR>"   Else    objRS("电话") = "571-7227071"    Response.Write "符合该条件的记录存在, 则 Update.<BR>"    objRS.Update   End If   Set objRS.ActiveConnection = Nothing   Cnn.close   Set Cnn = Nothing   objRS.Close   Set objRS = Nothing   Response.Write "</BODY></HTML>"  %>  。

最后此篇关于ASP程序中使用断开的数据记录集的代码的文章就讲到这里了,如果你想了解更多关于ASP程序中使用断开的数据记录集的代码的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com