मेन्यू

VBScript ADODB कनेक्शन ऑब्जेक्ट्स के साथ कार्य करना

  • मुख्य
  • अन्य
  • VBScript ADODB कनेक्शन ऑब्जेक्ट्स के साथ कार्य करना

working with vbscript adodb connection objects

समस्याओं को खत्म करने के लिए हमारे साधन का प्रयास करें

VBScript कनेक्शन ऑब्जेक्ट्स का परिचय: ट्यूटोरियल # 12

मेरे पिछले में वीबीएस ट्यूटोरियल , हमने ‘पर चर्चा की एक्सेल ऑब्जेक्ट्स 'VBScript में इस ट्यूटोरियल में, मैं इसके बारे में बताऊंगा कनेक्शन वस्तुओं इसका उपयोग VBScript में किया जाता है।

VBScript विभिन्न प्रकार की वस्तुओं का समर्थन करता है और कनेक्शन ऑब्जेक्ट उन में से हैं। कनेक्शन ऑब्जेक्ट्स को मुख्य रूप से उन ऑब्जेक्ट्स के रूप में संदर्भित किया जाता है जो कोडर को डेटाबेस कनेक्शन के साथ काम करने और निपटने के लिए सहायता प्रदान करते हैं।

यह ट्यूटोरियल आपको VBScript में कनेक्शन ऑब्जेक्ट्स के सभी पहलुओं को अपनी अलग-अलग संपत्तियों और विधियों के साथ-साथ आपकी आसान समझ के लिए सरल उदाहरणों के माध्यम से ले जाएगा।

VBScript में कनेक्शन ऑब्जेक्ट्स के साथ कार्य करना

आप क्या सीखेंगे:

अवलोकन

SQL Server, PL / SQL आदि जैसे किसी भी डेटाबेस को होना चाहिए स्थापित डेटाबेस कनेक्शन के साथ काम करने के लिए आपके कंप्यूटर पर।

जैसे, QTP में डेटाबेस से जुड़ने के लिए कोई स्ट्रेट-फॉरवर्ड मैकेनिज्म नहीं है। लेकिन इसकी मदद से ADODB ऑब्जेक्ट्स , आप डेटाबेस से बातचीत कर सकते हैं और डेटाबेस से डेटा प्राप्त करने के लिए SQL क्वेरी के साथ काम कर सकते हैं।

एडीओ के लिए खड़ा है ActiveX डेटा ऑब्जेक्ट और यह QTP और डेटाबेस के बीच मध्यस्थ के रूप में कार्य करने के लिए तंत्र प्रदान करता है।

इस विषय ने डेटाबेस के साथ काम करने का आधार बनाया और अगर आप इसकी बेहतर समझ रखते हैं तो यह लंबे समय में आपके लिए बहुत उपयोगी होगा।

मैं आपको सभी अलग-अलग कोड, गुण और विधियों को समझने की कोशिश करूंगा, जिन्हें डेटाबेस के साथ आसान तरीके से काम करने के लिए लिखा जाना आवश्यक है ताकि आप आसानी से कोड का एक टुकड़ा अपने आप लिख सकें।

अब, गुणों और विधियों से शुरू करें जो डेटाबेस के साथ संबंध स्थापित करने में सहायक हैं।

कनेक्शन ऑब्जेक्ट्स के गुण और तरीके

विभिन्न गुण और विधियाँ हैं जो डेटाबेस से डेटा निकालने के लिए समर्थन करती हैं।

जो डेटा माइनिंग का उदाहरण नहीं है?

ADODB कनेक्शन ऑब्जेक्ट की सूची निम्नानुसार हैं:

(1) कनेक्शन स्ट्रिंग :

यह एक बहुत ही उपयोगी संपत्ति है जो डेटाबेस कनेक्शन बनाने के लिए उपयोग की जाती है और इसमें कनेक्शन विवरण जैसे विवरण शामिल हैं ड्राइवर, डेटाबेस सर्वर का नाम, उपयोगकर्ता नाम और पासवर्ड ।

# 2) कनेक्शन टाइमआउट :

इसका उपयोग इसके लिए आवश्यक समय को परिभाषित करने के लिए किया जाता है इंतज़ार कर रही एक कनेक्शन स्थापित करने के लिए।

# 3) प्रदाता :

यह संपत्ति सभी प्रदाता से संबंधित विवरण प्रदान करती है अर्थात् का नाम कनेक्शन प्रदाता ।

# 4) राज्य :

यह कनेक्शन की स्थिति के बारे में जानकारी प्रदान करता है यानी यदि कनेक्शन है कभी - कभी ।

उपर्युक्त वाले एक कनेक्शन ऑब्जेक्ट के गुण हैं। हालांकि, वहाँ एक है रिकॉर्डसेट ऑब्जेक्ट भी (क्या हम थोड़ी देर में चर्चा करेंगे)।

इसके गुणों की सूची इस प्रकार है:

# 1) बीओएफ:

इस संपत्ति का उपयोग वर्तमान रिकॉर्ड की स्थिति जानने के लिए किया जाता है। यदि वर्तमान रिकॉर्ड की स्थिति मौजूद है पहले रिकॉर्ड से पहले रिकॉर्डसेट का, तब यह संपत्ति सही वापस आ जाएगी।

# 2) EOF:

यह ऊपर वाले का बस उल्टा है। यदि वर्तमान रिकॉर्ड की स्थिति मौजूद है पिछले रिकॉर्ड के बाद रिकॉर्डसेट का, तब यह संपत्ति सही वापस आ जाएगी।

ध्यान दें: ईओएफ और बीओएफ के मूल्य तब गलत होंगे जब रिकॉर्ड में कोई रिकॉर्ड नहीं होगा। यह खाली रिकॉर्ड को मान्य करने के मामले में उपयोगी है, जब कि रिकॉर्डसेट में कोई रिकॉर्ड नहीं हैं।

# 3) MaxCount:

यह सेटिंग में उपयोगी है ज्यादा से ज्यादा उन पंक्तियों / रिकॉर्डों के मान जिन्हें डेटाबेस से लौटाया जा सकता है यानी यदि आप डेटा से एक बार में अधिकतम 20 पंक्तियों को प्राप्त करना चाहते हैं तो आप इस संपत्ति को 20 के रूप में सेट कर सकते हैं।

आइए अब एक नज़र डालते हैं तरीकों पर:

ADODB कनेक्शन ऑब्जेक्ट और रिकॉर्डसेट ऑब्जेक्ट विधियों की सूची निम्नानुसार हैं:

  • खुला हुआ: डेटाबेस कनेक्शन ऑब्जेक्ट / रिकॉर्डसेट ऑब्जेक्ट को खोलने के लिए इस विधि का उपयोग किया जाता है।
  • निष्पादित: इसका उपयोग किसी SQL क्वेरी को प्रदान करने के लिए किया जाता है।
  • बंद करे: इसका उपयोग डेटाबेस कनेक्शन / रिकॉर्डसेट को बंद करने के लिए किया जाता है जिसे खोला जाता है।
  • रद्द करना: यह एक रिकॉर्ड विधि है जो डेटाबेस कनेक्शन के मौजूदा निष्पादन को रद्द करने के लिए उपयोग की जाती है।
  • क्लोन: यह एक रिकॉर्डसेट विधि है और इसका उपयोग मौजूदा रिकॉर्डसेट ऑब्जेक्ट के क्लोन को प्राप्त करने के लिए किया जाता है।
  • चाल: यह एक रिकॉर्डसेट विधि है जिसका उपयोग निर्दिष्ट संख्या के आधार पर पॉइंटर को एक रिकॉर्ड के अंदर एक निर्दिष्ट स्थान पर स्थानांतरित करने के लिए किया जाता है।
  • गणना: यह एक रिकॉर्डसेट विधि है और इसका उपयोग रिकॉर्डसेट में मौजूद फ़ील्ड की कुल संख्या को प्राप्त करने के लिए किया जाता है यानी किसी तालिका में कुल कॉलम।
  • आइटम (i): यह एक रिकॉर्ड विधि है। इसका उपयोग उस आइटम को प्राप्त करने के लिए किया जाता है जिसका सूचकांक किसी रिकॉर्डसेट में मौजूद फ़ील्ड की कुल संख्या से निर्दिष्ट होता है।

ये विभिन्न गुण और विधियाँ हैं जिनका उपयोग आप कनेक्शन से संबंधित वस्तुओं से निपटने के दौरान करेंगे।

आइए इन वस्तुओं की कार्यप्रणाली को जानने के लिए व्यावहारिक क्रियान्वयन की ओर बढ़ें।

ADODB कनेक्शन ऑब्जेक्ट का उपयोग करके एक डेटाबेस कनेक्शन स्थापित करना

इस खंड में, हम VBScript में कनेक्शन ऑब्जेक्ट तंत्र का उपयोग करके डेटाबेस कनेक्शन बनाने में शामिल विभिन्न चरणों को देखेंगे।

कनेक्शन बनाने के लिए कोड निम्नलिखित है:

Obj = createobject ('ADODB.Connection') सेट करें ob एक ADODB कनेक्शन ऑब्जेक्ट बनाना
Obj1 = createobject ('ADODB.RecordSet') सेट करें create एक ADODB Recordet ऑब्जेक्ट बनाना
मंद डबक्वारी Variable डेटाबेस क्वेरी वैरिएबल बेकरी की घोषणा
Dbquery = 'dbo.acct से acctno चुनें जहां नाम =’ हर्ष '' Query एक क्वेरी बनाना
obj.Open 'प्रदाता = SQLQLEDB; सर्वर =। SQLEXPRESS; उपयोगकर्ता आईडी = प्रमाणपत्र; पासवर्ड = पी @ 123'; डेटाबेस = ऑटोोड ”। Connection एक कनेक्शन खोलना
obj1.pen dbquery, obj । रिकॉर्डसेट का उपयोग करके क्वेरी निष्पादित करना
val1 = obj1.fields.item (0) ‘फ़ील्ड मान लौटाएगा
संदेशबॉक्स val1 0 फ़ील्ड आइटम का प्रदर्शन मान 0 यानी कॉलम 1
obj.close Connection कनेक्शन वस्तु को बंद करना
obj1.close Connection कनेक्शन वस्तु को बंद करना
सेट करें obj1 = कुछ नहीं Nothing रिकॉर्डसेट ऑब्जेक्ट जारी करना
सेट करें obj = कुछ नहीं ‘ कनेक्शन ऑब्जेक्ट जारी करना

आइए देखें कि यह कैसे काम करता है:

  • सबसे पहले, ए संबंध वस्तु नाम के साथ ject obj ’का निर्माण ject createobject’ कीवर्ड और ADODB कनेक्शन का उपयोग करते हुए किया जाता है, क्योंकि आप एक डेटाबेस कनेक्शन ऑब्जेक्ट बना रहे हैं, जिसे परिभाषित किया गया है।
  • फिर एक रिकॉर्डसेट ऑब्जेक्ट 'obj1' का उपयोग करके डेटाबेस से एक विशेष तालिका के रिकॉर्ड तक पहुंचने के लिए बनाया गया है। रिकॉर्डसेट ऑब्जेक्ट डेटाबेस से रिकॉर्ड तक पहुंचने का एक तरीका प्रदान करता है।
  • उसके बाद, एक चर के लिए घोषित किया जाता है सवाल डेटाबेस से रिकॉर्ड लाने के लिए क्वेरी को संग्रहीत करने के लिए 'dbquery'।
  • फिर एक कनेक्शन ऑब्जेक्ट जो ऊपर बनाया गया है खुल गया प्रदाता के बारे में SQL सर्वर, सर्वर नाम, डेटाबेस का नाम, उपयोगकर्ता आईडी और पासवर्ड जैसे सभी विवरण प्रदान करके ऑब्जेक्ट के साथ काम करना शुरू करना।
  • एक प्रश्न तो है मार डाला क्वेरी और कनेक्शन ऑब्जेक्ट का उल्लेख करके रिकॉर्डसेट ऑब्जेक्ट खोलने के बाद।
  • अगला, मुख्य कार्य एसीट नं के मूल्य को प्राप्त करने के लिए किया जाता है। का उपयोग कर क्वेरी के अनुसार एक विशेष व्यक्ति की खेत उस रिकॉर्डसेट का, जो उस वस्तु के सूचकांक का उल्लेख कर रहा है, जहाँ पर एस.टी.सी. इस मामले में आइटम (0) की तरह स्थित है। किसी फ़ील्ड का मान तब संदेश बॉक्स की सहायता से प्रदर्शित किया जाता है।

ध्यान दें: फ़ील्ड्स 'कॉलम' का प्रतिनिधित्व करते हैं और रिकॉर्ड्स डेटाबेस तालिका की 'पंक्तियों' का प्रतिनिधित्व करता है।

कोर जावा साक्षात्कार सवाल और जवाब
  • वस्तुएं तो हैं बंद किया हुआ जैसा कि कार्य पूरा हो चुका है।
  • अंत में, दोनों वस्तुएं - क्रमशः obj और obj1 हैं रिहा 'कुछ भी नहीं' कीवर्ड का उपयोग करके।

ध्यान दें : उपयोग करने वाली वस्तुओं को छोड़ना एक अच्छा अभ्यास है ‘सेट ऑब्जेक्ट का नाम = कुछ भी नहीं’ आखिर में टास्क पूरा होने के बाद।

हमने डेटाबेस के साथ संबंध स्थापित करने और डेटाबेस और क्यूटीपी के संयोजन का उपयोग करके डेटा को पढ़ने और प्रदर्शित करने के बारे में सब कुछ देखा है।

कनेक्शन ऑब्जेक्ट का उपयोग करके कुछ अन्य परिदृश्य देखें।

ADODB कनेक्शन ऑब्जेक्ट का उपयोग करके एक्सेल फ़ाइल में डेटा निर्यात करना

इस खंड में, हम VBScript में कनेक्शन ऑब्जेक्ट तंत्र का उपयोग करके डेटाबेस से एक्सेल फ़ाइल में डेटा निर्यात करने में शामिल विभिन्न चरणों को देखेंगे।

इस परिदृश्य के लिए कोड निम्नलिखित है:

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

आइए देखें कि यह कैसे काम करता है:

  • सबसे पहले, वस्तुओं - संबंध ऑब्जेक्ट, रिकॉर्डसेट ऑब्जेक्ट और एक्सेल ऑब्जेक्ट keyword obj, ‘obj1’ और 2 obj2 ’नाम क्रमशः keyword createobject) कीवर्ड का उपयोग करके बनाए गए हैं।
  • फिर, एक कार्यपुस्तिका ऑब्जेक्ट - ‘Obj3’ का निर्माण एक्सेल फ़ाइल के स्थान और उसके बाद का उल्लेख है कार्यपत्रक ऑब्जेक्ट (the obj4 ') को एक्सेल फाइल में शीट को निर्दिष्ट करने के लिए बनाया गया है, जहां डेटा को निर्यात करने की आवश्यकता होती है।
  • फिर एक कनेक्शन ऑब्जेक्ट जो ऊपर बनाया गया है खुल गया ऑब्जेक्ट और प्रदाता के विवरण के साथ काम करना शुरू करने के लिए।
  • एक प्रश्न तो है मार डाला क्वेरी और कनेक्शन ऑब्जेक्ट का उल्लेख करके रिकॉर्डसेट ऑब्जेक्ट खोलने के बाद।
  • अगला, मुख्य कार्य एक्सेल फ़ाइल में किसी विशेष व्यक्ति के नाम और आयु के मूल्यों को संग्रहीत करने के लिए किया जाता है खेत डेटाबेस से शीट की कोशिकाओं में रिकॉर्डसेट। लूप तब तक चलेगा जब तक कि ईओएफ गलत नहीं है (हम पहले ही ईओएफ पर चर्चा कर चुके हैं)।
  • एक्सेल वर्कबुक तो है बचाया ।
  • एक्सेल एप्लीकेशन करेगा छोड़ना जैसा कि कार्य पूरा हो चुका है।
  • वस्तुएं तो हैं बंद किया हुआ जैसा कि कार्य पूरा हो चुका है।
  • अंत में, सभी ऑब्जेक्ट हैं रिहा 'कुछ भी नहीं' कीवर्ड का उपयोग करके।

ADODB कनेक्शन ऑब्जेक्ट का उपयोग करके टेक्स्ट फ़ाइल में डेटा निर्यात करना

इस खंड में, हम VBScript में कनेक्शन ऑब्जेक्ट तंत्र का उपयोग करके डेटाबेस से एक पाठ फ़ाइल में डेटा निर्यात करने में शामिल विभिन्न चरणों को देखेंगे।

इस परिदृश्य के लिए कोड निम्नलिखित है:

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

आइए देखें कि यह कैसे काम करता है:

  • सबसे पहले, वस्तुओं - संबंध ऑब्जेक्ट, रिकॉर्डसेट ऑब्जेक्ट और फ़ाइल ऑब्जेक्ट keyword obj, ‘obj1’ और 2 obj2 ’नाम क्रमशः keyword createobject) कीवर्ड का उपयोग करके बनाए गए हैं।
  • फिर, एक फ़ाइल ऑब्जेक्ट का उल्लेख करते हुए खोला जाता है स्थान पाठ फ़ाइल में जहां डेटा को निर्यात करने की आवश्यकता होती है।
  • फिर एक कनेक्शन ऑब्जेक्ट जो ऊपर बनाया गया है खुल गया ऑब्जेक्ट और प्रदाता के विवरण के साथ काम करना शुरू करने के लिए।
  • एक प्रश्न तो है मार डाला क्वेरी और कनेक्शन ऑब्जेक्ट का उल्लेख करके रिकॉर्डसेट ऑब्जेक्ट खोलने के बाद।
  • फिर, नाम और उम्र का उपयोग करके लिखा जाता है पंक्ति लिखो फ़ाइल सिस्टम ऑब्जेक्ट की विधि।
  • अगला, मुख्य कार्य का उपयोग करके किसी विशेष व्यक्ति की पाठ फ़ाइल में नाम और उम्र के मूल्यों को लिखने के लिए किया जाता है खेत डेटाबेस से शीट की कोशिकाओं में रिकॉर्डसेट। लूप तब तक चलेगा जब तक कि ईओएफ गलत नहीं है (हम पहले ही ईओएफ पर चर्चा कर चुके हैं)।
  • फ़ाइल ऑब्जेक्ट तब है बंद किया हुआ और फ़ाइल संबंधित ऑब्जेक्ट जारी किए जाते हैं।
  • वस्तुएं तो हैं बंद किया हुआ जैसा कि कार्य पूरा हो चुका है।
  • अंत में, कनेक्शन ऑब्जेक्ट और रिकॉर्डसेट ऑब्जेक्ट हैं रिहा 'कुछ भी नहीं' कीवर्ड का उपयोग करके।

ये कुछ प्रमुख परिदृश्य हैं जो अवधारणा की उचित समझ में महत्वपूर्ण हैं। वे स्क्रिप्ट में कनेक्शन ऑब्जेक्ट्स के साथ काम करते समय विभिन्न प्रकार के परिदृश्यों को संभालने के लिए कोड के साथ काम करने और निपटने के लिए नींव बनाते हैं।

अब, एक सरल उदाहरण के माध्यम से इन परिदृश्यों के कार्यान्वयन को समझते हैं।

उदाहरण:

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

ध्यान दें: आउटपुट के लिए a उदाहरण , आप फ़ाइलों के स्थान पर जा सकते हैं और जांच सकते हैं कि डेटा संबंधित फ़ाइलों में निर्यात किया गया है या नहीं।

निष्कर्ष

मुझे यकीन है कि अब तक आप उपयोग करने के महत्व और प्रभावशीलता के बारे में ज्ञान प्राप्त कर चुके होंगे VBS ADODB कनेक्शन ऑब्जेक्ट ।

अगला ट्यूटोरियल # 13 : मैं अपने अगले ट्यूटोरियल में 'फाइल सिस्टम ऑब्जेक्ट्स' को कवर करूंगा।

बने रहें और कनेक्शन ऑब्जेक्ट्स के साथ काम करने के अपने अनुभव को साझा करें और हमें बताएं कि क्या आपके पास इस ट्यूटोरियल के बारे में कोई प्रश्न हैं।

अनुशंसित पाठ

^