日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

如何在Recordset對(duì)象中查詢記錄_Access數(shù)據(jù)庫(kù)教程

編輯Tag賺U幣
教程Tag:暫無(wú)Tag,歡迎添加,賺取U幣!

推薦:解析Access中如何自動(dòng)建立表的連接表達(dá)式
連接可以生成有意義的視圖或SQL虛擬集, 連接有: 內(nèi)連接(自然連接): 只有兩個(gè)表相匹配的行才能在結(jié)果集中出現(xiàn) 外連接:包括左外連接(左邊的表不加限制),右外連接(右邊的表不加限制)

無(wú)論是 DAO 還是 ADO 都有兩種從 Recordset 對(duì)象中查詢記錄的方法: Find 方法和 Seek 方法。在這兩種方法中可以讓你指定條件進(jìn)行查詢與其相應(yīng)的記錄 , 一般而言,在相同條件下, Seek 方法提供了比 Find 方法更好的性能,因?yàn)?Seek 方法是基于索引的。因?yàn)檫@個(gè)原因基本提供者必須支持 Recordset 對(duì)象上的索引,可以用 Supports ( adSeek ) 方法確定基本提供者是否支持 Seek ,用 Supports ( adIndex ) 方法確定提供者是否支持索引。(例如, OLE DB Provider for Microsoft Jet 支持 Seek 和 Index 。),請(qǐng)將 Seek 方法和 Index 屬性結(jié)合使用。如果 Seek 沒(méi)有找到所需的行,將不會(huì)產(chǎn)生錯(cuò)誤,該行將被放在 Recordset 的結(jié)尾處。執(zhí)行此方法前,請(qǐng)先將 Index 屬性設(shè)置為所需的索引。此方法只受服務(wù)器端游標(biāo)支持。如果 Recordset 對(duì)象的 CursorLocation 屬性值為 adUseClient ,將不支持 Seek 。只有當(dāng) CommandTypeEnum 值為 adCmdTableDirect 時(shí)打開(kāi) Recordset 對(duì)象,才可以使用此方法。

用 ADO Find 方法

DAO 包含了四個(gè)“ Find ”方法: FindFirst,FindLast,FindNext 和 FindPrevious .

DAO 方法 ADO Find 方法

下面的一個(gè)例子示范了如何用 ADO Find 方法查詢記錄:

以下為引用的內(nèi)容:
Sub FindRecord(strDBPath As String, _
strTable As String, _
strCriteria As String, _
strDisplayField As String)
' This procedure finds a record in the specified table by
' using the specified criteria.
' For example, to use this procedure to find records
' in the Customers table in the Northwind database
' that have " USA " in the Country field, you can
' use a line of code like this:
' FindRecord _
' "c:Program FilesMicrosoft OfficeOfficeSamplesNorthwind.mdb", _
' "Customers", "Country=' USA '", "CustomerID"
Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
' Open the Connection object.
Set cnn = New ADODB.Connection
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Open strDBPath
End With
Set rst = New ADODB.Recordset
With rst
' Open the table by using a scrolling
' Recordset object.
.Open Source:=strTable, _
ActiveConnection:=cnn, _
CursorType:=adOpenKeyset, _
LockType:=adLockOptimistic
' Find the first record that meets the criteria.
.Find Criteria:=strCriteria, SearchDirection:=adSearchForward
' Make sure record was found (not at end of file).
If Not .EOF Then
' Print the first record and all remaining
' records that meet the criteria.
Do While Not .EOF
Debug.Print .Fields(strDisplayField).Value
' Skip the current record and find next match.
.Find Criteria:=strCriteria, SkipRecords:=1
Loop
Else
MsgBox "Record not found"
End If
' Close the Recordset object.
.Close
End With
' Close connection and destroy object variables.
cnn.Close
Set rst = Nothing
Set cnn = Nothing
End Sub

分享:解讀安全的ACCESS加密方法
Microsoft的ACCESS數(shù)據(jù)庫(kù),是我們常用的桌面數(shù)據(jù)之一,大多中小企業(yè)的數(shù)據(jù)庫(kù)管理系統(tǒng)都可以采用它,但其安全性一直令人擔(dān)猶,試想,一套財(cái)務(wù)管理系統(tǒng),用戶直接打開(kāi)數(shù)據(jù)庫(kù)去更改數(shù)據(jù)

來(lái)源:模板無(wú)憂//所屬分類:Access數(shù)據(jù)庫(kù)教程/更新時(shí)間:2009-08-01
相關(guān)Access數(shù)據(jù)庫(kù)教程