Åben og gem i binær

Hej.

Jeg er ikke den store binære ørn, men har dog fundet ud af at skrive / ændre ID3-tags i MP3-filer.  Du kan få kildekoden til det projekt, jeg har lånt den fra, men det væsentlige er hvorledes der åbnes, læses og skrives.  Faktisk indlæses hele filen ikke, kun den del jeg vil ændre på.    http://jkfsoft.dk/id3_tag.htm

ID3-tag'en står i filens sidste 127 bytes.


    filepos = FileLen(thisfile) - 127
    Open thisfile For Binary As #2
      Get #2, filepos, Data
    Close #2

Efter manupulering af de 127 bytes til en variabel 'linie'

  Open thisfile For Binary Access Write As #1
      Seek #1, FileLen(thisfile) - 127
      Put #1, , linie
  Close #1

M.v.h.  Jørn

I korte træk vil jeg vide, hvordan man, åbner en fil i base 2 (binær) og, hvordan man gemmer den igen et andet sted som samme filtype, at uden den tager skade.

> Åben c:\test.mp3 som binære kode (00101010010100)
> Gem igen som c:\test2.mp3 uden tab af data.

Hej.

Skal du slet ikke ændre på filen, så kan du jo bare kopiere den.

FileCopy sti_nr1 & "\navn1.mp3", sti_nr2 & "\navn2.mp3"
kill sti_nr1 & "\navn1.mp3"

M.v.h. Jørn

Ja, men så lærer jeg jo ikke at bruge binær ;)

Hej.

Jeg forstår ikke hvad du vil.

M.v.h.  Jørn

Jeg vil åbne en tilfældig fil i VB i binær kode og gemme den igen, for at lære hvordan man gør. Jeg har fået af vide, at jeg skal loope eksemplet fra tidligere nævnte tutorial for at få det til at virke rigtigt.

Så det ligger vidst i, hvordan jeg får den her til at hente hele filen hvis jeg har forstået det rigtigt:

Dim nFileNum As Integer
Dim nLen As Integer, sString As String
nFileNum = FreeFile
Open "c:\a.ip" For Binary Access Read Lock Read Write As #nFileNum
    'read the length of the string
    Get #nFileNum, , nLen
    'initialize the string with the correct number
    'of spaces
    sString = Space$(nLen)
    Get #nFileNum, , sString
Close #nFileNum
MsgBox sString

Hej.

Du får ikke filens indhold præsenteret med nuller og ét-taller.  Tegnsættet på en computer er jo enten ansi eller ascii og både billeder, musik og kopilerede filer vises med disse tegn.  Altså en blanding af bogstaver, tal, særtegn og de ikke printbare under dec(32).  Faktisk ligesom du ser et jpg-billede hvis du åbner det i notepad.

Men jeg har ellers ikke mere at tilføje i tråden.

M.v.h. Jørn

Hvordan hænger det så sammen med at man ikke kan åbne en hvilken som helst fil i notepad og gemme den uden den tager skade?