skrive binær data til fil

<script language="VBScript">
    Dim fso, file, stream
    Set fso = CreateObject("Scripting.FileSystemObject")
        Set file = fso.OpenTextFile("C:\test.txt", 2)
            file.WriteLine "Denne linje skrives i filen!"
            file.Close
            Set stream = Nothing
        Set file = Nothing
    Set fso = Nothing
</script>

//>Rune

ok smukt

Fair nok ;o)
Thx 4 Poinz

//>Rune

medions> hehe... der er da vist ikke meget binær data over det der ;)

Det er nemlig rigtigt cyberfessor - og det vil ikke fungere korrekt.

slapstick: Brug Write() i stedet for WriteLine(). WriteLine skriver et newline tegn efter hver "linie" og det giver problemer når filen skal læses igen (med mindre alle data skrives i én WriteLine() og du tager forbehold for det ekstra (sidste) tegn når du læser filen igen.

Jeg ser lige at den både skriver CR og LF efter hver linie, så det er altså ikke ét men to tegn pr. linie.

i_know>> både det, men bare det at man bruger OpenTextFile proceduren henviser til at vi åbner en TEKSTfil, og ikke en binærfil som f.eks. et jpgbillede eller en zipfil.