vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Datei öffnen 
Autor: matlen
Datum: 14.04.06 10:42

Hallo.
Wen ich eine Datei nach folgendem Schema öffne:

 FileNr = FreeFile
 Open FileName For Binary As #FileNr
 InputFile = Space$(LOF(FileNr))
 Get #FileNr, , InputFile
 Close #FileNr
befindet sich der Dateiinhalt als Textzeichen in InputFile.
Gibt es eine Möglichkeit das der Dateiinhalt gleich als Hexzahlen in InputFile vorliegt.

Eine nachträgliche Konvertierung in eine Schleife habe ich schon probiert.
Es Funktioniert zwar, dauert aber recht lange wenn die zu öffnede Datei zB. 500KB groß ist.

 For i = 1 To len(InputFile)
    HexByte = Hex(Asc(Mid$(InputFile, i, 1)))
    If Len(HexByte) = 1 Then HexByte = "0" & HexByte ' Hexzahl soll immer 2 
    ' Zeichen groß sein
    FileHex = FileHex & HexByte
 Next i
danke
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Datei öffnen586matlen14.04.06 10:42
Re: Datei öffnen285OldMan14.04.06 12:08
Re: Datei öffnen275matlen14.04.06 13:23
Re: Datei öffnen309OldMan14.04.06 13:30
Re: Datei öffnen275matlen14.04.06 13:51
Re: Datei öffnen277OldMan14.04.06 13:59
Re: Datei öffnen341matlen14.04.06 14:30

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel