How to rewind a file

[**Developer**]

Assume that the first line of a file is read with:

InputLine = LineInput(FileN um)
I believe a file can be rewound as follows:
(So that the first line can be reread)
FileClose(FileN um) 'Rewind

FileOpen(FileNu m, mDataInFullPath , OpenMode.Input)

InputLine = LineInput(FileN um)

Isn't there a better way?



Thanks

[Ken Halter]

" **Developer**" <RE************ *@a-znet.com> wrote in message
news:OE******** ******@TK2MSFTN GP14.phx.gbl...

Assume that the first line of a file is read with:

InputLine = LineInput(FileN um)

Looks like the Seek method is still supported so..... no need to close, just
use Seek.

Seek(FileNum, 1)

I'd provide the sample code the VB6 migration wizard provided but.... VSNet
crashed and burned when I hit F1 (or, maybe 90 seconds isn't enough to open
help anymore <sigh>) to look up help on the Seek method so.....

fwiw, I've written VB6 apps that use Seek to mark (and store) the beginning
of each line as they're read so I can return to any line in the file at
will. Surely, there's similar support in .Net (if you can keep it running
anyway ;-)

--
Ken Halter - MS-MVP-VB (visiting from VB6 world) - http://www.vbsight.com
Please keep all discussions in the groups..

[**Developer**]

I wasn't sure if Seek worked with LineInput.

Thanks
"Ken Halter" <Ken_Halter@Use _Sparingly_Hotm ail.com> wrote in message
news:ui******** ******@TK2MSFTN GP14.phx.gbl...

" **Developer**" <RE************ *@a-znet.com> wrote in message
news:OE******* *******@TK2MSFT NGP14.phx.gbl.. .

Assume that the first line of a file is read with:

InputLine = LineInput(FileN um)

Looks like the Seek method is still supported so..... no need to close,
just use Seek.

Seek(FileNum, 1)

I'd provide the sample code the VB6 migration wizard provided but....
VSNet crashed and burned when I hit F1 (or, maybe 90 seconds isn't enough
to open help anymore <sigh>) to look up help on the Seek method so.....

fwiw, I've written VB6 apps that use Seek to mark (and store) the
beginning of each line as they're read so I can return to any line in the
file at will. Surely, there's similar support in .Net (if you can keep it
running anyway ;-)

--
Ken Halter - MS-MVP-VB (visiting from VB6 world) - http://www.vbsight.com
Please keep all discussions in the groups..

[tomb]

Ken Halter wrote:

" **Developer**" <RE************ *@a-znet.com> wrote in message
news:OE******* *******@TK2MSFT NGP14.phx.gbl.. .

Assume that the first line of a file is read with:

InputLine = LineInput(FileN um)

Looks like the Seek method is still supported so..... no need to close, just
use Seek.

Seek(FileNum , 1)

I'd provide the sample code the VB6 migration wizard provided but.... VSNet
crashed and burned when I hit F1 (or, maybe 90 seconds isn't enough to open
help anymore <sigh>) to look up help on the Seek method so.....

fwiw, I've written VB6 apps that use Seek to mark (and store) the beginning
of each line as they're read so I can return to any line in the file at
will. Surely, there's similar support in .Net (if you can keep it running
anyway ;-)

Yes, seek(FileNum,1) is the way, and seek(FileNum) still returns the
current position. This is regardless of the method used to read the file.

Tom

[**Developer**]

thanks.

I noticed you send HTML. I was under the impression that many do not like
to receive HTML.

I like HTML but avoid it because it may be inconvenient for some.

Is that an obsolete notion?

"tomb" <to**@technetce nter.com> wrote in message
news:sc******** **********@bign ews1.bellsouth. net...
Ken Halter wrote:

" **Developer**" <RE************ *@a-znet.com> wrote in message
news:OE******** ******@TK2MSFTN GP14.phx.gbl...

Assume that the first line of a file is read with:

InputLine = LineInput(FileN um)

Looks like the Seek method is still supported so..... no need to close, just
use Seek.

Seek(FileNum, 1)

I'd provide the sample code the VB6 migration wizard provided but.... VSNet
crashed and burned when I hit F1 (or, maybe 90 seconds isn't enough to open
help anymore <sigh>) to look up help on the Seek method so.....

fwiw, I've written VB6 apps that use Seek to mark (and store) the beginning
of each line as they're read so I can return to any line in the file at
will. Surely, there's similar support in .Net (if you can keep it running
anyway ;-)
Yes, seek(FileNum,1) is the way, and seek(FileNum) still returns the current
position. This is regardless of the method used to read the file.

Tom