Use FileInfo open a file to read : FileInfo « File Directory « VB.Net

1. VB.Net
2. File Directory
3. FileInfo

Use FileInfo open a file to read

 

Imports System
Imports System.IO

Public Class CopyToTest
    Public Shared Sub Main()
        Try
            Dim fi As New FileInfo("temp.txt")
            Dim sw As StreamWriter = fi.AppendText()
            sw.WriteLine("test...")
            sw.Flush()
            sw.Close()
            Dim sr As New StreamReader(fi.OpenRead())
            While sr.Peek() <> -1
                Console.WriteLine(sr.ReadLine())
            End While
            Dim newfi As FileInfo = fi.CopyTo("newTemp.txt")
            sr = New StreamReader(newfi.OpenRead())
            While sr.Peek() <> -1
                Console.WriteLine(sr.ReadLine())
            End While
        Catch e As Exception
            Console.WriteLine(e.Message)
        End Try
    End Sub
End Class

   
  

Related examples in the same category