Külső adatbázisok használata

Lekérdezések létrehozása a Microsoft Query segítségével

A Microsoft Office tartalmaz egy külön program neve Microsoft Query, amely hozzáférést biztosít a létrehozott adatbázisok segítségével az ilyen szoftvert dBASE, Access, Paradox, Microsoft SQL Server, és így tovább. N. Ez a program lehetővé teszi, hogy válassza ki információt az adatbázisból, sort , szerkesztheti és másolhatja a munkalapra. A Microsoft Query segítségével a felhasználók a megadott kritériumok alapján kaphatnak adatokat. Az Excel a Microsoft lekérdezéssel kommunikál a DDE mechanizmuson (dinamikus adatcsere) keresztül. A Microsoft Query külső adatforrásokkal együttműködik az ODBC (Open Database Connectivity) illesztőprogramokon keresztül, amelyek a Microsoft szabványai az adatbázisok kezeléséhez. Az ODBC-illesztőprogram segítségével lekérdezési adatok lekéréséhez az SQL lekérdezési nyelv (Structured Query Language) kerül felhasználásra.

Tekintse meg a lekérdezés létrehozásának sorrendjét a Microsoft Query használatával, amely az Access által létrehozott diákok egyszerű adatbázisán alapul (15.1. Ábra).

Végezze el az Adatok, Külső adatok, Lekérdezés létrehozása (Adatok, Külső adatok letöltése, Új adatbázis lekérdezés) parancsot. Megjelenik az Adatforrás kiválasztása párbeszédpanel (15.2. Ábra). Ebben az ablakban válassza ki az adatforrást, például az Access 97-ben létrehozott adatbázist. Kattintson az Options (Beállítások) gombra, a megjelenő Adatforrás ablak segítségével megadhatja azokat az mappákat, amelyeken az adatforrás keresésre kerül. Tehát válassza ki az Access 97-ben létrehozott adatbázist forrásként, majd kattintson az OK gombra.

Az Adatbázis kiválasztása párbeszédpanelen (15.3 ábra), az Adatbázis neve listán válassza ki az adatbázis fájl nevét (ebben az esetben: students.mdb), majd kattintson az OK gombra, amely elindítja a lekérdezési varázslót.

Ábra. 15.1 Diákok adatbázisa

Ábra. 15.2.Dialog ablak Jelölje ki az adatforrást

Ábra. 15.3.A Adatbázis kiválasztása párbeszédpanel

A Lekérdezési varázsló - Válassza ki az Oszlopok párbeszédpanelt (lásd: 15.4. Ábra), amely lehetővé teszi oszlopok vagy mezők hozzáadását a Lekérdezés oszlopok listájához. Ha a Lekérdező varázsló közepén lévő> gombra kattint, válassza az Oszlopok párbeszédpanelt, a kiválasztott oszlop hozzáadódik a lekérdezéshez, a gombhoz <служит для удаления выбранного столбца из списка столбцов запроса, а кнопка « позволяет удалить все столбцы запроса. В рассматриваемом случае в список Столбцы запроса (Query Columns) добавим все поля базы данных, кроме поля номер. Нажмите кнопку Далее> (Next>), folytatva a lekérdezési varázsló következő lépését.

Ábra. 15.4.Dialog Box Lekérdezés létrehozása: Oszlopok kiválasztása

Megnyílik a Lekérdezési varázsló - Fájl adatok párbeszédpanel (lásd a 15.5. Ábrát), amely lehetővé teszi az adatok szűrését a kiválasztott mezőkben. Az adatok oszlopainak szűréséhez az Oszlopok kiválasztási listájához jelölje ki azt az oszlopot, amellyel szűrni kívánja. Az első legördülő listában kiválasztja a kiválasztási műveletet, a második pedig a kiválasztott mező összes értékét, válassza ki a kívántat vagy adja meg sajátját. Ha szükséges, adja meg a további kiválasztási művelet kiválasztásához egy kapcsolót, és (AND) vagy vagy (OR), és használja az alábbi legördülő listák segítségével adja meg a szűrési feltételeket, és így tovább. D. Miután létrehozta a szűrési feltételeket, kattintson a Tovább> (Tovább>), mozgó a következő lépésre a lekérdezési varázsló. Ebben az esetben végezze el a szűrés terén csapat, amelyben egy kritérium megegyezik a gazdaság, és a mező alá a kritérium azonos értékű számítástechnika, t. E. megjeleníteni csak a eredményeivel kapcsolatos információkat üzembe számítástechnika hallgatók a közgazdaságtan. Vegye figyelembe, hogy a vizuálisan kiválasztott mezők eltérnek azoktól, amelyek nincsenek kijelölve, mert félkövéren vannak.

Ábra. 15.5.Dialog box Létrehozása lekérdezés: adatgyűjtés

Megnyílik a Lekérdezési varázsló - Rendezési adatok párbeszédpanel (lásd a 15.6. Ábrát), amely lehetővé teszi a kiválasztott mezők adatainak rendezését növekvő vagy csökkenő sorrendben. Rendezze az adatokat vezetéknév szerint növekvő sorrendben. Kattintson a Next> (Következő>) gombra, folytatva a lekérdezési varázsló következő lépését.

Ábra. 15.6.Dialog box Lekérdezés létrehozása: rendezési sorrend

Megnyílik a Create Query: Final Step párbeszédablak (lásd a 15.7. Ábrát). Ha ismét ugyanazt a lekérdezést szeretné használni, mentheti a Mentés lekérdezés gomb használatával. A lekérdezés létrehozásának befejezéséhez jelölje be a Visszaadandó adatok Microsoft Excelhez jelölőnégyzetet, és kattintson a Befejezés gombra.

Ábra. 15.7.Dialog box Lekérdezés létrehozása: az utolsó lépés

Ábra. 15.8.Dialog box Visszatérés a Microsoft Excel programba

A makró regisztráló a fenti műveleteket a következő makróként rögzíti:

Ahhoz, hogy egyesítse a munkamódszer a létrehozott adatbázisok különböző eszközökkel (.. Például, Access, FoxPro, SQL Server, stb), a Microsoft kifejlesztett egy interfész hozzáférni az adatokhoz, az úgynevezett protokoll ODBC (Open Database Connectivity - Open Database Connectivity). Az adatok bevitele, visszakeresése és manipulálása a strukturált lekérdezési nyelv (SQL, strukturált lekérdezési nyelv) használatával történik. Az ODBC egy szabványt nyújt az adatok egyik alkalmazásból az egyikbe történő átvitelére.

Ezenkívül lehetővé teszi a mezők, rekordok és táblák létrehozását, törlését, szerkesztését, rendezését és szűrését.

A Microsoft Jet egy olyan adatbázis központi eleme, amely lehetővé teszi az OLE Automation, különösen a VBA és az Excel programot támogató alkalmazások adatainak elérését, függetlenül egy adott adatbáziskezelő rendszer interfészétől. A Jet motor az alapértelmezett információkat tárolja olyan adatbázisokban, amelyek rendelkeznek az MDB kiterjesztéssel. Az ilyen fájlok táblákat, modulokat, űrlapokat, jelentéseket, lekérdezéseket és indexeket tartalmaznak. Természetesen az mdb formátum nem az egyetlen adatbázisformátum, amellyel a Microsoft Jet működik. Támogatja a FoxPro, dBASE, stb. Létrehozott adatbázisok formátumát.

DAO - objektum adatokhoz való hozzáférés

Az adatokhoz való objektumhozzáférés (DAO, Data Access Objects) a Jet adatbázis-motor objektum-orientált felületeként jött létre, vagyis az alkalmazás, például a VBA és a Jet adatbázis motor közötti interakció biztosítására. Az Office 97 tartalmazza a DAO-DAO 3.5 új verzióját, amely lehetővé teszi a Jet-mag megkerülésének kezelését. A DAO 3.5-ben az ODBCDirect segítségével közvetlenül kommunikálhat az adatforrásokkal, ami gyorsabbá teszi az alkalmazásokat.

Az adat-hozzáférési objektumok egy relációs adatbázis logikai ábrázolása: táblák, rekordok, mezők, indexek stb.

Összesen 17 típusú adatelérési objektum létezik. Az 1. ábrán. A 15.10 az első négy hierarchikus szinthez tartozó adat-hozzáférési objektumokat jelenít meg. A hozzáférési objektumok hierarchiájának tetején a DBEngine objektum, közvetlenül a Jet adatbázis motor. A Hibaobjektum, amely a hibák család eleme, az adatok objektumhoz való hozzáférése során felmerülő hibákkal kapcsolatos információkat tárolja. A DBEngine objektum tartalmazza azokat a munkaterület-objektumok munkaterületek családját is, amelyek a felhasználó nevezett felhasználói munkameneteket állítják be. Minden munkaterület objektum tartalmazza az Adatbázisok családot, amely egy vagy több adatbázis objektumból áll, amelyek nyilvános adatbázisok. A TabieDef, a TabieDefs család tagja, az elsődleges vagy csatolt táblázat tárolt meghatározását jelenti. A QueryDef objektum tagja, amely a QueryDefs család tagja, egy mentett lekérdezés definíciót jelent a Microsoft Jet adatbázisban vagy az ODBCDirect munkaterület átmeneti lekérdezési definíciójában. A Recordset objektum, amely a Recordsets család tagja, a fő táblában vagy a lekérdezés eredményeiből származó feljegyzést tartalmazza. A Container objektumokban ugyanazok az objektumok vannak csoportosítva, és a Relation objektum egy kapcsolatot jelent a táblák vagy lekérdezések mezői között.

Az adatok objektumhoz való hozzáférésének eljárása

Az adatok objektumhoz való hozzáféréssel történő adatainak visszakeresésekor:

  • Munkahely létrehozása (Workspace objektum)
  • Nyissa meg az adatok adatbázisát (forrás) (Adatbázis objektum)
  • Recordset létrehozása (Recordset objektum)
  • Egyedi munkákhoz és mezőkhöz való közvetlen munka

Hozzon létre egy munkaterületet

Létrehozhat egy munkaterületet a DBEngine objektum CreateWorkspace módszerével.

Munkaterület beállítása = CreateWorkspace (név, felhasználónév, jelszó, UseType)

Például egy Microsoft Jet munkaterület létrehozásához használhatja a következő két utasítást:

Dim Munkaterület CreateWorkspace-ként

Állítsa RabochayaOblast = DBEngine.CreateWorkspace (címe: = "MoyaOblast", felhasználónév: = "admin", jelszó: = "", UseType: = dbUseJet)

Dim Munkaterület CreateWorkspace-ként

Munkahely létrehozása = CreateWorkspace (Name: = "Saját terület", UserName: = "UID'V Password: =" ", UseType: = dbUseODBC)

Adatbázis (forrás) megnyitása

Az adatbázist a Workspace objektum OpenDatabase módszerével nyithatja meg.

Állítsa be a DatabaseDatabase = Work Area.OpenDatabase (név, opciók, readonly, connect)

Egy nyílt adatbázisobjektumot ábrázoló objektumváltozó

Olyan objektumváltozó, amely egy meglévő munkaterület-objektumot tartalmaz, amely az adatbázist tartja. Ha a Munkaterület opció nincs megadva, akkor az OpenDatabase módszer a normál munkaterületet használja

Értékét adja Igaz, ha a jelenlegi rekord mutatót, mielőtt az első rekord a rekord, és hamis, akkor, ha az aktuális rekord az első rekord vagy rekord után értéke igaz, ha a jelenlegi rekord mutató után van elhelyezve az utolsó rekord készlet, és az értéket Hamis, ha az aktuális rekord mutató a készlet legutolsó bejegyzésén vagy az előtte lévő bármely rekordon található

Tekintse meg az adatbázis használatát a következő egyszerű alkalmazás példáján, amely a rekordok alapvető műveleteit használja. Az adatbázis az accessban létrehozott student.mdb fájlban található, és egy táblázatból áll FirstCourse. A táblázat négy mezőt tartalmaz: Név, Csoport, Tárgy és Értékelés. Az alkalmazás elindításakor megjelenik az Elsőéves diákok párbeszédpanel.

Ábra. 15.11.Dialogovoe ablak első éves hallgatók

Csökkenthető a program az alábbi:

  1. Amikor aktiválódik, megjeleníti a beviteli mezők a párbeszédablak az első hallgatók az írás az összes rekordot jelzi a teljes rekordok száma a táblázatban.
  2. Ha megnyomja a> és <происходит перемещение на одну запись вперед и назад соответственно, а при нажатии кнопок>> és <<— перемещение в конец и начало таблицы соответственно.

Ha megnyomja a gombot, hogy megtalálja az első rekordot keresi az asztalról a megadott néven (ha nincs rekord, akkor használja a könyvjelző ingatlan visszaad egy pointert ugyanabban a helyzetben, ahonnan indulni). Ha rákattint a Következő keresése keresett utólagos bejegyzés ugyanazzal a névvel.

  1. Ha rákattint a Törlés, a rekord törlésre kerül.
  2. Ha rákattint egy új rekordot szerint az új rekord gomb létrehoz beírni a beviteli mezőbe.
  3. Ha rákattint a Szerkesztés módosítja a rekordot az adatbázisból.
  4. Ha rákattint a Bezárás, zárja be az adatbázist és a párbeszéd.
  5. Amikor kiválasztod horoshist és kitüntetések váltani a párbeszédpanel megjeleníti az adatokat csak horoshist és standouts, és a kiválasztott kapcsoló összes - megjeleníti az összes versenyző.

„Modul szintű változók

Ahogy munkaterület Dim RabochayaOblast

Mivel Adatbázis Dim BazaDannyh

Ahogy Recordset Dim Recording

Ahogy Recordset Dim ZapisDubl

Dim Név As String

Criterion As String Dim

Dim könyvjelző As Variant

Private Sub CommandButton1_Click ()

„Find belépési név szerint

„Emlékezett lapján az aktuális rekord

Név kiolvassuk a Last Name mezőben alapuló

„Create a keresési feltételeket, és az első bejegyzés törekedni

Criterion = „[Vezetéknév] = '' vezetéknév „„”

„Ha a rekord a megadott név van, akkor az megjelenik

„A párbeszédablakban.

„Ha a rekord nem található, egy üzenet jelenik meg, és

„Könyvjelzők használata visszakerül a bejegyzést, amely

„Indult keresés

Ha Zapis.NoMatch = False Ekkor

MsgBox „A rekord nem található” vblnformation „hallgató”

PokazatZapis End If

Private Sub CommandButtonlO_Click ()

„Menj az utolsó rekord

Kapcsolódó cikkek