|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。断开|纪录集|纪录集我们在利用ASP内置的ADO组件举行数据库编程时,一般是在剧本的开首翻开一个毗连,并在剧本的最初封闭它,可是就较年夜剧本而言,在多半情形下毗连翻开的工夫要比它必要翻开的工夫长很多。因而为了节俭服务器资本,应当尽量封闭毗连以开释毗连所占据的资本,这类封闭纪录集的毗连而不封闭纪录集的手艺叫做断开纪录集,这个纪录集自己则称为断开的纪录集。
上面我们就经由过程一个实例来讲明这类手艺的利用办法(NorthWind.mdb是MicrosoftAccess自带的一个数据库,文件adovbs.inc可在C:ProgramFilesCommonFilesSystemADO下找到):
<%@LANGUAGE=VBScript%>
<%
Response.Expires=0
DimCnn,objRS,strOut,strQ,strC
StrC="Driver={MicrosoftAccessDriver(*.mdb)};DBQ="&Server.MapPath("asp24")
&"NorthWind.mdb;"
创建毗连
SetCnn=Server.CreateObject("ADODB.Connection")
Cnn.OpenStrC
创立Recordset工具
SetobjRS=Server.CreateObject("ADODB.Recordset")
objRS.CursorLocation=adUseClient
objRS.CursorType=adOpenStatic
objRS.LockType=adLockOptimistic
strQ="SELECT运货商ID,公司称号,德律风FROM运货商"
objRS.OpenstrQ,Cnn,,,adCmdText
SetobjRS.ActiveConnection=Nothing 断开纪录集
Cnn.Close 封闭毗连
SetCnn=Nothing
Response.Write""
上面利用断开的纪录集
DoWhile(NotobjRS.EOF)
strOut=objRS("运货商ID")&","&objRS("公司称号")&","&objRS("德律风")
Response.WriteServer.HTMLEncode(strOut)&""
objRS.MoveNext
Loop
Response.Write"
筹办新增或拔出纪录:"
若必要更新数据库,则要从头创建毗连
SetCnn=Server.CreateObject("ADODB.Connection")
Cnn.OpenstrC
SetobjRS.ActiveConnection=Cnn
objRS.Filter="公司称号=吴丰"
IfobjRS.EOFThen
objRS.AddNew
objRS("公司称号")="吴丰"
objRS("德律风")="571-7227298"
objRS.Update
Response.Write"切合该前提的纪录不存在,则新增.
"
Else
objRS("德律风")="571-7227071"
Response.Write"切合该前提的纪录存在,则Update."
objRS.Update
EndIf
SetobjRS.ActiveConnection=Nothing
Cnn.close
SetCnn=Nothing
objRS.Close
SetobjRS=Nothing
Response.Write""
%>
</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。 |
|