网络数据库的访问--odbc128页.ppt

重庆市万州高级技工学校 第七章 网络数据库的访问－－ ODBC （ 12 ） 电子商务网页制作 第七章 网络数据库的访问－－ Recordset 对象 ? 在“立即更新模式”下（在这种模式下，一旦调用 Update 方法，提供者将把更改写入基本数 据源），调用不带参数的 AddNew 方法将 EditMode 属性设置为 adEditAdd （ EditModeEnum 值）。提供者在本地缓存任何字段值的更改。调用 Update 方法可将新记录传递到数据库并将 EditMode 属性重置为 adEditNone （ EditModeEnum 值）。如果传送 Fieldlist 和 Values 参 数， ADO 将立即把新记录传递到数据库（无须调用 Update ）；而 EditMode 属性值没有改变 (adEditNone) 。 第七章 网络数据库的访问－－ Recordset 对象 ? 在“批更新模式”下（在这种模式下，提供者缓存多个更改并只在调用 UpdateBatch 方法时将其写 入基本数据源），调用不带参数的 AddNew 方法将 EditMode 属性设置为 adEditAdd 。提供者在本 地缓存任何字段值的更改。调用 Update 方法可将新记录添加到当前 Recordset 并将 EditMode 属 性重置为 adEditNone ，但在调用 UpdateBatch 方法之前，提供者不会将更改传递到基本数据库。 如果传送 Fieldlist 和 Values 参数， ADO 将把新记录发送给提供者以便存储在缓存中；需要调用 UpdateBatch 方法将新记录传递到基本数据库。 第七章 网络数据库的访问－－ Recordset 对象 Const AdOpenDynamic=2 Const adLockBatchOptimistic=4 Dim conn Set conn=Server.CreateObject(ADODB.Connection) 打开连接数据库 Dim strProvider strProvider=provider=microsoft.jet.oledb.4.0;data source= + server.mappath(student.mdb) conn.open strprovider 利用 Server 对象的 CreateObject 方法建立 Recordset 对象 Dim res Set res=Server.CreateObject(ADODB.Recordset) Dim strSQL 瑳卲?尽敳敬瑣?映潲?瑳摵湥屴 with res .source=strSQL .ActiveConnection=conn .cursortype=AdOpenDynamic .locktype=adLockBatchOptimistic .open End with 第七章 网络数据库的访问－－ Recordset 对象 While not res.Eof 晉爠獥尨湳浡履?慶畬? 李四 Then res.Delete End if res.MoveNext Wend res.updateBatch res.Addnew res(“ sno ”).value=20 res(“ sname “).Value=李四 res(“ ssex ”).value=“男“ Res(“sage”).value=23 res(“ sdept ”).Value=“数学系“ Res.update Set rs=conn.execute(select * from student) response.write ?慴汢?潢摲牥?尾 response.write ?牴尾 Dim i For i=0 To rs.fields.count-1 response.write ?摴尾?爠??渮浡?…??摴尾 Next 第七章 网络数据库的访问－－ Recordset 对象 response.write ??牴尾 While Not rs.eof response.write ?牴尾 For i=0 To rs.fields.count-1 response.write ?摴尾?爠??瘮污敵?尠尼琯? Next rs.movenext response.write ?牴尾 Wend response.write ??慴汢? rs.close Set rs=nothing res.updateBatch res.movefirst response.write ?慴汢?潢摲牥?尾 response.write ?牴尾 For i=0 To res.fields.count-1 response.w