Eli olen tekemässä tälläistä filun siirto ohjelmaa vb 6 käyttäen winsock komponenttia, mutta onkelmana on se että miten voin räpeltää tiedostoja ilman että tallennuksen yhteydessä se menee käyttökelvottomaksi. Eli siis avaan tiedoston clientissaa. Tällä hetkellä open lauseella olen koittanut myös fsoota, mutta kun sendin datan server osioon ja tallennan sen siellä tiedosto on käyttökelvoton. Miten se pitää avata tai käsitellä että se ei ole käyttökelvoton.
Miten tallennettu tiedosto eroaa alkuperäisestä?
Oletko kokeillut lukea ja tallentaa tietoa binäärimuodossa (Open ... For Binary ...)? Silloin ei muutu mitään.
Lisätietoa:
http://vb.ohjelmointiputka.net/?Open - http://vb.ohjelmointiputka.net/?Get - http://vb.ohjelmointiputka.net/?Put
Jos yrität siirtää binääritiedostoa sinun täytyy avata se binääritilassa. Esim. sovellukset ja kuvat ovat binääritiedostoja. Laita vaikka tähän tiedoston lähetyskoodi sekä koodi jolla kirjoitat niin katsotaan..
Antti Laaksonen kirjoitti:
Oletko kokeillut lukea ja tallentaa tietoa binäärimuodossa (Open ... For Binary ...)? Silloin ei muutu mitään.
juu voisitko selvittää esim miten teen tuon kuvalla otetaan esim mulla on c asemalla kuva nimeltä jee.jpeg se pitäisi siirtää asemalle d vb ohjelman kautta ei filecopyna vaan tuolla binaari jutskalla miten tekisin sen tätä samaa juttua sitten jos saan tähän selkeän vastauksen niin voin soveltaa sittten winsockin kanssa :)
Tässä tulee esimerkki:
Dim data() As Byte ' datan luku tiedostosta taulukkooon Open "c:\jee.jpeg" For Binary As #1 ReDim data(LOF(1) - 1) As Byte Get #1, , data Close #1 ' datan tallennus taulukosta tiedostoon Open "d:\jee.jpeg" For Binary As #1 Put #1, , data Close #1
Taulukon koko muutetaan tiedoston kokoiseksi (LOF = Length of File), jolloin luku ja tallennus tapahtuvat yhdellä komennolla.
Aihe on jo aika vanha, joten et voi enää vastata siihen.