So lesen und anzeigen Binärdaten in ASP

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 193998 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Alles erweitern | Alles schließen

Auf dieser Seite

Zusammenfassung

Dieser Artikel veranschaulicht, wie lesen und Anzeigen von Binärdaten mithilfe von Active Server Pages.

Viele Entwickler schätzen die Benutzerfreundlichkeit verwenden das Scripting.FileSystemObject zum Öffnen von ASCII-Datei und zeigen den Inhalt in Microsoft Word oder Microsoft Excel aus in Internet Explorer. In seiner aktuellen Einführung bietet ASP direkt keine vergleichbaren Objekte, Dateien lesen, die enthalten binäre Daten, wie eine Excel-Arbeitsblatt mit Makros, Adobe Acrobat (PDF)-Datei, ein GIF-Bild oder andere Dateien, die Binärdaten enthalten. Jedoch kann ein ASP-Entwickler schreiben, ein benutzerdefiniertes Geschäftsobjekt oder eine Komponente, die diese Funktionalität hinzufügt.

Weitere Informationen

Geben Sie Teil I den ASP-Code bereitstellt, der empfangen und zeigt dann die Binärdatei mit einer entsprechenden MIME, und zeigt, wie die Visual Basic 5.0 (oder höhere)-ActiveX-DLL-Komponente erstellt, die die Funktion von ASP zum Lesen binärer Daten erweitert wird Teil II.

Teil I: ASP Beispielcodes zum Öffnen einer Excel-Arbeitsblatt mit Makros

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

Hinweis : für Acrobat-Dateien, ändern den MIME-Typ mithilfe von Response.ContentType = "Application/Pdf". Verwenden Sie für ein GIF-Bild Response.ContentType = "Image/Gif".

Teil II: Der Visual Basic 5.0 ActiveX-DLL (MyObject.BinRead)

Um die Komponente zu erstellen, die Binärdatei lesen durchführt, führen Sie die folgenden Schritte aus:
  1. Erstellen Sie ein neues ActiveX-DLL-Projekt in Visual Basic 5.0 oder höher.
  2. Benennen Sie das Projekt MyObject.
  3. Benennen Sie das Klassenmodul BinRead.
  4. Schneiden Sie aus und fügen Sie den folgenden Code allgemeinen Deklarationsbereich des Klassenmoduls ein:
       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. Speichern Sie das Projekt.
  6. Klicken Sie im Datei-Menü auf MyObject.dll erstellen.
Wenn Ihr Webserver auf einem separaten Computer ist aus, in denen die Komponente erstellt, müssen Sie die Komponente auf dem Webserver kopieren und registrieren mit RegSvr32.

Integrieren Sie die erstellte Datei in Teil I in eine andere ASP-Seite, die Text oder andere Formatierungen, einen Server verwenden, hat include Seite-Anweisung.

Eigenschaften

Artikel-ID: 193998 - Geändert am: Mittwoch, 16. März 2005 - Version: 2.5
Die Informationen in diesem Artikel beziehen sich auf:
  • 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
Keywords: 
kbmt kbcode kbfso kbhowto kbscript KB193998 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 193998
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.

Ihr Feedback an uns

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com