Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Niepelny odczyt z pliku
i-spy



Typ: neutral
Postów: 44
Zarejestrowany: Apr 2004
Niepelny odczyt z pliku

Witam!

Moj problem dotyczy odczytu z pliku w trybie binarnym. Pod tym linkiem:
http://www.laizsme.edu.pl/~vbprograms/io/file.cfg
znajduje się plik, ktory ma w sobie zapisanych 506 znakow. Chcialbym te znaki zaladowac do zmiennej w moim programie. Uzywam do tego ponizszej instrukcji:

intNr_pliku = FreeFile

Open "file.cfg" For Binary Access Read As intNr_pliku
        Get #intNr_pliku, , varString
Close #intNr_pliku

Niestety po sprawdzeniu zmiennej varString funkcja len() okazuje sie ze zawiera ona tylko 326 znakow. Co robie nie tak?? Co mam zmienic, aby dzialalo i odczytywalo wszystkie 506 znakow?

Pozdrawiam!


_____________________________________________
Oto moja pasja...
www.vbprograms.prv.pl
!Zapraszam

10-08-2004 15:31
Pokaż profil i-spy  Wyślij email do i-spy   Odwiedź stronę i-spy       2121177
xEagle2



Typ: neutral
Postów: 280
Zarejestrowany: Jul 2003

Hm..... wczytaj zmienne tez do RichTextBoxa i tam sprawdz jezeli też tam wyjdzie 326 zmalów to niewiem


_____________________________________________
Co oznacza NET ? Natychmiastowa Eksplozja Trojanów

10-08-2004 15:51
Pokaż profil xEagle2  Wyślij email do xEagle2       
bisiek




Typ: neutral
Postów: 487
Zarejestrowany: Jul 2003

Użyj odczytu binarego do tablicy bajtów.

DIm plik() as byte

ntNr_pliku = FreeFile

Open "file.cfg" For Binary Access Read As intNr_pliku
redim plik(1 to lof(intNr_pliku)) as byte
        Get intNr_pliku, , plik
Close intNr_pliku


odczytuje całość


_____________________________________________
www.mob.abc.pl - moja strona o VB

10-08-2004 16:29
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
Wszystkich odpowiedzi: 2 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1