working with vbscript adodb connection objects
Introduksjon til VBScript Connection Objects: Tutorial # 12
I min forrige VBS opplæring , diskuterte vi på ‘ Excel-objekter ’I VBScript. I denne opplæringen skal jeg forklare Tilkoblingsobjekter som brukes i VBScript.
VBScript støtter forskjellige typer objekter, og tilkoblingsobjekter er blant dem. Connection Objects er hovedsakelig referert til som objektene som gir støtte til koderne for å jobbe og håndtere databasekoblingene.
Denne opplæringen tar deg gjennom alle aspektene av Connection Objects i VBScript, inkludert dens forskjellige egenskaper og metoder sammen med enkle eksempler for enkel forståelse.
Hva du vil lære:
- Oversikt
- Egenskaper og metoder for tilkoblingsobjekter
- Opprette en databaseforbindelse ved hjelp av ADODB-tilkoblingsobjekt
- Eksportere data til Excel-fil ved hjelp av ADODB-tilkoblingsobjekt
- Eksportere data til tekstfil ved hjelp av ADODB-tilkoblingsobjekt
- Konklusjon
- Anbefalt lesing
Oversikt
Eventuelle databaser som SQL Server, PL / SQL, etc. må være installert på datamaskinen din for å jobbe med databasetilkoblingene.
Som sådan er det ikke noen rett frem mekanisme for å bli koblet til databasen i QTP. Men ved hjelp av ADODB-objekter , kan du samhandle med databasen og jobbe med SQL-spørringene for å hente dataene fra databasen.
EN GJØR står for ActiveX-dataobjekter og dette gir mekanismen for å fungere som et mellomledd mellom QTP og databasen.
Dette emnet dannet grunnlaget for arbeidet med databasen, og det vil være veldig nyttig for deg i det lange løp hvis du har en bedre forståelse av det.
Jeg vil prøve å få deg til å forstå alle de forskjellige kodene, egenskapene og metodene som kreves for å kunne jobbe med databasen på en enkel måte, slik at du enkelt kan skrive et stykke kode på egen hånd.
La oss nå begynne med egenskapene og metodene som er nyttige for å opprette en forbindelse med databasen.
Egenskaper og metoder for tilkoblingsobjekter
Det er forskjellige egenskaper og metoder som støtter for å trekke ut data fra databasen.
Jeg trenger en falsk e-postadresse
Liste over egenskaper for ADODB-tilkoblingsobjekter er som følger:
# 1) Tilkoblingsstreng :
Dette er en veldig nyttig egenskap som brukes til å opprette en databaseforbindelse og inkluderer tilkoblingsdetaljer som detaljene i Driver, databaseservernavn, brukernavn og passord .
# 2) Tidsavbrudd for tilkobling :
Dette brukes til å definere den nødvendige tiden for venter for en forbindelse for å bli etablert.
# 3) Leverandør :
Denne egenskapen inneholder alle leverandørrelaterte detaljer, dvs. navnet på Tilkoblingsleverandør .
# 4) Stat :
Dette gir informasjon om tilkoblingens tilstand, dvs. om tilkoblingen er PÅ eller AV .
Ovennevnte er egenskapene til et tilkoblingsobjekt. Imidlertid er det en RecordSet-objekt også (vil vi diskutere en stund).
Liste over egenskapene er som følger:
# 1) BOF:
Denne egenskapen brukes til å vite posisjonen til den gjeldende posten. Hvis posisjonen til den gjeldende posten er til stede før første plate av platesettet, da vil denne egenskapen bli tilbake.
# 2) EOF:
Dette er bare motsatt av ovennevnte. Hvis posisjonen til den gjeldende posten er til stede etter siste plate av platesettet, da vil denne egenskapen bli tilbake.
Merk: Verdiene til EOF og BOF vil være falske når det ikke er noen poster i platesettet. Dette er nyttig i tilfelle validering av tomme poster, dvs. når det ikke er noen poster i platesettet.
# 3) Maks antall:
Dette er nyttig for å stille inn maksimum verdier av rader / poster som kan returneres fra databasen, dvs. hvis du vil hente maksimalt 20 rader om gangen fra dataene, kan du sette denne egenskapen til 20.
La oss nå ta en titt på Metoder:
Liste over ADODB-tilkoblingsobjekt og RecordSet-objektmetoder er som følger:
- Åpen: Denne metoden brukes til å åpne et objekt for databasetilkobling / platesett.
- Henrette: Dette brukes til å utføre en SQL-spørring som er gitt.
- Lukk: Denne brukes til å lukke en databaseforbindelse / platesett som åpnes.
- Avbryt: Dette er en rekordsettmetode som brukes til å avbryte den eksisterende kjøringen av databaseforbindelsen.
- klone: Dette er en platesettmetode og brukes til å få klonen til det eksisterende platesettobjektet.
- bevege seg: Dette er en registreringssettmetode som brukes til å flytte pekeren på et spesifisert sted inne i et platesett på grunnlag av antallet som er nevnt.
- telle: Dette er en platesettmetode og brukes til å få totalt antall felt som er tilstede i platesettet, dvs. totalt antall kolonner i en tabell.
- element (i): Dette er en platesettmetode. Dette brukes til å få elementet hvis indeks er spesifisert av det totale antallet felt som er tilstede i et platesett.
Dette er de forskjellige egenskapene og metodene du vil bruke når du arbeider med tilkoblingsrelaterte objekter.
La oss gå videre til den praktiske implementeringen for å vite hvordan disse objektene fungerer.
Opprette en databaseforbindelse ved hjelp av ADODB-tilkoblingsobjekt
I denne delen vil vi se de forskjellige trinnene som er involvert i å opprette en databaseforbindelse ved hjelp av Connection Object-mekanismen i VBScript.
Følgende er koden for å opprette en forbindelse:
Sett obj = createobject (“ADODB.Connection”) ‘ Opprette et ADODB-tilkoblingsobjekt
Sett obj1 = createobject (“ADODB.RecordSet”) ‘ Opprette et ADODB Recordset-objekt
Dim dbquery ‘Erklære en variabel for spørringsvariabelen bquery
Dbquery = ”Velg acctno fra dbo.acct hvor navn =‘ Harsh ’” ‘Opprette et spørsmål
obj.Open “Provider = SQLQLEDB; Server =. SQLEXPRESS; UserId = test; Password = P @ 123; Database = AUTODB” ‘Åpne en forbindelse
obj1.Åpne dbquery, obj ‘Gjennomføring av spørringen ved bruk av platesett
val1 = obj1.fields.item (0) ‘Returnerer feltverdien
msgbox val1 ‘Viser verdien av feltelementet 0, dvs. kolonne 1
obj. lukk ‘Lukker tilkoblingsobjektet
obj1.close ‘Lukker tilkoblingsobjektet
Sett obj1 = Ingenting ‘ Slipper Recordset-objekt
Set obj = Nothing ‘ Slipper tilkoblingsobjekt
La oss se hvordan det fungerer:
- For det første a Forbindelse Gjenstand med navnet ‘obj’ opprettes ved hjelp av ‘createobject’ nøkkelord og ADODB Connection i parameteren mens du oppretter et Database Connection Object er definert.
- Deretter en Platesettobjekt er opprettet for å få tilgang til postene til en bestemt tabell fra databasen ved hjelp av 'obj1'. Recordset Object gir en måte å få tilgang til postene fra databasen.
- Etter det blir en variabel erklært for a spørsmål ‘Dbquery’ for å lagre spørringen for å hente postene fra databasen.
- Så er et tilkoblingsobjekt som er opprettet ovenfor åpnet å begynne å jobbe med objektet ved å oppgi alle detaljer om leverandøren som SQL SERVER, servernavn, databasenavn, bruker-ID og passord.
- En spørring er da henrettet etter å ha åpnet platesettobjektet ved å nevne spørring og tilkoblingsobjektet.
- Deretter utføres hovedoppgaven for å hente verdien av kontonr. av en bestemt person i henhold til spørringen som bruker Enger av platesettet som nevner indeksen til varen der akk.nr. ligger som element (0) i dette tilfellet. Verdien av et felt vises deretter ved hjelp av en meldingsboks.
Merk: Felter representerer 'kolonner' og platesett representerer 'rader' i en databasetabell.
- Objektene er da lukket ettersom oppgaven er fullført.
- Til slutt er begge objektene - henholdsvis obj og obj1 utgitt ved å bruke søkeordet 'Ingenting'.
Merk : Det er en god praksis å frigjøre gjenstandene ved hjelp av ‘Sett objektnavn = ingenting’ etter at oppgaven er fullført på slutten.
Vi har sett alt om å etablere en forbindelse med databasen og lese og vise data ved hjelp av en kombinasjon av databasen og QTP.
La oss se noen andre scenarier ved hjelp av Connection Object.
Eksportere data til Excel-fil ved hjelp av ADODB-tilkoblingsobjekt
I denne delen vil vi se de forskjellige trinnene som er involvert i å eksportere dataene til en excel-fil fra databasen ved hjelp av Connection Object-mekanismen i VBScript.
Følgende er koden for dette scenariet:
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
La oss se hvordan det fungerer:
- For det første, objekter - Forbindelse Object, RecordSet Object og Excel Object med navnet 'obj,' obj1 'og' obj2 'er opprettet ved hjelp av' createobject 'nøkkelord.
- Deretter et arbeidsbokobjekt - ‘Obj3’ er opprettet og nevner plasseringen til excel-filen og etter det regneark objekt (‘obj4’) er opprettet for å spesifisere arket i excel-filen der dataene må eksporteres.
- Så er et tilkoblingsobjekt som er opprettet ovenfor åpnet for å begynne å jobbe med objektet og leverandørdetaljene er nevnt.
- En spørring er da henrettet etter å ha åpnet platesettobjektet ved å nevne spørring og tilkoblingsobjekt.
- Deretter utføres hovedoppgaven for å lagre verdiene til navn og alder for en bestemt person i excel-filen i henhold til spørringen ved hjelp av Enger av platesettet i cellene på arket fra databasen. Sløyfen vil fortsette til EOF ikke er falsk (vi har allerede diskutert EOF).
- Excel-arbeidsbok er da lagret .
- Excel-applikasjonen vil slutte ettersom oppgaven er fullført.
- Objektene er da lukket ettersom oppgaven er fullført.
- Endelig er alle gjenstandene det utgitt ved å bruke søkeordet 'Ingenting'.
Eksportere data til tekstfil ved hjelp av ADODB-tilkoblingsobjekt
I denne delen vil vi se de forskjellige trinnene som er involvert i eksport av data til en tekstfil fra databasen ved hjelp av Connection Object-mekanismen i VBScript.
Følgende er koden for dette scenariet:
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
La oss se hvordan det fungerer:
- For det første, objekter - Forbindelse Object, RecordSet Object og File Object med navnet 'obj,' obj1 'og' obj2 'er opprettet ved hjelp av' createobject 'nøkkelord.
- Deretter åpnes et filobjekt som nevner plassering av tekstfilen der dataene må eksporteres.
- Så er et tilkoblingsobjekt som er opprettet ovenfor åpnet for å begynne å jobbe med objektet og leverandørdetaljene er nevnt.
- En spørring er da henrettet etter å ha åpnet platesettobjektet ved å nevne spørring og tilkoblingsobjekt.
- Deretter skrives navn og alder med skrivelinje metode for et filsystemobjekt.
- Deretter utføres hovedoppgaven for å skrive verdiene for navn og alder i tekstfilen til en bestemt person ved hjelp av Enger av platesettet i cellene på arket fra databasen. Sløyfen vil fortsette til EOF ikke er falsk (vi har allerede diskutert EOF).
- Et filobjekt er da lukket og filrelaterte objekter frigjøres.
- Objektene er da lukket ettersom oppgaven er fullført.
- Til slutt er tilkoblingsobjektet og platesettobjektet utgitt ved å bruke et 'ingenting' nøkkelord.
Dette er noen av de viktigste scenariene som er viktige for riktig forståelse av konseptet. De danner grunnlaget for å jobbe og håndtere kodene for håndtering av forskjellige typer scenarier mens de arbeider med Connection Objects i skriptet.
La oss nå forstå implementeringen av disse scenariene gjennom et enkelt eksempel.
Eksempel:
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
Merk: For produksjon av en Eksempel , kan du gå til filene og sjekke om data eksporteres eller ikke i de respektive filene.
Konklusjon
Jeg er sikker på at du nå må ha fått kunnskap om viktigheten og effektiviteten ved bruk VBS ADODB-tilkoblingsobjekter .
Neste opplæring # 13 : Jeg vil dekke ‘File System Objects’ i min neste opplæring.
hvordan man skriver testsaker i programvaretesting med eksempel
Følg med og del din erfaring med å jobbe med Connection-objekter, og gi oss beskjed hvis du har spørsmål om denne opplæringen.
Anbefalt lesing
- Arbeide med VBScript Excel Objects
- VBScript-filobjekter: CopyFile, DeleteFile, OpenTextFile, Les og skriv tekstfil
- QTP Tutorial # 7 - QTP’s Object Identification Paradigm - How QTP Identify Objects Uniqueely?
- Object Repository in QTP - Tutorial # 22
- VBScript Error Handling: VBScript On Error, On Error GoTo 0, On Error Fortsett neste
- VBScript betingede uttalelser: VBScript If, ElseIf, Select Case
- VBScript Tutorials: Lær VBScript From Scratch (15+ dybdeopplæringer)
- Klasser og objekter i C ++