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

كيفية قراءة "و" عرض البيانات الثنائية في ASP

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

اضغط هنا لرابط المقالة باللغة الانجليزية193998
الموجز
يوضح هذا المقال كيفية قراءة وعرض البيانات الثنائية باستخدام صفحات "الملقم النشطة".

نقدر للمطورين العديد من سهولة استخدام Scripting.FileSystemObject في فتح ملف ASCII وعرض محتوياته ثم في Microsoft Word أو Microsoft Excel من داخل Internet Explorer. في الخاص به ابتداء الحالي ASP لا مباشرة توفر أية كائنات يتوافق لقراءة الملفات التي تحتوي على بيانات ثنائية مثل ورقة عمل Excel مع وحدات الماكرو أو ملف Adobe Acrobat (.pdf) صورة .gif أو أية ملفات أخرى تحتوي على البيانات الثنائية. ومع ذلك، يمكن كتابة المطورين ASP كائن العمل المخصص أو مكون يضيف هذه الوظيفة.
معلومات أخرى
اكتب جزءاً يوفر التعليمات البرمجية لـ ASP يتلقى ويعرض الملف الثنائي باستخدام MIME مناسب ثم II جزء يوضح كيفية إنشاء Visual Basic 5.0 (أو أحدث) DLL ActiveX المكون الذي يمتد القدرة ASP في قراءة البيانات الثنائية.

الجزء 1: نموذج ASP التي فتح ورقة عمل Excel على المتضمن وحدات الماكرو

   <%   Response.buffer = TRUE   Response.ContentType = "application/x-msexcel"   Dim vntStream   Set oMyObject = Server.CreateObject("MyObject.BinRead")   vntStream = oMyObject.readBinFile("c:\temp\tempxls.xls")   Response.BinaryWrite(vntStream)   Set oMyObject = Nothing   Response.End   %>				

ملاحظة: ملفات Acrobat عن تغيير نوع MIME باستخدام Response.ContentType = "التطبيق/pdf". للحصول على صورة .gif استخدم Response.ContentType = "صورة/gif".

الجزء الثاني: Visual Basic 5.0 ActiveX DLL (MyObject.BinRead)

لإنشاء المكون الذي يقوم بإجراء ثنائي قراءة بتنفيذ الخطوات التالية:
  1. إنشاء مشروع DLL ActiveX جديد في Visual Basic 5.0 أو أحدث.
  2. إعادة تسمية المشروع MyObject.
  3. إعادة تسمية فئة الوحدة النمطية BinRead.
  4. قص ثم قم بلصق التعليمة البرمجية التالية في مقطع Declarations عام من فئة الوحدة النمطية:
       Function readBinFile(ByVal bfilename As String) As Variant          Dim fl As Long          Dim FileNum As Long          Dim binbyte() As Byte          Dim binfilestr As String          On Error GoTo errHandler                    FileNum = FreeFile          Open bfilename For Binary Access Read As #FileNum          fl = FileLen(bfilename)          ReDim binbyte(fl)          Get #FileNum, , binbyte          Close #FileNum          readBinFile = binbyte          Exit Function      errHandler:          Exit Function      End Function						
  5. حفظ المشروع.
  6. في القائمة ملف انقر فوق جعله MyObject.dll.
إذا كان ملقم ويب على جهاز منفصلة من حيث قمت بإنشاء المكون, تحتاج إلى نسخ المكون إلى ملقم ويب باستخدام RegSvr32 وتسجيله.

لتضمين الملف الذي تم إنشاؤه جزئي I إلى آخر صفحة ASP الذي يحتوي على النص أو التنسيقات الأخرى ، استخدام ملقم الجانب تتضمن جملة.

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

خصائص

رقم الموضوع: 193998 - آخر مراجعة: 03/16/2005 20:29:29 - المراجعة: 2.5

Microsoft Visual Basic 5.0 Professional Edition, Microsoft Visual Basic 6.0 Professional Edition, Microsoft Visual Basic 5.0 Enterprise Edition, Microsoft Visual Basic Enterprise Edition for Windows 6.0, Microsoft Active Server Pages 4.0

  • kbmt kbcode kbfso kbhowto kbscript KB193998 KbMtar
تعليقات
/html>ml>t=">t/JavaScript" async=""> var varAutoFirePV = 1; var varClickTracking = 1; var varCustomerTracking = 1; var Route = "76500"; var Ctrl = ""; document.write(" &t=">-binding" id="language-es-es">España - Español
Paraguay - Español
Venezuela - Español
mp;t=">/c1.microsoft.com/c.gif?DI=4050&did=1&t=">1; var varCustomerTracking = 1; var Route = "76500"; var Ctrl = ""; document.write(" mp;t=">