title image


Smiley Re: Kopieren von zwei verschiedenen Dateiformaten in eine Datei
Hallo!Ich bin mir nicht sicher, ob ich richtig verstanden habe, was Du vorhast.Vielleicht entspricht folgendes Beispiel der gesuchten Lösung: Dim iHeaderFile As Integer Dim iPrnFile As Integer Dim iNewFile As Integer Dim sHeaderFile As String Dim sPrnFile As String Dim sNewFile As String Dim sBuffer As String sHeaderFile = "C:\HEADER.TXT" sPrnFile = "C:\DATEI.PRN" sNewFile = "C:\ENDDATEI.XYZ" iHeaderFile = FreeFile Open sHeaderFile For Binary Access Read As #iHeaderFile iPrnFile = FreeFile Open sPrnFile For Binary Access Read As #iPrnFile iNewFile = FreeFile Open sNewFile For Binary Access Write As #iNewFile sBuffer = Input(LOF(iHeaderFile), #iHeaderFile) Put #iNewFile, , sBuffer sBuffer = Input(LOF(iPrnFile), #iPrnFile) Put #iNewFile, , sBuffer Close iHeaderFile Close iPrnFile Close iNewFileGruß, Stefan

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: