Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Załadownie całego pliku do jednej zmiennej
anonim




Typ: Nie zarejestrowany
Załadownie całego pliku do jednej zmiennej

Jest jakiś prosty sposób na załadowanie zawartości pliku do jednej zmiennej? wygląda to tak: Program zapisuje różne dane do pliku a później chce żeby załadowal te wszystkie dane(z pliku) do jednej zmiennej. Z góry dziękuje za wszelaką pomoc

02-04-2005 11:16
  
DJK



Typ: neutral
Postów: 871
Zarejestrowany: Feb 2004

Hmmm - dziwny to sposób na zapisywanie zawartości pliku do zmiennej (co będzie jak plik będzie duży) ale cóż.

Jak wiesz jak otworzyć plik i odczytać linię z pliku to wystarczy stworzyć tablicę albo kolekcję i do każdego wiersza tablicy lub kolekcji dodawać linię po linii.


_____________________________________________
Jeśli można coś zrobić w sposób optymalny to czemu nie

02-04-2005 15:29
Pokaż profil DJK  Wyślij email do DJK   Odwiedź stronę DJK  
marcin_an
Forumowicz




Typ: neutral
Postów: 1265
Zarejestrowany: Mar 2004


Dim sBuffer As String
Dim fSrc As Integer

sBuffer = Space$(FileLen("c:\jakisplik")
fSrc = Freefile
Open "c:\jakisplik" For Binary Access Read As fSrc
Get fSrc,,sBuffer
Close fSrc



_____________________________________________
Jedzonko dla Google'a:
Forum na temat Visual Basic, C, C++, Pascal, Programowanie, API, PHP, VBA, VB.NET, QBasic, VBScript, Komputery
Moja strona o wszystkim

03-04-2005 10:42
Pokaż profil marcin_an  Wyślij email do marcin_an   Odwiedź stronę marcin_an  
bisiek




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

Jeszcze prościej:

dim fSrc as string
dim fText as string

Open fSrc For Input As #1
fText = Input(LOF(1), 1)
Close #1


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

03-04-2005 15:39
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
marcin_an
Forumowicz




Typ: neutral
Postów: 1265
Zarejestrowany: Mar 2004

Ale tylko pod warunkiem, że dane w pliku mogą być wczytywane w trybie Input i uchwyt 1 nie będzie zajęty.


_____________________________________________
Jedzonko dla Google'a:
Forum na temat Visual Basic, C, C++, Pascal, Programowanie, API, PHP, VBA, VB.NET, QBasic, VBScript, Komputery
Moja strona o wszystkim

03-04-2005 15:47
Pokaż profil marcin_an  Wyślij email do marcin_an   Odwiedź stronę marcin_an  
Wszystkich odpowiedzi: 4 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1