Vb.net проект электронной почты windows forms

---

Привет Ребята,

Я занят разработкой простого приложения для электронной почты, где кто-то может импортировать список контактов в текстовый файл и в какой-то момент также экспортировать данные из таблицы в текстовый файл по какой-то причине. Именно здесь, при экспорте в текстовый файл, у меня возникла проблема. Все работает нормально, я читаю базу данных и вижу, что в ней есть значения, которые поступают из базы данных, но текстовый файл пуст. Вот мой код, я буду признателен, если кто-нибудь скажет мне, что я делаю не так.

Dim ds As DataSet = MassEMailDataSet()
Dim dt As DataTable = ds.Tables("Customer")
Dim filename As String = "C:\EMail\ExportTest.txt"
Dim sepChar As String = ","
Dim writer As StreamWriter

writer = New StreamWriter(filename)

Dim sep As String = ""
Dim builder As New Text.StringBuilder
'header line
For Each col As DataColumn In dt.Columns
    builder.Append(sep).Append(col.ColumnName)
    sep = sepChar
Next
writer.WriteLine(builder.ToString())

'row lines
For Each row As DataRow In dt.Rows
    sep = ""
    For Each col As DataColumn In dt.Columns
        builder.Append(sep).Append(row(col.ColumnName))
        sep = sepChar
    Next
    writer.WriteLine(builder.ToString())
    builder.Clear()
Next
MsgBox("Export done!")

Что я уже пробовал:

Я прошел через код и действительно не могу понять, почему?

---