أنت غير متصل حاليًا، وفي انتظار الإنترنت الخاص بك ليقوم بإعادة الاتصال

كيفية استيراد بيانات من Microsoft SQL Server في Microsoft Excel

هام: تمت ترجمة هذا المقال باستخدام برنامج ترجمة آلية لشركة مايكروسوفت بدلاً من الاستعانة بمترجم بشري. تقدم شركة مايكروسوفت كلاً من المقالات المترجمة بواسطة المترجمين البشر والمقالات المترجمة آليًا وبالتالي ستتمكن من الوصول إلى كل المقالات الموجودة في قاعدة المعرفة الخاصة بنا وباللغة الخاصة بك. بالرغم من ذلك، فإن المقالة المترجمة آليًا لا تكون دقيقة دائمًا وقد تحتوي على أخطاء إملائية أو لغوية أو نحوية، مثل تلك الأخطاء الصادرة عن متحدث أجنبي عندما يتحدث بلغتك. لا تتحمل شركة مايكروسوفت مسئولية عدم الدقة أو الأخطاء أو الضرر الناتج عن أية أخطاء في ترجمة المحتوى أو استخدامه من قبل عملائنا. تعمل شركة مايكروسوفت باستمرار على ترقية برنامج الترجمة الآلية

اضغط هنا لرابط المقالة باللغة الانجليزية306125
الموجز
يصف هذا الدليل خطوة بخطوة حول كيفية استيراد البيانات إلى Microsoft Excel من قاعدة بيانات Pubs، قاعدة بيانات نموذج المضمنة مع Microsoft SQL Server.

كائنات بيانات ActiveX (ADO) توفر الوصول إلى أي نوع من مصدر البيانات. من طراز كائن مسطحة مع كائنات قليلة. الكائنات الرئيسية في نموذج كائن ADO:
   Object          Description   -----------------------------------------------------------------------   Connection      Refers to the connection to the data source.   Recordset       Refers to the data extracted.   Command         Refers to a stored procedure or SQL statements that                    need to be executed.				
على الرغم من أن هناك العديد من الطرق لإرجاع مجموعة سجلات باستخدام ADO، تركز هذه المقالة على الاتصال وكائنات مجموعة السجلات.

متطلبات

يجب أن يكون ملقم محلي، يستخدم Microsoft SQL Server والذي يحتوي على قاعدة بيانات Pubs.

توصي Microsoft لديك معرفة بما يلي:
  • إنشاء Visual Basic من أجل إجراءات للتطبيقات في برامج Office.
  • العمل باستخدام متغيرات الكائنات.
  • العمل مع كائنات Excel.
  • مفاهيم أنظمة إدارة قواعد البيانات (RDBMS) العلائقية.
  • عبارات SELECT لغة الاستعلام (SQL) المركبة.

الرجوع إلى مكتبة كائنات ADO

  1. بدء تشغيل Excel. فتح مصنف جديد وحفظه ك SQLExtract.xls.
  2. بدء تشغيل محرر Visual Basic وحدد مشروع VBA.
  3. على أدوات القائمة، انقر فوق مراجع.
  4. انقر لتحديد إصدار أحدث مكتبة كائنات بيانات ActiveX Microsoft خانة الاختيار.

إنشاء الاتصال

  1. إدراج وحدة نمطية جديدة في المشروع.
  2. إنشاء إجراء Sub جديد يسمى داتايكستراكت.
  3. اكتب أو الصق التعليمة البرمجية التالية:
    ' Create a connection object.Dim cnPubs As ADODB.ConnectionSet cnPubs = New ADODB.Connection' Provide the connection string.Dim strConn As String'Use the SQL Server OLE DB Provider.strConn = "PROVIDER=SQLOLEDB;"'Connect to the Pubs database on the local server.strConn = strConn & "DATA SOURCE=(local);INITIAL CATALOG=pubs;"'Use an integrated login.strConn = strConn & " INTEGRATED SECURITY=sspi;"'Now open the connection.cnPubs.Open strConn					

استخراج البيانات

اكتب أو الصق التعليمة البرمجية التالية إلى استخراج السجلات الخاصة بك:
' Create a recordset object.Dim rsPubs As ADODB.RecordsetSet rsPubs = New ADODB.RecordsetWith rsPubs	' Assign the Connection object.	.ActiveConnection = cnPubs	' Extract the required records.	.Open "SELECT * FROM Authors"	' Copy the records into cell A1 on Sheet1.	Sheet1.Range("A1").CopyFromRecordset rsPubs		' Tidy up	.CloseEnd WithcnPubs.CloseSet rsPubs = NothingSet cnPubs = Nothing				

التحقق من عمل التعليمات البرمجية

  1. تشغيل التعليمات البرمجية.
  2. قم بالتبديل إلى Excel وانظر في الورقة 1 في المصنف إلى عرض البيانات.

استكشاف الأخطاء وإصلاحها

إذا التعليمات البرمجية الخاصة بك يبدو معطلاً وتلقى خطأ وقت التشغيل، قد يكون ملقم قاعدة البيانات باستمرار. يمكنك استخدام الخاصية كوننيكتيونتيميوت للتحكم في الوقت الذي يستغرقه لإرجاع خطأ وقت التشغيل. تعيين هذه الخاصية إلى قيمة أكبر من الصفر. إذا قمت بتعيين القيمة إلى صفر، سيتم الاتصال ابدأ المهلة. القيمة الافتراضية 15 ثانية.
مراجع
يمكنك العثور على التعليمات البرمجية للنموذج إضافية بالبحث في موقع Microsoft التالي على الويب:
acc2002 xl2002 XL2003 XL2007

تحذير: تمت ترجمة هذه المقالة تلقائيًا

خصائص

رقم الموضوع: 306125 - آخر مراجعة: 04/19/2012 03:11:00 - المراجعة: 1.0

Microsoft Office Excel 2007, Microsoft Excel 2002 Standard Edition

  • kbhowtomaster kbmt KB306125 KbMtar
تعليقات
/html>body>html>html> العلامات التجارية
  • © 2016 Microsoft
  • p;did=1&t=">id=1&t=">