Ako ušetriť premenné do databázy pomocou programu Microsoft Visual Basic OLEDB

V aplikácii Visual Basic , prepájanie a vkladanie objektov , databázy ( OLE DB ) , rozhranie pre programovanie aplikácií umožňuje pripojiť váš program k databáze . S ním si môžete uložiť informácie z vášho projektu do tabuľky v databáze a znova ju do iných aplikácií . Môžete si vytvoriť svoje premenné kdekoľvek v projekte , ako napríklad z textových polí , zaškrtávacích políčok alebo zoznamu výberov , len sa uistite , že variabilný dátový typ zodpovedá typu dát poľa v tabuľke vašej databáze je . Pokyny dovolená 1

Otvorte Visual Basic a spustiť nový projekt . Otvorte okno kód a vytvoriť funkciu zadaním " Private Sub AddRecord ( ) "
2

Zadajte nasledujúce riadky vytvoriť premenné , ktoré sa pripájajú k databáze : .

Dim dbCon ako nové OleDb.OleDbConnection

Dim DataSet ako New DataSet

Dim dataAdap ako OleDb.OleDbDataAdapter

Dim SqlCommand As String

" dbCon " variabilná stanovuje pripojenie k databáze , " Dataset " obsahuje dáta z neho , " dataAdap " vykonáva príkazy a spolupracuje s databázou , a " SqlCommand " má vaše otázky .
3

pripojenie k databáze s nasledujúcimi riadkami :

dbCon.ConnectionString = " Provider = microsoft.jet.oledb.4.0 ; Data Source = path_to_database "

dbCon.Open ( )

Vymeňte " path_to_database " časť s fyzické umiestnenie databázy na vašom počítači . Táto linka spája Visual Basic program k databáze a druhý riadok sa otvorí databázu
4

Zadajte nasledujúce riadky na načítanie dát z databázy : .

SqlCommand = " SELECT * FROM tblContacts "

dataAdap = New OleDb.OleDbDataAdapter ( SqlCommand , dbCon )

dataAdap.Fill ( DataSet , " databáza " )

Vaše dáta adaptér teraz drží všetky záznamy vo vašej tabuľke . Môžete použiť iný ako " databázy " názov lepšie identifikovať váš stôl . Napríklad , ak váš stôl má kontaktné údaje , môžete pomenovať tento " Kontakty "
5

Vytvorte nasledujúce premenné : .

Dim comBuild As New OleDb.OleDbCommandBuilder ( dataAdap )

Dim dataNewRow As DataRow

Prvý riadok overuje príkaz vložiť do tabuľky pri použití DataRow . Druhý riadok vytvorí objekt DataRow
6

Zadajte nasledujúce riadky pridať nový riadok do tabuľky v databáze a uložiť premenných polí v zázname : .

DataNewRow = dataSet.Tables ( " databáza " ) . NewRow ( )

dataNewRow.Item ( 1 ) = variable1

dataNewRow.Item ( 2 ) = variable2

dataNewRow.Item ( " název_pole " ) = variable3

dataSet.Tables ( " databáza " ) . Rows.Add ( dataNewRow )

dataAdap.Update ( DataSet , " databáza " )

prvý riadok pripravuje novú dosku s prázdnymi poľami . Ďalšie tri riadky pridajte informácie . Prvé dve majú použiť čísla indexu polí tabuľky a vložiť tieto premenné do prvých a druhých polí v zázname . Tretia používa názov poľa pre identifikáciu , v ktorom pole pre uloženie tejto premennej . Piaty a šiesty linky pridať záznam s premennými k stolu a potvrdiť údaje
7

Zadajte nasledujúci riadok ukončiť pripojenie k databáze : .

DbCon.Close ( )

Obráťte sa na " AddRecord ( ) " funkcie , inde v kóde , napríklad v tlačidlo udalosť click .

• Predchádzajúca strana: Ako získať prístup a odstrániť dáta s Makro 
• Ďalšia strana: Ako vytvoriť XSD VB