' https://stackoverflow.com/questions/660312/how-can-i-read-a-binary-file-using-vba Sub BtnReadBinaryClick() ' Dateipfad + Dateiname Dim sFile As String sFile = "c:\\temp\\test.bin" ' Array für Binärdaten Dim byaFileData() As Byte ' Dateizeiger Dim fd As Integer ' nächsten freien Dateizeiger holen fd = FreeFile ' Datei zum binären Lesen öffnen Open sFile For Binary Access Read As #fd ' Array an Dateigröße anpassen ReDim byaFileData(0 To LOF(fd) - 1) ' Datei in Array einlesen Get #fd, , byaFileData ' hier byaFileData bearbeiten ... ' Datei schließen Close #fd End Sub
Kategorien
-
Neueste Beiträge
- [ABAP] Testen, ob per RFC ein Funktionsbaustein im Zielsystem vorhanden ist
- [SAP] LSMW: Materialstammdaten per Dateiupload pflegen
- [ABAP] Editierbares SALV-Grid (IF_SALV_GUI_OM_EXTEND_GRID_API, IF_SALV_GUI_OM_EDIT_RESTRICTED)
- [ABAP] Neues SAP-Fenster (Modus) öffnen und wieder schließen
- [ABAP] Infos zu Datenelementen und Domänen lesen
- [ABAP] Informationen zu einem Dynpro ermitteln
- [ABAP] Installierte Softwarekomponenten ermitteln
- [SAP] Ändern des SAP Easy Access Anmeldebildes (Einstiegsbild)
- [ABAP] Eigenschaften einer Klasse prüfen
- [ABAP] Element des Selektionsbiles über RadioButtons ein-/ausblenden