最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
使用ADO的批量更新方法UpdateBatch
时间：2022-06-30 10:31:03 编辑：袖梨 来源：一聚教程网
'**************************************
' Name: Batch Update using ADO
' Description:ADO has a great batch upda
' te feature that not many people take adv
' antage of. You can use it to update many
' records at once without making multiple
' round trips to the database. Here is how
' to use it.
' By: Found on the World Wide Web
'
'
' Inputs:None
'
' Returns:None
'
'Assumes:None
'
'Side Effects:None
'
'Warranty:
'code provided by Planet Source Code(tm)
' (http://www.Planet-*Sour*ce-Co*de.com) 'as
' is', without warranties as to performanc
' e, fitness, merchantability,and any othe
' r warranty (whether expressed or implied
' ).
'**************************************
>
Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
cn.Open Application("guestDSN")
rs.ActiveConnection = cn
rs.CursorType = adOpenStatic
rs.LockType = adLockBatchOptimistic
rs.Source = "SELECT * FROM authors"
rs.Open
If (rs("au_fname") = "Paul") or (rs("au_fname") = "Johnson") Then
newval = "Melissa"
Else
newval = "Paul"
End If
If err 0 Then
%>
Error opening RecordSet
Opened Successfully
Before Batch Update
相关文章
- 明日方舟终末地武陵1.2版本高效基建方案-武陵1.2版本蓝图码 07-09
- 《剑星》伊芙知觉活肤紧身服如何获得-伊芙知觉活肤紧身服图鉴获得方法 07-09
- 《剑星》伊芙狂飙车手怎么获得-伊芙狂飙车手图鉴获取方式 07-09
- 《剑星》伊芙废土探索者如何获得-伊芙废土探索者图鉴获得方法 07-09
- 第五人格PC版怎么领取奖励 07-09
- 《剑星》伊芙芍药独韵如何获取-伊芙芍药独韵图鉴获得方法 07-09