Hi,

I have a text file named TEST.txt that looks like this:

Test1
Test2
Test3
Test4

If I want to open this text file and read ONLY "Test2" from it, and put it into a Menu/List box, how do I do so?

Thanks!

Leon

Dim counter
counter=1

' Create a filesystem object
Dim FSO
set FSO = Server.CreateObject("Scripting.FileSystemObject")

Dim Filepath
Filepath = Server.MapPath(Filename)

' Open the file
Dim TextStream
Set TextStream = FSO.openTextFile(filepath, 1, 0)

' Read the file line by line
Do While Not TextStream.AtEndOfStream
   MyVal=TextStream.readline
   If counter=2 then
        'add this to MENU.
   End if
counter=counter + 1
Loop

This works if you are trying to put the particularly the 2nd line in menu. Else you will have to go for other way of doing this.

Hope that helps.

Cheers!

-Vijay G