سلاسل اتصال ADO في VBA ل Microsoft SQL

ملخص تصف هذه المقالة المعلومات المطلوبة لكي يتم عرض
pojectneeds في نافذة معينة يجب استردادها من خلال اتصال
ADO.


مزيد من المعلومات يكون الخيار الأول هو التعليمات البرمجية الأساسيةمعيار المستخدم وكلمة

المرور واسم قاعدة البيانات واسم مصدر البيانات. مثال على ذلك سيكون كما يلي: (ستكون سلسلة الاتصال هذه كلها على

سطر واحد في VBA)


. ConnectionString="Provider=SQLOLEDB;DSN=eEnterprise; User=sa; Password=;InitialCatalog=TWO"

سيكون DSN مصدر بيانات ODBC الذي تم إعداده
SQL Server. في هذا المثال، تكون كلمة المرور فارغة. الكتالوج الأولي هو اسم قاعدة البيانات حيث توجد البيانات.


إذا كنت لا تريد التعليمات البرمجية لهذه المعلومات، فهناك ملف dll يمكن استخدامه لاسترداد كل هذه المعلومات. يمكن .dll هذا الملف على PartnerSource أو CustomerSource ضمن تنزيلات & التحديثات | إصدارات | تابع في إصدارات المنتجات eEnterprise | نماذج التعديل/VBA. يسمى الملف ActiveX
DLL لاسترداد معلومات تسجيل الدخول.


سيعرض لك ملف القراءة المضمن كيفية تعريف المتغيرات لاستخدام ملف dll. مثال على التعليمات البرمجية سيعلن عن المتغيرات ثم يستخدم المتغيرات في سلسلة الاتصال.


Dim userinfo As Object Dim

luserid As String

Dim lsqlpassword As String

Dim lintercompanyid As String

Dim lsqldatasourcename As String


قد تكون هذه التعليمة البرمجية على حدث مفتوح في نافذة.


تعيين userinfo = CreateObject("RetrieveGlobals.retrieveuserinfo")



luserid = userinfo.retrieve_user() lsqlpassword = userinfo.sql_password()

lintercompanyid = userinfo.intercompany_id()

lsqldatasourcename = userinfo.sql_datasourcename()


ثم في سلسلة الاتصال يمكنك استخدام المتغيرات.

(ستكون سلسلة الاتصال . هذه كلها على سطر واحد في VBA)


. ConnectionString="Provider=SQLOLEDB;DSN="+lsqldatasourcename+"; UserID="+luserid+";p assword="+lsqlpassword+";Initial Catalog="+lintercompanyid Using this type of connection string with the retrieve.dll, it will retrieve the user's name, password, the company they are logged into and the


datasource they using.

كانت هذه المقالة TechKnowledge Document ID:22116