Du kan finne en post i en recordset i Microsoft Visual Basic ved hjelp av Finn and Seek metoder i begge ( Microsoft ActiveX Data Objects ) ADO og ( Data Access Objects ) DAO , men disse metodene er implementert forskjellig i begge objektbiblioteker . Oppsøk utfører bedre enn Finn i begge metodene , fordi Seek krever en indeks for å utføre et søk , i stor grad påskynde ytelse ganger i de fleste tilfeller . Dette, derimot , stiller den begrensning at Seek metoden kan bare brukes på recordset objekter som er basert på en indeksert tabell . Både Finn og Seek metodene krever at søkekriterier spesifiseres for å utføre oppslag. Du trenger
Computer
Microsoft Visual Basic
ADO eller DAO bibliotekene
Microsoft Access
Programmeringskunnskaper
Vis Seek Mer Instruksjoner
Bruke i ADO
en
Åpne forbindelsen til Access-databasen . (Erstatt variablene i << >> som passer) : en
Dim << forbindelse objekt >> Som ADODB.Connection
Sett << forbindelse object> ; > = Ny ADODB.Connection
p Med << forbindelse objekt >>
Provider = " Microsoft.Jet.OLEDB.4.0 "
Åpne. . << bane til db >>
End With
2
Lag postsettet : en
Dim << recordset objekt >> Som adodb . Recordset
Set << recordset objekt >> = Ny ADODB.Recordset
3
Velg bestiller indeksen i postsettet : en
<< recordset objekt >> . Index = << Index variabel >>
4
Åpne tabellen . Bruk følgende sentrale verdier:
<< recordset objekt >> Åpen Kilde : . = << Tabellen variabel >> , _
ActiveConnection : = << tilkobling objekt >> , _
CursorType : = adOpenKeyset , _
LockType : = adLockOptimistic , _
alternativer : = adCmdTableDirect
5
Finn posten med Seek metode : en
<< recordset objekt >> Seek KeyValues : . = << søkekriterier >> , SeekOption : = adSeekFirstEQ
6
Utfør de ønskede handlinger eller behandling , for eksempel utskrift posten til skjermen
7
Lukk recordset objekt: .
<< recordset objekt >> . Lukk
8
Lukk tilkobling: .
<< forbindelse objekt >> Close
benytter finne i ADO
9
Åpne forbindelsen .
10
Åpne tabellen . Bruk følgende sentrale verdier:
CursorType : = adOpenKeySet
LockType : = adLockOptimistic
11
Finn posten med Finn metoden. Bruk følgende syntaks , erstatte elementene i << >> med riktige verdier: .
<< Recordset objekt >> Finn Kriterier : = << søkekriterier > > , SearchDirection : = adSearchForward
12
Sjekk at en rekord ble funnet , dvs. sjekke at slutten av filen ( EOF ) vilkåret ikke er oppfylt
13
. Loop gjennom alle samsvarende poster og prosessen som ønsket.
14
Lukk recordset objektet .
15
Lukk tilkobling .