{"id":286,"date":"2025-10-24T22:14:52","date_gmt":"2025-10-24T20:14:52","guid":{"rendered":"https:\/\/www.silverice.it\/IpercubeTechWP1\/?page_id=286"},"modified":"2025-10-25T10:13:02","modified_gmt":"2025-10-25T08:13:02","slug":"logdatatabletocsvfile","status":"publish","type":"page","link":"https:\/\/www.silverice.it\/IpercubeTechWP1\/ipercube-utilities\/data-table-functions\/logdatatabletocsvfile\/","title":{"rendered":"Log DataTable To CSV File"},"content":{"rendered":"\n<p class=\"wp-block-paragraph\">Appends the contents of a <em>DataTable<\/em> to a CSV file, optionally including headers and timestamps.<\/p>\n\n\n\n<p class=\"wp-block-paragraph\">Each call appends data to the specified file. If <em>IncludeHeaders <\/em>is True , the column names are written as<br>the first line. If <em>AddTimeStamp <\/em>is enabled, a timestamp is included at the beginning of each row. Fields are written as plain strings without escaping for special characters (e.g., quotes or line breaks).<\/p>\n\n\n\n<div class=\"wp-block-group\"><div class=\"wp-block-group__inner-container is-layout-constrained wp-block-group-is-layout-constrained\">\n<div class=\"wp-block-columns is-layout-flex wp-container-core-columns-is-layout-8f761849 wp-block-columns-is-layout-flex\">\n<div class=\"wp-block-column is-layout-flow wp-block-column-is-layout-flow\" style=\"flex-basis:75%\">\n<div class=\"wp-block-columns is-layout-flex wp-container-core-columns-is-layout-8f761849 wp-block-columns-is-layout-flex\">\n<div class=\"wp-block-column page-snippet is-layout-flow wp-block-column-is-layout-flow\" style=\"flex-basis:100%\">\n<div class=\"wp-block-kevinbatdorf-code-block-pro cbp-has-line-numbers\" data-code-block-pro-font-family=\"Code-Pro-Geist-Mono\" style=\"font-size:.875rem;font-family:Code-Pro-Geist-Mono,ui-monospace,SFMono-Regular,Menlo,Monaco,Consolas,monospace;--cbp-line-number-color:#D4D4D4;--cbp-line-number-width:calc(2 * 0.6 * .875rem);line-height:1.25rem;--cbp-tab-width:2;tab-size:var(--cbp-tab-width, 2)\"><span style=\"display:flex;align-items:center;padding:10px 0px 10px 16px;margin-bottom:-2px;width:100%;text-align:left;background-color:#2b2b2b;color:#c7c7c7\">VB<\/span><span role=\"button\" tabindex=\"0\" style=\"color:#D4D4D4;display:none\" aria-label=\"Copy\" class=\"code-block-pro-copy-button\"><pre class=\"code-block-pro-copy-button-pre\" aria-hidden=\"true\"><textarea class=\"code-block-pro-copy-button-textarea\" tabindex=\"-1\" aria-hidden=\"true\" readonly>    Public Sub LogDataTableToCSVFile(ByVal SourceTable As Data.DataTable, LogFile As String,\n                                     Optional ByVal IncludeHeaders As Boolean = True, Optional Separator As String = \";\",\n                                     Optional AddTimeStamp As Boolean = False)\n\n        Using sw As StreamWriter = File.AppendText(LogFile)\n\n            If (IncludeHeaders) Then\n                Dim headerValues As IEnumerable(Of String) = SourceTable.Columns.OfType(Of Data.DataColumn).Select(Function(column) column.ColumnName)\n                If AddTimeStamp Then\n                    sw.WriteLine(\"TimeSTamp\" + Separator + String.Join(Separator, headerValues))\n                Else\n                    sw.WriteLine(String.Join(Separator, headerValues))\n                End If\n            End If\n\n            Dim items As IEnumerable(Of String) = Nothing\n            For Each row As Data.DataRow In SourceTable.Rows\n                items = row.ItemArray.Select(Function(obj) obj.ToString())\n                If AddTimeStamp Then\n                    sw.WriteLine(CStr(Now) + Separator + String.Join(Separator, items))\n                Else\n                    sw.WriteLine(String.Join(Separator, items))\n                End If\n            Next\n\n            sw.Flush()\n        End Using\n\n    End Sub\n<\/textarea><\/pre><svg xmlns=\"http:\/\/www.w3.org\/2000\/svg\" style=\"width:24px;height:24px\" fill=\"none\" viewBox=\"0 0 24 24\" stroke=\"currentColor\" stroke-width=\"2\"><path class=\"with-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M4.5 12.75l6 6 9-13.5\"><\/path><path class=\"without-check\" stroke-linecap=\"round\" stroke-linejoin=\"round\" d=\"M16.5 8.25V6a2.25 2.25 0 00-2.25-2.25H6A2.25 2.25 0 003.75 6v8.25A2.25 2.25 0 006 16.5h2.25m8.25-8.25H18a2.25 2.25 0 012.25 2.25V18A2.25 2.25 0 0118 20.25h-7.5A2.25 2.25 0 018.25 18v-1.5m8.25-8.25h-6a2.25 2.25 0 00-2.25 2.25v6\"><\/path><\/svg><\/span><pre class=\"shiki dark-plus\" style=\"background-color: #1E1E1E\" tabindex=\"0\"><code><span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">Public Sub <\/span><span style=\"color: #DCDCAA\">LogDataTableToCSVFile<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">ByVal<\/span><span style=\"color: #D4D4D4\"> SourceTable As <\/span><span style=\"color: #4EC9B0\">Data<\/span><span style=\"color: #D4D4D4\">.DataTable,<\/span><span style=\"color: #9CDCFE\"> LogFile<\/span><span style=\"color: #D4D4D4\"> As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\">,<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                                     Optional ByVal IncludeHeaders As <\/span><span style=\"color: #4EC9B0\">Boolean<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> True<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> Optional<\/span><span style=\"color: #D4D4D4\"> Separator As <\/span><span style=\"color: #4EC9B0\">String<\/span><span style=\"color: #D4D4D4\"> = <\/span><span style=\"color: #CE9178\">&quot;;&quot;<\/span><span style=\"color: #D4D4D4\">,<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                                     Optional AddTimeStamp As <\/span><span style=\"color: #4EC9B0\">Boolean<\/span><span style=\"color: #D4D4D4\"> =<\/span><span style=\"color: #569CD6\"> False<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        Using sw As <\/span><span style=\"color: #4EC9B0\">StreamWriter<\/span><span style=\"color: #D4D4D4\"> = File.<\/span><span style=\"color: #DCDCAA\">AppendText<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">LogFile<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> (<\/span><span style=\"color: #9CDCFE\">IncludeHeaders<\/span><span style=\"color: #D4D4D4\">) <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> headerValues <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">IEnumerable<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">) = SourceTable.Columns.<\/span><span style=\"color: #DCDCAA\">OfType<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> Data.<\/span><span style=\"color: #9CDCFE\">DataColumn<\/span><span style=\"color: #D4D4D4\">).<\/span><span style=\"color: #C586C0\">Select<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #569CD6\">Function<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">column<\/span><span style=\"color: #D4D4D4\">) column.<\/span><span style=\"color: #9CDCFE\">ColumnName<\/span><span style=\"color: #D4D4D4\">)<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> AddTimeStamp <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    sw.<\/span><span style=\"color: #DCDCAA\">WriteLine<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #CE9178\">&quot;TimeSTamp&quot;<\/span><span style=\"color: #D4D4D4\"> +<\/span><span style=\"color: #9CDCFE\"> Separator<\/span><span style=\"color: #D4D4D4\"> + <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #DCDCAA\">Join<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Separator<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> headerValues<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">Else<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    sw.<\/span><span style=\"color: #DCDCAA\">WriteLine<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #DCDCAA\">Join<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Separator<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> headerValues<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #569CD6\">Dim<\/span><span style=\"color: #9CDCFE\"> items <\/span><span style=\"color: #D4D4D4\">As <\/span><span style=\"color: #4EC9B0\">IEnumerable<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Of<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">) =<\/span><span style=\"color: #569CD6\"> Nothing<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">For<\/span><span style=\"color: #D4D4D4\"> <\/span><span style=\"color: #C586C0\">Each<\/span><span style=\"color: #D4D4D4\"> row As <\/span><span style=\"color: #4EC9B0\">Data<\/span><span style=\"color: #D4D4D4\">.DataRow In SourceTable.Rows<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #DCDCAA\">items<\/span><span style=\"color: #D4D4D4\"> = row.ItemArray.<\/span><span style=\"color: #C586C0\">Select<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #569CD6\">Function<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">obj<\/span><span style=\"color: #D4D4D4\">) obj.<\/span><span style=\"color: #DCDCAA\">ToString<\/span><span style=\"color: #D4D4D4\">())<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">If<\/span><span style=\"color: #D4D4D4\"> AddTimeStamp <\/span><span style=\"color: #C586C0\">Then<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    sw.<\/span><span style=\"color: #DCDCAA\">WriteLine<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #DCDCAA\">CStr<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #DCDCAA\">Now<\/span><span style=\"color: #D4D4D4\">) +<\/span><span style=\"color: #9CDCFE\"> Separator<\/span><span style=\"color: #D4D4D4\"> + <\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #DCDCAA\">Join<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Separator<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> items<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">Else<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                    sw.<\/span><span style=\"color: #DCDCAA\">WriteLine<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #DCDCAA\">String<\/span><span style=\"color: #D4D4D4\">.<\/span><span style=\"color: #DCDCAA\">Join<\/span><span style=\"color: #D4D4D4\">(<\/span><span style=\"color: #9CDCFE\">Separator<\/span><span style=\"color: #D4D4D4\">,<\/span><span style=\"color: #9CDCFE\"> items<\/span><span style=\"color: #D4D4D4\">))<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">                <\/span><span style=\"color: #C586C0\">End If<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            <\/span><span style=\"color: #C586C0\">Next<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">            sw.<\/span><span style=\"color: #DCDCAA\">Flush<\/span><span style=\"color: #D4D4D4\">()<\/span><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">        <\/span><span style=\"color: #DCDCAA\">End<\/span><span style=\"color: #D4D4D4\"> Using<\/span><\/span>\n<span class=\"line\"><\/span>\n<span class=\"line\"><span style=\"color: #D4D4D4\">    <\/span><span style=\"color: #569CD6\">End Sub<\/span><\/span>\n<span class=\"line\"><\/span><\/code><\/pre><\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n<\/div><\/div>\n","protected":false},"excerpt":{"rendered":"<p>Appends the contents of a DataTable to a CSV file, optionally including headers and timestamps. Each call appends data to the specified file. If IncludeHeaders is True , the column names are written asthe first line. If AddTimeStamp is enabled, a timestamp is included at the beginning of each row. Fields are written as plain [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"parent":282,"menu_order":0,"comment_status":"closed","ping_status":"closed","template":"","meta":{"footnotes":""},"class_list":["post-286","page","type-page","status-publish","hentry"],"_links":{"self":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/286","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/comments?post=286"}],"version-history":[{"count":3,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/286\/revisions"}],"predecessor-version":[{"id":372,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/286\/revisions\/372"}],"up":[{"embeddable":true,"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/pages\/282"}],"wp:attachment":[{"href":"https:\/\/www.silverice.it\/IpercubeTechWP1\/wp-json\/wp\/v2\/media?parent=286"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}