FileInfo.OpenWrite Methode
Definitie
Belangrijk
Bepaalde informatie heeft betrekking op een voorlopige productversie die aanzienlijk kan worden gewijzigd voordat deze wordt uitgebracht. Microsoft biedt geen enkele expliciete of impliciete garanties met betrekking tot de informatie die hier wordt verstrekt.
Hiermee maakt u een alleen-schrijven FileStream.
public:
System::IO::FileStream ^ OpenWrite();
public System.IO.FileStream OpenWrite();
member this.OpenWrite : unit -> System.IO.FileStream
Public Function OpenWrite () As FileStream
Retouren
Een niet-gedeeld FileStream object met alleen-schrijven voor een nieuw of bestaand bestand.
Uitzonderingen
Het pad dat is opgegeven bij het maken van een exemplaar van het FileInfo object, heeft het kenmerk Alleen-lezen of is een map.
Het pad dat is opgegeven bij het maken van een exemplaar van het FileInfo object, is ongeldig, zoals op een niet-toegewezen station.
Voorbeelden
In het volgende voorbeeld wordt een bestand geopend voor schrijven en wordt vervolgens gelezen uit het bestand.
using System;
using System.IO;
using System.Text;
class Test
{
public static void Main()
{
string path = @"c:\Temp\MyTest.txt";
FileInfo fi = new FileInfo(path);
// Open the stream for writing.
using (FileStream fs = fi.OpenWrite())
{
Byte[] info =
new UTF8Encoding(true).GetBytes("This is to test the OpenWrite method.");
// Add some information to the file.
fs.Write(info, 0, info.Length);
}
// Open the stream and read it back.
using (FileStream fs = fi.OpenRead())
{
byte[] b = new byte[1024];
UTF8Encoding temp = new UTF8Encoding(true);
while (fs.Read(b,0,b.Length) > 0)
{
Console.WriteLine(temp.GetString(b));
}
}
}
}
//This code produces output similar to the following;
//This is to test the OpenWrite method.
Imports System.IO
Imports System.Text
Public Class Test
Public Shared Sub Main()
Dim path As String = "c:\Temp\MyTest.txt"
Dim fi As FileInfo = New FileInfo(path)
Dim fs As FileStream
' Open the stream for writing.
fs = fi.OpenWrite()
Dim info As Byte() = _
New UTF8Encoding(True).GetBytes("This is to test the OpenWrite method.")
' Add some information to the file.
fs.Write(info, 0, info.Length)
fs.Close()
'Open the stream and read it back.
fs = fi.OpenRead()
Dim b(1023) As Byte
Dim temp As UTF8Encoding = New UTF8Encoding(True)
Do While fs.Read(b, 0, b.Length) > 0
Console.WriteLine(temp.GetString(b))
Loop
fs.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 to test the OpenWrite method.
'
'
'
'
'
'
'
'
'
'
'
'
Opmerkingen
Met de OpenWrite methode wordt een bestand geopend als er al een bestaat voor het bestandspad of als er nog geen nieuw bestand bestaat. Voor een bestaand bestand wordt de nieuwe tekst niet toegevoegd aan de bestaande tekst. In plaats daarvan worden de bestaande tekens overschreven met de nieuwe tekens. Als u een langere tekenreeks overschrijft (zoals 'Dit is een test van de Methode OpenWrite') met een kortere tekenreeks (zoals 'Tweede uitvoering'), bevat het bestand een combinatie van de tekenreeksen ('Tweede uitvoeringstest van de OpenWrite-methode').