Menu

Práce s objekty VBScript ADODB Connection

working with vbscript adodb connection objects

Vyzkoušejte Náš Nástroj Pro Odstranění Problémů

Úvod do objektů připojení VBScript: Výukový program č. 12

V mém předchozím Výukový program VBS , diskutovali jsme o „ Objekty aplikace Excel „Ve VBScript. V tomto tutoriálu vysvětlím asi Objekty připojení které se používají ve VBScript.

VBScript podporuje různé typy objektů a mezi nimi jsou i objekty připojení. Objekty připojení jsou hlavně označovány jako objekty, které poskytují podporu kodérům při práci a řešení databázových připojení.

Tento kurz vás provede všemi aspekty Connection Objects ve VBScript, včetně jeho různých vlastností a metod, spolu s jednoduchými příklady pro vaše snadné pochopení.

Práce s objekty připojení ve VBScript

Co se naučíte:

Přehled

Musí být jakékoli databáze, jako je SQL Server, PL / SQL atd nainstalován v počítači pro práci s databázovým připojením.

Jako takový neexistuje žádný přímočarý mechanismus pro připojení k databázi v QTP. Ale s pomocí Objekty ADODB , můžete interagovat s databází a pracovat s dotazy SQL k načtení dat z databáze.

ADO znamená Datové objekty ActiveX a to poskytuje mechanismus, který funguje jako prostředník mezi QTP a databází.

Toto téma tvořilo základ pro práci s databází a bylo by pro vás z dlouhodobého hlediska velmi užitečné, pokud o něm budete lépe rozumět.

Pokusím se vás přimět, abyste snadno porozuměli všem různým kódům, vlastnostem a metodám, které musí být napsány pro práci s databází, abyste mohli snadno napsat část kódu sami.

Začněme s vlastnostmi a metodami, které jsou užitečné při navazování spojení s databází.

Vlastnosti a způsoby připojení objektů

Existují různé vlastnosti a metody, které podporují extrakci dat z databáze.

kde najdu svůj síťový klíč

Seznam vlastností objektu připojení ADODB je následující:

# 1) Připojovací řetězec :

Toto je velmi užitečná vlastnost, která se používá k vytvoření připojení k databázi a obsahuje podrobnosti připojení, jako jsou podrobnosti Ovladač, název databázového serveru, uživatelské jméno a heslo .

# 2) Časový limit připojení :

Slouží k určení požadovaného času pro čekání pro navázání spojení.

# 3) Poskytovatel :

Tato vlastnost poskytuje všechny podrobnosti týkající se poskytovatele, tj. Název Poskytovatel připojení .

# 4) Uveďte :

To poskytuje informace o stavu připojení, tj. Pokud je připojení ZAPNUTO nebo VYPNUTO .

Výše uvedené jsou vlastnosti objektu připojení. Existuje však a RecordSet Object také (budeme za chvíli diskutovat).

Seznam jeho vlastností je následující:

# 1) BOF:

Tato vlastnost slouží ke zjištění polohy aktuálního záznamu. Pokud je k dispozici poloha aktuálního záznamu před prvním záznamem sady záznamů, pak tato vlastnost vrátí hodnotu true.

# 2) EOF:

To je jen opak výše uvedeného. Pokud je k dispozici poloha aktuálního záznamu po posledním záznamu sady záznamů, pak tato vlastnost vrátí hodnotu true.

Poznámka: Hodnoty EOF a BOF budou nepravdivé, pokud v sadě záznamů nejsou žádné záznamy. To je užitečné v případě ověřování prázdných záznamů, tj. Když v sadě záznamů nejsou žádné záznamy.

# 3) MaxCount:

To je užitečné při nastavování maximum hodnoty řádků / záznamů, které lze vrátit z databáze, tj. chcete-li z dat načíst maximálně 20 řádků najednou, můžete tuto vlastnost nastavit na 20.

Pojďme se nyní podívat na metody:

Seznam metod připojení ADODB objektu a objektu RecordSet Object je následující:

  • Otevřeno: Tato metoda se používá k otevření objektu připojení k databázi / objektu sady záznamů.
  • Vykonat: Používá se k provedení zadaného dotazu SQL.
  • Zavřít: Slouží k uzavření otevřeného databázového připojení / sady záznamů.
  • Zrušení: Toto je metoda sady záznamů, která se používá pro zrušení stávajícího spuštění připojení k databázi.
  • klon: Toto je metoda sady záznamů a používá se k získání klonu existujícího objektu sady záznamů.
  • přestěhovat se: Toto je metoda sady záznamů, která se používá k přesunutí ukazatele na zadaném místě uvnitř sady záznamů na základě uvedeného počtu.
  • počet: Toto je metoda sady záznamů a používá se k získání celkového počtu polí přítomných v sadě záznamů, tj. Celkového počtu sloupců v tabulce.
  • položka (i): Toto je metoda sady záznamů. Slouží k získání položky, jejíž index je určen celkovým počtem polí přítomných v sadě záznamů.

Jedná se o různé vlastnosti a metody, které použijete při práci s objekty souvisejícími s připojením.

Pojďme k praktické implementaci, abychom poznali fungování těchto objektů.

Navázání databázového připojení pomocí objektu připojení ADODB

V této části uvidíme různé kroky při vytváření databázového připojení pomocí mechanismu Connection Object ve VBScript.

Následuje kód pro vytvoření připojení:

Set obj = createobject (“ADODB.Connection”) ‘ Vytvoření objektu připojení ADODB
Set obj1 = createobject (“ADODB.RecordSet”) ‘ Vytvoření objektu sady záznamů ADODB
Dim dbquery „Deklarace proměnné dotazu na databázi bquery
Dbquery = ”Vyberte acctno z dbo.acct, kde name =‘ Harsh ’” „Vytváření dotazu
obj. Otevřít „Poskytovatel = SQLQLEDB; Server =. SQLEXPRESS; UserId = test; Heslo = P @ 123; Databáze = AUTODB“ „Otevření připojení
obj1.Open dbquery, obj „Provádění dotazu pomocí sady záznamů
val1 = obj1.fields.item (0) „Vrátí hodnotu pole
msgbox val1 „Zobrazená hodnota položky pole 0, tj. Sloupce 1
obj. zavřít „Uzavření objektu připojení
obj1.close „Uzavření objektu připojení
Nastavit obj1 = nic ‘ Uvolnění objektu Recordset
Set obj = nic Uvolnění objektu připojení

Podívejme se, jak to funguje:

  • Za prvé, a Spojení Objekt s názvem „obj“ se vytvoří pomocí klíčového slova „createobject“ a definuje se připojení ADODB v parametru při vytváření objektu připojení k databázi.
  • Pak Objekt sady záznamů je vytvořen pro přístup k záznamům konkrétní tabulky z databáze pomocí „obj1“. Recordset Object poskytuje způsob přístupu k záznamům z databáze.
  • Poté je proměnná deklarována pro a dotaz „Dbquery“ pro uložení dotazu k načtení záznamů z databáze.
  • Pak je výše vytvořený objekt připojení otevřel zahájit práci s objektem poskytnutím všech podrobností o poskytovateli, jako je SQL SERVER, název serveru, název databáze, ID uživatele a heslo.
  • Poté je dotaz popraven po otevření objektu sady záznamů uvedením dotazu a objektu připojení.
  • Dále se provede hlavní úkol, aby se načetla hodnota účtu č. konkrétní osoby podle dotazu pomocí pole sady záznamů, která zmiňuje rejstřík položky, kde číslo účtu je v tomto případě umístěn jako položka (0). Hodnota pole se poté zobrazí pomocí schránky se zprávou.

Poznámka: Pole představují „sloupce“ a sada záznamů představuje „řádky“ databázové tabulky.

  • Předměty jsou tedy Zavřeno po dokončení úkolu.
  • Nakonec jsou to oba objekty - obj a obj1 propuštěn pomocí klíčového slova „Nic“.

Poznámka : Osvědčeným postupem je uvolnění objektů pomocí „Nastavit název objektu = nic“ po dokončení úkolu na konci.

Viděli jsme vše o navázání spojení s databází a čtení a zobrazování dat pomocí kombinace databáze a QTP.

Podívejme se na několik dalších scénářů pomocí objektu připojení.

C ++ a Java rozdíly

Export dat do souboru Excel pomocí objektu připojení ADODB

V této části uvidíme různé kroky spojené s exportem dat do souboru aplikace Excel z databáze pomocí mechanismu Connection Object ve VBScript.

Následuje kód pro tento scénář:

Set obj = CreateObject('ADODB.Connection') Set obj1 = CreateObject('ADODB.RecordSet ') Set obj2 = CreateObject('Excel.Application') Set obj3 = obj2.Workbooks.Open ('C:UsersRiya.xlsx') Set obj4 = obj3.Worksheets(1) obj.Provider =('Microsoft.ACE.OLEDB.12.0') obj.Open 'C:Users ewdb.autodb' obj1.Open 'Select name, age from person', obj obj4.cells(1, 1) = 'Name' obj4.cells(1, 2) = 'Age' row = 2 While obj1.EOF = False obj4.cells(row, 1) = obj1.Fields('Name') obj4.cells(row, 2) = obj1.Fields('Age') obj1.MoveNext row = row+1 Wend obj3.Save obj2.Quit obj1.Close obj.Close Set obj4 = Nothing Set obj3 = Nothing Set obj2 = Nothing Set obj1 = Nothing Set obj = Nothing

Podívejme se, jak to funguje:

  • Za prvé, objekty - Spojení Object, RecordSet Object a Excel Object s názvem „obj“, „obj1“ a „obj2“ jsou vytvořeny pomocí klíčového slova „createobject“.
  • Potom objekt sešitu - Je vytvořen objekt „obj3“, který uvádí umístění souboru aplikace Excel a poté list objekt („obj4“) je vytvořen k určení listu v souboru aplikace Excel, kam je třeba exportovat data.
  • Pak je výše vytvořený objekt připojení otevřel začít pracovat s objektem a jsou uvedeny podrobnosti o poskytovateli.
  • Poté je dotaz popraven po otevření objektu sady záznamů uvedením objektu dotazu a připojení.
  • Dále se provede hlavní úkol k uložení hodnot jména a věku konkrétní osoby do souboru aplikace Excel podle dotazu pomocí pole sady záznamů v buňkách listu z databáze. Smyčka bude pokračovat, dokud EOF nebude falešná (o EOF jsme již hovořili).
  • Sešit aplikace Excel je tedy uložené .
  • Aplikace Excel bude přestat po dokončení úkolu.
  • Předměty jsou tedy Zavřeno po dokončení úkolu.
  • Nakonec jsou všechny objekty propuštěn pomocí klíčového slova „Nic“.

Export dat do textového souboru pomocí objektu připojení ADODB

V této části uvidíme různé kroky spojené s exportem dat do textového souboru z databáze pomocí mechanismu Connection Object ve VBScript.

Následuje kód pro tento scénář:

Set obj = CreateObject('ADODB.Connection') Set obj1 = CreateObject('ADODB.RecordSet ') Set obj2 = CreateObject('Scripting.FileSystemObject') Set obj3 = obj2.OpenTextFile('C:UsersRiya.xlsx') obj.Provider =('Microsoft.ACE.OLEDB.12.0') obj.Open 'C:Users ewdb.autodb' obj1.Open 'Select name, age from person', obj obj3.WriteLine 'Name Age' obj3.WriteLine '------' While obj1.EOF = False obj3.WriteLine obj1.Fields('Name') & “ “ & obj1.Fields('Age') obj1.MoveNext Wend obj3.Close Set obj3 = Nothing Set obj2 = Nothing obj1.Close obj.Close Set obj1 = Nothing Set obj = Nothing

Podívejme se, jak to funguje:

  • Za prvé, objekty - Spojení Object, RecordSet Object a File Object s názvem „obj“, „obj1“ a „obj2“ jsou vytvořeny pomocí klíčového slova „createobject“.
  • Poté se otevře objekt souboru se zmínkou o umístění textového souboru, kam je třeba data exportovat.
  • Pak je výše vytvořený objekt připojení otevřel začít pracovat s objektem a jsou uvedeny podrobnosti o poskytovateli.
  • Poté je dotaz popraven po otevření objektu sady záznamů uvedením objektu dotazu a připojení.
  • Poté se pomocí jména zapíše jméno a věk spisovatelka metoda objektu systému souborů.
  • Dále se provede hlavní úkol zapsat hodnoty jména a stáří do textového souboru konkrétní osoby pomocí pole sady záznamů v buňkách listu z databáze. Smyčka bude pokračovat, dokud EOF nebude falešná (o EOF jsme již hovořili).
  • Objekt File je tedy Zavřeno a objekty související se soubory jsou uvolněny.
  • Předměty jsou tedy Zavřeno po dokončení úkolu.
  • Nakonec jsou objekt připojení a objekt sady záznamů propuštěn pomocí klíčového slova „Nic“.

Toto jsou některé z hlavních scénářů, které jsou důležité pro správné pochopení konceptu. Tvoří základ pro práci a řešení kódů pro zpracování různých typů scénářů při práci s objekty připojení ve skriptu.

Pojďme nyní pochopit implementaci těchto scénářů na jednoduchém příkladu.

Příklad:

Let’s see implementation of Exporting data in files Function Exporttoexcelfile() ‘Function for exporting data to excel file Set obj = CreateObject('ADODB.Connection') Set obj1 = CreateObject('ADODB.RecordSet ') Set obj2 = CreateObject('Excel.Application') Set obj3 = obj2.Workbooks.Open ('C:UsersRiya.xlsx') Set obj4 = obj3.Worksheets(1) obj.Provider =('Microsoft.ACE.OLEDB.12.0') obj.Open 'C:Users ewdb.autodb' obj1.Open 'Select name, age from person', obj obj4.cells(1, 1) = 'Name' obj4.cells(1, 2) = 'Age' row = 2 If obj1.EOF = True Then Msgbox “No records found on the table!!” End If While obj1.EOF = False obj4.cells(row, 1) = obj1.Fields('Name') obj4.cells(row, 2) = obj1.Fields('Age') obj1.MoveNext row = row+1 Wend obj3.Save obj2.Quit obj1.Close obj.Close Set obj4 = Nothing Set obj3 = Nothing Set obj2 = Nothing Set obj1 = Nothing Set obj = Nothing End Function Function Exporttotextfile() ‘Function for exporting data to text file Set obj = CreateObject('ADODB.Connection') Set obj1 = CreateObject('ADODB.RecordSet ') Set obj2 = CreateObject('Scripting.FileSystemObject') Set obj3 = obj2.OpenTextFile('C:UsersRiya.xlsx') obj.Provider =('Microsoft.ACE.OLEDB.12.0') obj.Open 'C:Users ewdb.autodb' obj1.Open 'Select name, age from person', obj obj3.WriteLine 'Name Age' obj3.WriteLine '------' If obj1.EOF = True Then Msgbox “No records found on the table!!” End If While obj1.EOF = False obj3.WriteLine obj1.Fields('Name') & “ “ & obj1.Fields('Age') obj1.MoveNext Wend obj3.Close Set obj3 = Nothing Set obj2 = Nothing obj1.Close obj.Close Set obj1 = Nothing Set obj = Nothing End Function Call Exporttoexcelfile() ‘Calling Function for exporting data to excel file Call Exporttotextfile() ‘Calling Function for exporting data to text file

Poznámka: Pro výstup z Příklad , můžete přejít na umístění souborů a zkontrolovat, zda jsou data exportována do příslušných souborů.

Závěr

Jsem si jistý, že jste už určitě získali znalosti o důležitosti a účinnosti používání Objekty připojení VBS ADODB .

Další tutoriál č. 13 : V příštím výukovém programu se budu zabývat „Objekty souborového systému“.

Zůstaňte naladěni a podělte se o své zkušenosti s prací s objekty Connection a dejte nám vědět, pokud máte ohledně tohoto kurzu nějaké dotazy.

Doporučené čtení

^