FileInfo.OpenText Método
Definição
Importante
Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.
Cria uma StreamReader codificação COM UTF8 que lê de um arquivo de texto existente.
public:
System::IO::StreamReader ^ OpenText();
public System.IO.StreamReader OpenText();
member this.OpenText : unit -> System.IO.StreamReader
Public Function OpenText () As StreamReader
Retornos
Um novo StreamReader com codificação UTF8.
Exceções
O chamador não tem a permissão necessária.
O arquivo não foi encontrado.
Name é somente leitura ou é um diretório.
O caminho especificado é inválido, como estar em uma unidade não mapeada.
Exemplos
O exemplo a seguir lê o texto de um arquivo.
using System;
using System.IO;
using System.Text;
class Test
{
public static void Main()
{
string path = @"c:\MyTest.txt";
FileInfo fi = new FileInfo(path);
// Check for existing file
if (!fi.Exists)
{
// Create the file.
using (FileStream fs = fi.Create())
{
Byte[] info =
new UTF8Encoding(true).GetBytes("This is some text in the file.");
// Add some information to the file.
fs.Write(info, 0, info.Length);
fs.Close();
}
}
// Open the stream and read it back.
using (StreamReader sr = fi.OpenText())
{
string s = "";
while ((s = sr.ReadLine()) != null)
{
Console.WriteLine(s);
}
}
}
}
//This code produces output similar to the following;
//results may vary based on the computer/file structure/etc.:
//
//This is some text in the file.
//
Imports System.IO
Imports System.Text
Public Class OpenTextTest
Public Shared Sub Main()
Dim path As String = "c:\MyTest.txt"
Dim fi As New FileInfo(path)
' Check for existing file
If fi.Exists = false Then
' Create the file.
Dim fs As FileStream = fi.Create()
Dim info() As Byte = _
New UTF8Encoding(true).GetBytes("This is some text in the file.")
' Add some information to the file.
fs.Write(info, 0, info.Length)
fs.Close()
End If
' Open the stream and read it back.
Dim sr As StreamReader = fi.OpenText()
Dim s As String = ""
While sr.EndOfStream = false
s = sr.ReadLine()
Console.WriteLine(s)
End While
sr.Close()
End Sub
End Class
'This code produces output similar to the following;
'results may vary based on the computer/file structure/etc.:
'
'This is some text in the file.
'