将DataTable转换为可读的文本字符串

时间:2020-03-05 18:50:36  来源:igfitidea点击:

这可能有点愚蠢,但是我需要通过文本电子邮件发送DataTable的内容(未知列,未知内容)。基本思想是遍历行和列,并使用.ToString()将所有单元格内容输出到StringBuilder中。

格式化是一个大问题。关于如何使其以文本格式"可读"的任何提示/想法?

我正在考虑用空格填充每个单元格,但是我还需要将一些单元格分成多行,这会使StringBuilder的方法有点混乱(因为第一列的第二行文本在第一行之后最后一列中的一行文字,依此类推)

解决方案

回答

将数据表转换为HTML表并发送HTML邮件是否可以替代?如果他们的客户支持的话,那将使接收端变得更好。

回答

这听起来像是一个非常可怕的解决方案,但它可能会起作用:

将DataTable内容呈现到DataGrid / GridView(假定ASP.NET)中,然后屏幕将其刮取。

我告诉过你那会很乱。

回答

遍历数据表并将其作为HTML电子邮件发送,从数据表生成html表并将其作为电子邮件正文发送。

回答

首先获取每列的最大大小。这样,包含邮政编码的varchar(255)列将不会占用太多空间。

也许我们可以拆分整个表格,而不是拆分单行。将表的完整右侧部分放入第二个stringbuilder中,并将其放在第一个表格之下。

我们还可以为用户提供创建逗号分隔文本的选项,以便接收者可以将表格导入电子表格中。

回答

我们可以这样做(如果是VB):

Dim Str As String = ""
    'Create File if doesn't exist
        Dim FILE_NAME As String = "C:\temp\Custom.txt"
        If System.IO.File.Exists(FILE_NAME) = False Then
            System.IO.File.Create(FILE_NAME)
        End If

        Dim objWriter As System.IO.StreamWriter
        Try
            objWriter = New System.IO.StreamWriter(FILE_NAME)
        Catch ex As System.IO.IOException
            MsgBox("Please close the file: (C:\temp\Custom.txt) before proceeding" & vbCrLf & ex.Message.ToString, MsgBoxStyle.Exclamation)
            objWriter = Nothing
            Err = True
        End Try

'I assume you know how to write to text file.
'Say my datagridview is named "dgrid"

Dim x,y as integer

For x = 0 to dgrid.rows.count -1
    For y = 0 to dgrid.columns.count - 1
       Str = dgrid.Rows(x).Cells(y).Values & " "
   Next y
Next x

objWriter.Close()

资源。

或者,我们甚至可以从DataTable生成CSV文件。

回答

我通过专门为此任务编写一个自定义格式化程序来完成此工作。该代码长约120 -130行,所以我不知道是否应该在此处发布它作为答案(也许将.cs文件添加到主题的功能是一个不错的主意!)。

无论如何,如果有人对此感兴趣,请告诉我,我将提供代码。

回答

是否需要很好地格式化,还是自动系统会在另一端接收邮件?如果是后者,则只需使用数据表的.WriteXml()方法。