Ako prejsť premenných z jazyka Visual Basic pre Access otázku

Microsoft Access je malý databázový stroj používaný pre začiatočníkov alebo pre webové stránky malého rozsahu . Môžete použiť Visual Basic ( VB ) , vyhľadávať v databáze priamo v kóde . To je výhodné pre tých , ktorí chcú poskytovať dynamické webové stránky pre svojich čitateľov . Ak chcete vyhľadávať v databáze , musíte vytvoriť pripojenie , pošlite dotaz a priradiť výsledky svojho vlastného jazyka premenné . Pokyny dovolená 1

Dvakrát kliknite na Visual Basic formulár , otvorte súbor kód a vložte ju do VB editora . Prejdite dole k časti vášho kódu VB , kam chcete umiestniť pripojenie k databáze a otázka .
2

Vytvorte si pripojenie k databáze . Premenná pripojenia obsahuje server a databázu , ku ktorej sa chcete pripojiť . Nasledujúci kód vytvorí spojenie :

Dim conn As String = " Data Source = localhost ; Pôvodný katalóg = Northwind ; Integrated Security = true "

Dim sqlcon Ako SqlConnection = new SqlConnection ( conn )

sqlcon.Open ( )

" localhost " text pripojí k miestnemu počítaču , na ktorom je umiestnený na internetových stránkach kód . Ak váš databázový server je na inom počítači , zadajte názov počítača namiesto " localhost " . Nahradiť " Northwind " s názvom databázy .
3

dotaz tabuľky a načítať informácie o databáze . Nasledujúci kód ukazuje , ako sa dotazovať prístup pomocou pripojenia vytvorené v kroku tri :

Dim premenná As String = " Miami "

Dim strSelect As String = " SELECT * FROM Zákazníci WHERE City = ' " & Premenná & " ' "

Dim dscmd ako nový SqlDataAdapter ( strSelect , sqlcon )

Dim ds As New DataSet ( )

dscmd.Fill ( ds , " zákazníci " )

vo vyššie uvedenom kódu , dotaz je odoslaný do databázy programu Access pomocou premennej s názvom " premennej " . Táto premenná obsahuje mesto " Miami . " Táto premenná je odoslaný do databázy programu Access . Otázka je odovzdaný a držal v premennej dátovej sady s názvom " ds . "
4

Vytlačte si prvý záznam otestovať nový kód . Nasledujúci kód vytlačí priezvisko z prvého záznamu vo výsledkoch dotazu : klipart

MsgBox ds.Tables.Item ( " last_name " )

• Predchádzajúca strana: Ako čítať xls súbor vo Vb 
• Ďalšia strana: Ako čítať súbor vo VBS