Reading and Writing Files

[Audax321]

Im completely lost... it was so easy in VB6 to read and write files. Couldnt they just leave that functionality as it was

All I want to do is write to settings.ini (in installation folder where my app is) to save settings. And then load the settings from settings.ini when the program runs...

Also is there anyway to bring a window to the front by clicking on the notification icon...NEVER MIND THIS QUESTION.. I FIGURED IT OUT!!

 

[Robby]

There are many ways to read/write files, heres one.

You need one List Box on your form.

    Private Function GetFromFile() As Boolean
        Try
            List1.Items.Clear() Clear the list before we can load from the text file

            Dim sr As StreamReader
            sr = File.OpenText(Application.StartupPath & "\Test.txt")

            Dim strItems As String
            loop through the text file
            While sr.Peek <> -1
                strItems = sr.ReadLine()
                List1.Items.Add(strItems) add the contents to the list box
            End While
            sr.Close() close the file

            Return True file was there...with no errors
        Catch ignore errors
            Return False most likely we dont have file permission (to delete)
        End Try

    End Function

    Private Function SaveToFile() As Boolean
        Try

            Dim bFile As String = Dir(Application.StartupPath & "\Test.txt")
            If bFile.Length > 0 Then Check if the file exists and delete it
                Kill(Application.StartupPath & "\Test.txt")
            End If

            Create the file again or for the first time
            Dim sb As New FileStream(Application.StartupPath & "\Test.txt", FileMode.OpenOrCreate)
            Dim sw As New StreamWriter(sb)
            Dim nCounter As Integer

            loop through the list and save one line at a time
            For nCounter = 0 To List1.Items.Count - 1
                sw.Write(List1.Items.Item(nCounter).ToString & vbCrLf)
            Next
            sw.Close()
            Return True
        Catch ignore errors
            Return False
        End Try

    End Function

 

[Divil]

Audax321: If they had left file i/o the same as it was in vb6, I would have personally gone and found Bill Gates and whacked him upside the head with a rusty Input statement.

 

[Audax321]

LOL... well I mean have both functionality so you could use either... the code to read/write a simple ini file is so long now...

 

[Divil]

I dunno, theres one line to open the file, one line to read a line from it, and one line to close it... not much difference really

 

[Robby]

Remove my error checking and comments, youre left with a few lines of code. As divil said, theres not much difference.