Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvorte premenné potrebné pre proces dotazu. Je potrebné pripojenie , dotaz a sada záznamov objekt k načítaniu záznamov z Visual Basic . Nasledujúci kód definuje každý VB objekt potrebné :
Dim conn Ako ADODB.ConnectionDim SQL ako StringDim rs As ADODB.Recordset
2
Vytvorenie pripojenia k databáze programu Access . Pripojenie nájde databázový súbor a otvorí ho , takže môžete spúšťať dotazy na súbor . Nasledujúci kód otvorí databázy Access :
conn.Open " Provider = microsoft.jet.oledb.4.0 ; Data Source = c : \\ theDB.mdb "
3
Vytvorte si svoj reťazec dotazu. " SQL " premenná je definovaná v kroku jedna sa používa na vytvorenie dotazu . V tomto príklade , dotaz vráti prvý názov v zozname zákazníkov . Nasledujúci kód vytvorí dotaz Access :
SQL = " select FIRST_NAME od zákazníka "
4
Spustenie dotazu na databázu programu Access pomocou objektu pripojenia . Nasledujúci kód spustí dotaz a priradí výsledok do " rs " premenné vytvorené v kroku jedna :
rs.Open SQL , prip
5
vytlačte záznam overiť dotaz bol úspešný . Môžete otestovať svoje výsledky tým , že vytvorí okno so správou , ktorá zobrazuje prvý záznam vo výsledkoch . Nasledujúce vytlačí prvú " FIRST_NAME " vo vašej sady záznamov :
MsgBox " Prvý záznam je " & rst [ 0 ] toString
.