Bạn hiện đang ngoại tuyến, hãy chờ internet để kết nối lại

Làm thế nào để đọc và hiển thị dữ liệu nhị phân trong ASP

QUAN TRỌNG: Bài viết này được dịch bằng phần mềm dịch máy của Microsoft chứ không phải do con người dịch. Microsoft cung cấp các bài viết do con người dịch và cả các bài viết do máy dịch để bạn có thể truy cập vào tất cả các bài viết trong Cơ sở Kiến thức của chúng tôi bằng ngôn ngữ của bạn. Tuy nhiên, bài viết do máy dịch không phải lúc nào cũng hoàn hảo. Loại bài viết này có thể chứa các sai sót về từ vựng, cú pháp hoặc ngữ pháp, giống như một người nước ngoài có thể mắc sai sót khi nói ngôn ngữ của bạn. Microsoft không chịu trách nhiệm về bất kỳ sự thiếu chính xác, sai sót hoặc thiệt hại nào do việc dịch sai nội dung hoặc do hoạt động sử dụng của khách hàng gây ra. Microsoft cũng thường xuyên cập nhật phần mềm dịch máy này.

Nhấp chuột vào đây để xem bản tiếng Anh của bài viết này:193998
TÓM TẮT
Bài viết này cho thấy làm thế nào để đọc và hiển thị dữ liệu nhị phân bằng cách sử dụng máy chủ đang hoạt độngCác trang.

Các nhà phát triển nhiều đánh giá cao sự dễ dàng của việc sử dụng Scripting.FileSystemObjectđể mở một tập tin ASCII và sau đó hiển thị nội dung của nó trong Microsoft Word hoặcMicrosoft Excel từ trong Internet Explorer. Trong khi ra đời hiện tại,ASP không trực tiếp cung cấp bất kỳ vật thể so sánh để đọc tập tin đóchứa dữ liệu nhị phân như một bảng tính Excel với macro, một AdobeTập tin Acrobat (.pdf), một .gif, hoặc bất kỳ các tập tin chứa nhị phândữ liệu. Tuy nhiên, một nhà phát triển ASP có thể viết một đối tượng tùy chỉnh kinh doanh hoặcthành phần mà thêm chức năng này.
THÔNG TIN THÊM
Phần tôi cung cấp mã ASP nhận được và sau đó hiển thị nhị phântập tin bằng cách sử dụng một thích hợp MIME loại, và một phần II cho thấy làm thế nào để tạo ra cácVisual Basic 5,0 (hoặc sau này) ActiveX DLL phần kéo dài cáckhả năng của ASP để đọc dữ liệu nhị phân.

Phần I: ASP mẫu mà sẽ mở ra một bảng tính Excel có chứa macro

   <%   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   %>				

LƯU Ý: Đối với tập tin Acrobat, thay đổi kiểu MIME bằng cách sử dụng Response.ContentType= "ứng dụng/pdf". Đối với một hình ảnh .gif, sử dụng Response.ContentType ="hình ảnh/gif".

Phần II: Visual Basic 5.0 ActiveX DLL (MyObject.BinRead)

Để tạo ra các thành phần thực hiện đôi đọc, thực hiện cácbước sau:
  1. Tạo một dự án ActiveX DLL mới Visual Basic 5.0 hoặc sau đó.
  2. Đổi tên dự án MyObject.
  3. Đổi tên lớp mô-đun BinRead.
  4. Cắt và dán đoạn mã sau vào phần khai báo chung Lớp Module:
       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. Lưu dự án.
  6. Trên menu Tệp, bấm vào làm cho MyObject.dll.
Nếu máy chủ Web của bạn là trên máy riêng biệt từ nơi mà bạn đã tạo cácthành phần, bạn cần phải sao chép các thành phần vào máy chủ Web và đăng kýnó sử dụng RegSvr32.

Để kết hợp các tập tin tạo một phần tôi vào một trang ASP cóvăn bản hoặc định dạng khác, sử dụng một phía máy chủ bao gồm tuyên bố.

Cảnh báo: Bài viết này được dịch tự động

Thuộc tính

ID Bài viết: 193998 - Xem lại Lần cuối: 08/20/2011 06:21:00 - Bản sửa đổi: 2.0

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

  • kbcode kbfso kbhowto kbscript kbmt KB193998 KbMtvi
Phản hồi