SQL VBA Tutorial

Structured Query Language ( SQL ) je počítačový jazyk používaný pre správu relačných databáz . Visual Basic for Applications ( VBA ) je programovací jazyk vyvinutý spoločnosťou Microsoft pre použitie s aplikáciami Microsoft Office na vytvorenie dynamického obsahu . Microsoft Access je databázový program vnútri balíka Microsoft Office , ktorý používa ako SQL a VBA pre správu dát a poskytuje automatizáciu systematické databázových funkcií . Pomocou programovacieho shell za aplikácie Microsoft Access , môžete sa pripojiť k hlavnej databáze , vyhľadávanie dát , pridať nové dáta a mazať dáta tým , že kombinuje SQL a VBA programovanie kódu . Pokyny dovolená 1

Otvorte databázu , ktorú chcete pracovať v aplikácii Microsoft Access . Otvorte Editor jazyka Visual Basic kliknutím na záložku " Database Tools " a potom " Visual Basic " .
2

Kliknite na " Vložiť " a potom " Modul " v editore jazyka Visual Basic .

3

Zadajte kód pre pripojenie k databáze . Budete musieť nadviazať spojenie , aby bolo možné používať príkazy SQL databázy .

Sub SQLTutorial ( )

" Nastaviť premenné uchovávať informácie

Dim conn ako ADODB.Connection " Toto je skutočný pripojenie

Dim rsSelect ako ADODB.Recordset " To je miesto , kde budete ukladať dáta

Dim rsDelete ako ADODB.Recordset

Dim rsInsert ako ADODB.Recordset

Dim rsUpdate ako ADODB.Recordset

Dim strSelectQuery ako reťazec " Toto je skutočný SQL SELECT príkaz

Dim strDeleteQuery ako reťazec " To bude držať SQL DELETE

Dim strInsertQuery ako reťazec " Toto je príkaz SQL INSERT

Dim strUpdateQuery ako reťazec " To bude držať príkazu UPDATE

" Zadajte detaily pripojenia k databáze , ktorú chcete

Set Conn = New ADODB.Connection

S Conn

ConnectionString = . " Provider = microsoft.jet.oledb.4.0 , " & _

" Data Source = C : \\ Dokumenty \\ SampleDatabase.mdb "

Otvoriť

End With

Teraz je vaše pripojenie k databáze došlo .. Ďalej budete priraďovať príkazy SQL premenných , ktoré už uvedených vyššie .
4

typ v " SELECT " SQL pre výber dát z databázy . SELECT dotazu je zvyčajne tvorený takto : " SELECT stĺpce z tabuľky " . Môžete pridať kritériá SELECT pridaním do príkazu " where" . Napríklad , máte tabuľku s názvom " Zákazníci " , ktoré chcete vyhľadať všetkých zákazníkov s priezviskom " Smith . " VBA a SQL kód bude vyzerať takto :

strSelectQuery = " SELECT * FROM tblCustomers WHERE priezvisko = ' Smith '

hviezdičkou ( * ) je zástupný znak , čo znamená , že budete chcieť stiahnuť všetky informácie , alebo stĺpy , na každého , kto s priezviskom " . Smitha " Ak chcete vybrať určité stĺpce , mali by ste použiť :

strSelectQuery = " SELECT meno , priezvisko FROM tblCustomers WHERE priezvisko = ' Smith ' "
5

napíšte " DELETE " vyhlásenie v prípade , že chcete zmazať riadky dát z tabuľky kód , ktorý je : .

strDeleteQuery = " DELETE FROM tblCustomers WHERE Priezvisko = ' Smith ' "

Tento príkaz zmaže všetky riadky , kde má zákazník priezvisko " Smith " z " Zákazníci " tabuľky . Základná syntax príkazu DELETE je " DELETE FROM tabuľka WHERE stĺpec = ' hodnota ' . "
6

Zadajte syntax vložiť nový riadok do tabuľky . Použite " INSERT " vyhlásenie .

strInsertQuery = " INSERT INTO tblCustomers VALUES ( John Smith , 123 Main Street , Cleveland , Ohio ) "

Ak by ste mali tabuľku Zákazníci , ktorý má meno , priezvisko , adresa, mesto a stať stĺpce , toto vyhlásenie sa vložiť dáta do pravého stĺpca . čiarka hovorí kód pre preskočenie na ďalší stĺpec pred vstupom do hodnôt . Uistite sa , že ste sa zadaním hodnôt v správnom poradí stĺpcov v tabuľke tak , že vaše dáta sú v súlade .
7

typ v príkaze SQL pre zmenu riadok údajov . Toto je " UPDATE " vo vyhlásení .

strUpdateQuery = " UPDATE tblCustomers SET priezvisko = " Jones " , Meno = " Jim " WHERE priezvisko = ' Smith ' "

Tento príkaz zmení každého , kto má priezvisko " Smith " na " Jones " a ich krstných mien na " Jim . " Môžete zmeniť niekoľko stĺpcov dát naraz v jednom príkaze UPDATE oddelením stĺpca s čiarky . Základná syntax pre UPDATE je " UPDATE tabuľka SET column1 = value1 , column2 = value2 , Sloupec3 = value3 , ... WHERE stĺpec = hodnota . "
8

typu v kóde VBA , ktorý bude spustený dotaz a ukladať výsledky do záznamov . Zatvorte z kódu VBA .

Set rsSelect = New ADODB . Recordset

S rsSelect

Set . ActiveConnection = Conn

. CursorType = adOpenStatic

. Source = strSelectQuery

. Otvoriť

End With

Set rsDelete = Nové ADODB.Recordset

S rsDelete

Set . ActiveConnection = Conn

. CursorType = adOpenStatic

. Source = strDeleteQuery

. Otvoriť

End With

Set rsInsert = Nové ADODB.Recordset

S rsInsert

Nastavenie . ActiveConnection = Conn

. CursorType = adOpenStatic

. Source = strInsertQuery

. Otvoriť

End With

Set rsUpdate = New ADODB.Recordset

S rsDelect

Set . ActiveConnection = Conn

. CursorType = adOpenStatic

. Source = strUpdateQuery

. Otvoriť

End With

" typu v kóde VBA robiť prácu s dátami , ktoré ste zhromaždili cez SQL .

" môžete použiť dáta príspevok vo formách , v iných tabuľkách alebo v správach .

" Zavrite záznamov a pripojenie je hotovo

rsSelect.Close

rsDelete.Close

rsInsert.Close

rsUpdate.Close

End Sub

• Predchádzajúca strana: Rôzne typy dát v aplikácii Visual Basic 
• Ďalšia strana: Ako môžem vytvoriť makrá Word dokumentu vo VB 6.0