[Resolved] Reading through a File

[The Hobo]

This is my first jump into VB.NET, and I'm trying to make a simple To Do list. I want to open a text file, read each line, and add the data to a ListView. This is the code I have:

Dim fs As New IO.FileStream("todo.txt", IO.FileMode.Open)
Dim sr As New IO.StreamReader(fs)
 
Do Until sr.Peek = -1
    MsgBox(sr.ReadLine())
Loop
 
fs.Close()

The file contains three lines, but no message box is ever shown. What am I doing wrong?

[But_Why]

Just a note, try this...

Dim sr As New System.IO.StreamReader("todo.txt")

Do Until sr.Peek = -1
    MessageBox.Show(sr.ReadLine())
Loop

sr.Close()

That works here...

[The Hobo]

Hmm...when I put the todo.txt file in C:\ and then use that path, it works fine.

Is there an App.Path in VB.NET?

[crptcblade]

AppDomain.CurrentDomain.BaseDirectory

[DevGrp]

If the todo.txt is in the same directory as the application, then it should work.

[Crunch]

Why don't you try:

Dim sr As New System.IO.StreamReader("todo.txt")
Dim strToDo As String
 
Do Until sr.Peek = -1
    strToDo = sr.ReadLine()  ' Set break point here
    MessageBox.Show(strToDo)
Loop
 
sr.Close()

... and see if strToDo actually contains anything. I also use StreamReader for text reading but I do it in a little more complicated way:

Dim sr As StreamReader
 
        ' Open the file to read.
        Try
            sr = File.OpenText(strDataFileName)
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Error opening file" + strDataFileName + "!")
            Exit Function
        End Try

In fact from looking at the docs it seems to me that's your problem, you're not actually opening the file.

[The Hobo]

Originally posted by DevGrp
If the todo.txt is in the same directory as the application, then it should work.

It is in the directory with the source code. The executable is placed in the Bin directory when compiled. That was my problem.

Thanks, guys.

[Crunch]

Aha then I guess the Open is implicit and I'm doing an un-needed step.