通过

FileSystemProxy.WriteAllText 方法

  • 参考

定义

命名空间:
Microsoft.VisualBasic.MyServices
程序集:
Microsoft.VisualBasic.dll
程序集:
Microsoft.VisualBasic.Forms.dll

向文件写入文本。

重载

WriteAllText(String, String, Boolean)

向文件写入文本。
WriteAllText(String, String, Boolean, Encoding)

向文件写入文本。

WriteAllText(String, String, Boolean)

向文件写入文本。

public:
 void WriteAllText(System::String ^ file, System::String ^ text, bool append);
public void WriteAllText (string file, string text, bool append);
member this.WriteAllText : string * string * bool -> unit
Public Sub WriteAllText (file As String, text As String, append As Boolean)

参数

file
String

要写入的文件。

text
String

要写入文件的文本。

append
Boolean

要追加到文件的内容中，则为 True；要覆盖文件的内容，则为 False。 默认值为 False。

例外

ArgumentException

路径无效，原因如下：它是零长度字符串;它仅包含空格;它包含无效字符;或者它是以 \\.\) 开头 (设备路径;它以尾部斜杠结尾。

ArgumentNullException

file 为 Nothing。

FileNotFoundException

文件不存在。

IOException

文件正由另一个进程使用，或者出现 I/O 错误。

PathTooLongException

路径超过了系统定义的最大长度。

NotSupportedException

路径中的文件名或目录名包含冒号 (:)，或格式无效。

OutOfMemoryException

内存不足，无法将字符串写入缓冲区。

SecurityException

该用户缺少查看该路径所必需的权限。

示例

此示例将 行 "This is new text to be added." 写入文件 Test.txt，覆盖文件中的任何现有文本。

My.Computer.FileSystem.WriteAllText("C:\TestFolder1\test.txt",
"This is new text to be added.", False)

本示例将 文件夹中的文件 Documents and Settings 的名称写入 ， FileList.txt并在每个文件之间插入回车符，以提高可读性。

For Each foundFile In
        My.Computer.FileSystem.GetFiles("C:\Documents and Settings")
    foundFile = foundFile & vbCrLf
    My.Computer.FileSystem.WriteAllText(
        "C:\Documents and Settings\FileList.txt", foundFile, True)
Next

注解

UTF-8 编码用于写入文件。 若要指定不同的编码，请使用 方法的不同重载 WriteAllText 。

如果指定的文件不存在，则会创建一个。

如果指定的编码与文件的现有编码不匹配，则忽略指定的编码。

注意

方法 WriteAllText 打开一个文件，向其写入，然后关闭它。 使用 WriteAllText 方法的代码比使用 StreamWriter 对象的代码简单。 但是，如果使用循环向文件添加字符串，则对象可以提供更好的性能， StreamWriter 因为只需打开和关闭文件一次。 有关更多信息，请参见 OpenTextFileWriter 方法。

下表列出了涉及 My.Computer.FileSystem.WriteAllText 方法的任务示例。

功能 查看
将文本写入文件 如何：向文件写入文本
向文件中追加文本 如何：向文本文件追加内容

另请参阅

适用于

WriteAllText(String, String, Boolean, Encoding)

向文件写入文本。

public:
 void WriteAllText(System::String ^ file, System::String ^ text, bool append, System::Text::Encoding ^ encoding);
public void WriteAllText (string file, string text, bool append, System.Text.Encoding encoding);
member this.WriteAllText : string * string * bool * System.Text.Encoding -> unit
Public Sub WriteAllText (file As String, text As String, append As Boolean, encoding As Encoding)

参数

file
String

要写入的文件。

text
String

要写入文件的文本。

append
Boolean

要追加到文件的内容中，则为 True；要覆盖文件的内容，则为 False。 默认值为 False。

encoding
Encoding

写入文件时要使用的编码。 默认值为 UTF-8。

例外

ArgumentException

路径无效，原因如下：它是零长度字符串;它仅包含空格;它包含无效字符;或者它是以 \\.\) 开头 (设备路径;它以尾部斜杠结尾。

ArgumentNullException

file 为 Nothing。

FileNotFoundException

文件不存在。

IOException

文件正由另一个进程使用，或者出现 I/O 错误。

PathTooLongException

路径超过了系统定义的最大长度。

NotSupportedException

路径中的文件名或目录名包含冒号 (:)，或格式无效。

OutOfMemoryException

内存不足，无法将字符串写入缓冲区。

SecurityException

该用户缺少查看该路径所必需的权限。

示例

此示例将 行 "This is new text to be added." 写入文件 Test.txt，覆盖文件中的任何现有文本。

My.Computer.FileSystem.WriteAllText("C:\TestFolder1\test.txt",
"This is new text to be added.", False)

本示例将 文件夹中的文件 Documents and Settings 的名称写入 ， FileList.txt并在每个文件之间插入回车符，以提高可读性。

For Each foundFile In
        My.Computer.FileSystem.GetFiles("C:\Documents and Settings")
    foundFile = foundFile & vbCrLf
    My.Computer.FileSystem.WriteAllText(
        "C:\Documents and Settings\FileList.txt", foundFile, True)
Next

注解

如果指定的文件不存在，则会创建一个。

如果指定的编码与文件的现有编码不匹配，则忽略指定的编码。

注意

方法 WriteAllText 打开一个文件，向其写入，然后关闭它。 使用 WriteAllText 方法的代码比使用 StreamWriter 对象的代码简单。 但是，如果使用循环向文件添加字符串，则对象可以提供更好的性能， StreamWriter 因为只需打开和关闭文件一次。 有关更多信息，请参见 OpenTextFileWriter 方法。

下表列出了涉及 My.Computer.FileSystem.WriteAllText 方法的任务示例。

功能 查看
将文本写入文件 如何：向文件写入文本
向文件中追加文本 如何：向文本文件追加内容

另请参阅

适用于