我正在尝试使用此过程将数据从数据表导出到 csv 文件中。我已经在字符串中准备好表中的数据,并尝试使用以下代码写入文件(我确实想使用 excel,但放弃了尝试使用 csv 文件)。我没有收到错误,但文件也没有出现,但我的字符串肯定不是空的。任何帮助/方向表示赞赏。
Dim str As New StringBuilder
For Each dr As DataRow In objDS.Tables("dt_export").Rows
For Each field As Object In dr.ItemArray
str.Append(field.ToString & ",")
Next
str.Replace(",", vbNewLine, str.Length - 1, 1)
Next
Try
Response.Write(str.ToString)
My.Computer.FileSystem.WriteAllText("C:\temp\testcsv.csv", str.ToString, False)
Catch ex As Exception
Response.Write("Write Error")
End Try