أنت غير متصل حاليًا، وفي انتظار الإنترنت الخاص بك ليقوم بإعادة الاتصال
هل لديك أسئلة عن Windows 10؟ "رابط."

قد DDEREQUEST اقتطاع نتائج

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

151278
تمت أرشفة هذه المقالة. وتظهر "كما هي" ولن يتم تحديثها بعد الآن.
الأعراض
إذا كنت تستخدم DDERequest استرداد عبارة لغة الاستعلام الهيكلية (SQL) (QueryDefinition دالة) أو "عبارة SQL اتصال قواعد البيانات المفتوح" (ODBC) (ODBCSQLStatement دالة) من Microsoft Query قد يتم اقتطاعها النتائج.

عبارات النموذجية التي يمكن أن ينتج هذا الشرط كالتالي:
   DDERequest(<channel>, "QueryDefinition/n")				
   DDERequest(<channel>, "ODBCSQLStatement/n")				
عليه <channel>تبادل البيانات الحيوي (DDE) إلى متغير القناة Microsoft Query.
الحل البديل
تقدم Microsoft الأمثلة البرمجية فقط دون أي ضمان التعبير عن أو ضمنية. هذا يتضمن ولكن لم يقتصر على الضمانات الضمنية الخاصة بالتجارة أو الملاءمة لغرض معين. تفترض هذه المقالة تكون مألوفة مع لغة البرمجة التي يتم شرحها مع الأدوات التي يتم استخدامها لإنشاء لتصحيح الإجراءات. يمكن لمهندسي الدعم لدى Microsoft شرح وظيفة إجراء محدد ولكن لن يقوموا بتعديل هذه الأمثلة لتقديم وظيفة إضافية أو إنشاء إجراءات تستوفي متطلبات محددة. يمكنك تجنب الاقتطاع باستخدام نموذج الصفيف التالية من هذه الدالات:
   DDERequest(<channel>, "QueryDefinition/n")				
   DDERequest(<channel>, "ODBCSQLStatement/n")				
حيث <channel>DDE إلى متغير القناة الموجودة في Microsoft Query

يقوم نموذج الصفيف لدالة هذه الدالات يوزع عبارة SQL في صفيف عناصر. يمكنك استخدام التالية Visual Basic for Applications نموذج التعليمات البرمجية لوضع عبارة SQL على ورقة عمل باستخدام نموذج الصفيف لدالة هذه الدالات.

نموذج التعليمات البرمجية Visual Basic

تأكد قبل تشغيل هذا الروتين الفرعي مفتوح Microsoft Query 2.0 و فهم كيفية تحديد مصدر بيانات لإرجاع البيانات إلى Microsoft Excel. إذا كان لديك أية أسئلة بخصوص هذا الموضوع الرجاء مراجعة "Getting Started مع Office للحصول على نظام التشغيل Microsoft Windows 95" "و" تعليمات Microsoft Query.

اكتب التعليمة البرمجية التالية في ورقة وحدة نمطية:
   Sub TestArrayQueryDefinition()   '   Activate a worksheet.   Worksheets(1).Activate   '   Initiate a Channel to MSQuery.   Chan = DDEInitiate("MSQUERY", "System")   '   Give the user control in Microsoft Query so they can select data   '   from a database and return to Excel.   DDEExecute Chan, "[UserControl('&Return to Excel',3,true)]"   '   At this point the code opens Microsoft Query and waits   '   for the user to select a Data Source, Data Table(s), and data to   '   return to Microsoft Excel.   '   To request the Query Definition be parsed into of 50 character   '   sections...   QryDefArray = DDERequest(Chan, "QueryDefinition/50")   '   To format the parsed Query Definition data...   ArrayLen = UBound(QryDefArray, 1)   Range("A1").Value = "Query Definition (renamed Column Names) in " _      & ArrayLen & " parts:"   '   If the Array length is one then a one dimension array is returned,   '   if the Array length is greater than one, a two dimension array is   '   returned.   If ArrayLen = 1 Then   '   Place the single line of data on the worksheet and remove wrap text.      Range("A2") = QryDefArray(1): Range("A2").WrapText = False   Else   '   Place the parsed lines of data on the worksheet and remove wrap   '   text.      For i = 1 To ArrayLen         Range("A" & i) = QryDefArray(i, 1)         Range("A" & i).WrapText = False 'To undo wrap text      Next i   End If   End Sub				
تصريح
XL97 XL7 XL5 c 5.00 8.00 97 XL

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

خصائص

رقم الموضوع: 151278 - آخر مراجعة: 02/03/2014 21:41:34 - المراجعة: 2.3

  • Microsoft Excel 97 Standard Edition
  • Microsoft Excel 95 Standard Edition
  • Microsoft Excel 5.0 Standard Edition
  • Microsoft Query 2000
  • kbnosurvey kbarchive kbmt kbprogramming KB151278 KbMtar
تعليقات

KB Article Diagnostics

Document Name: 151278

Elements not parsed: 0

Nodes not parsed: 0

E tags not understood: 5

Output tags: 0

Output tags ignored: 0