title image


Smiley Re: Binärdatei erzeugen


Dim intFile As Integer

Dim bytArr() As Byte



'// den Bytearray eben entsprechend

'// dimensionieren und befüllen

ReDim bytArr(10)

bytArr(0) = &H3A



'// Bytearray in Datei schreiben

intFile = FreeFile

Open "C:\Pfad\Datei.bin" For Binary As #intFile

Put #intFile, , bytArr

Close #intFile


Gruß
Gaga

___________________________________________________________________

Profilösungen für VB6
wenn nicht anders angegeben, sind alle Codebeispiele nicht getestet, nur getippt


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: