Eof

[eXterminator]

I want to read a file, which i don't know the lenght of.

shouldn't that be something like this:

dim temp2(99) as string
temp = freefile
open "whatever.txt" for input as temp
do while eof(temp)
input temp, temp2(i)
i = i +1
loop

[jim mcnamara]

I want to read a file, which i don't know the lenght of. 

shouldn't that be something like this: 

dim temp2(99) as string 
temp = freefile 
i=1
open "whatever.txt" for input as temp 
do while NOT eof(temp) 
input temp, temp2(i) 
i = i +1 
loop

[eXterminator]

input temp, temp2(i) doesn't work.
it says "Expected #"

[mepaco]

Originally posted by jim mcnamara

I want to read a file, which i don't know the lenght of. 

shouldn't that be something like this: 

dim temp2(99) as string 
temp = freefile 
i=1
open "whatever.txt" for input as #temp 
do while NOT eof(temp) 
input #temp, temp2(i) 
i = i +1 
loop

then add them

[eXterminator]

k, its working now, thanks!

[mepaco]

anytime

[PeterPigmy]

Originally posted by eXterminator
I want to read a file, which i don't know the lenght of.

shouldn't that be something like this:

dim temp2(99) as string
temp = freefile
open "whatever.txt" for input as temp
do while eof(temp)
input temp, temp2(i)
i = i +1
loop

Always hoping, of course, that the file has less than 100 lines in it, otherwise consider using redim????

Pigmy

[eXterminator]

I know, that was just an example. It read code looks a bit different.

[eXterminator]

Argh,!!! my mean "The real code look a bit different"

[jim mcnamara]

fairly goof proof way to read a text file into an array

Dim str() as string
Dim tmp as String
Open "myfile" for input as #1
tmp = input(LOF(1),1)
str=Split(tmp,vbCrLf)

The number of array elements is Ubound(str)