How to: Write Text to a File
The following code example shows how to write text to a text file.
It reads all the text flies, using a "*.txt" search pattern, from the user's documents folder and writes them into a large text file.
Note
Visual Basic users may choose to use the methods and properties provided by the My.Computer.FileSystem object for file I/O. For more information, see My.Computer.FileSystem Object.
Example
Imports System
Imports System.IO
Imports System.Text
Class Program
Public Shared Sub Main(ByVal args As String())
Dim mydocpath As String = _
Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
Dim txtList As String() = Directory.GetFiles(mydocpath, "*.txt")
Dim sb As New StringBuilder()
For Each txtName As String In txtList
Using sr As New StreamReader(txtName)
sb.AppendLine(txtName.ToString())
sb.AppendLine("= = = = = =")
sb.Append(sr.ReadToEnd())
sb.AppendLine()
sb.AppendLine()
End Using
Next
Using outfile As New StreamWriter(mydocpath & "\AllTxtFiles.txt")
outfile.Write(sb.ToString())
End Using
End Sub
End Class
using System;
using System.IO;
using System.Text;
class Program
{
static void Main(string[] args)
{
string mydocpath =
Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments);
string[] txtList = Directory.GetFiles(mydocpath, "*.txt");
StringBuilder sb = new StringBuilder();
foreach (string txtName in txtList)
{
using (StreamReader sr = new StreamReader(txtName))
{
sb.AppendLine(txtName.ToString());
sb.AppendLine("= = = = = =");
sb.Append(sr.ReadToEnd());
sb.AppendLine();
sb.AppendLine();
}
}
using (StreamWriter outfile =
new StreamWriter(mydocpath + @"\AllTxtFiles.txt"))
{
outfile.Write(sb.ToString());
}
}
}
See Also
Tasks
How to: Create a Directory Listing
How to: Read and Write to a Newly Created Data File
How to: Open and Append to a Log File
How to: Read Characters from a String
How to: Write Characters to a String
Concepts
Reference
Change History
Date |
History |
Reason |
|---|---|---|
January 2010 |
Improved example. |
Customer feedback. |