将 Lotus Notes 文档导出为 CSV 和 Excel 文件答案

【问题标题】：Exporting Lotus Notes document to CSV & Excel Files将 Lotus Notes 文档导出为 CSV 和 Excel 文件
【发布时间】：2012-05-25 06:25:24
【问题描述】：

谁能建议我哪种方法（freefile 或 ole 对象创建）将 lotus notes 文档导出为 CSV 和 Excel 文件有效？

【问题讨论】：

标签： lotus-notes export-to-excel export-to-csv

【解决方案1】：

我也使用公式导出为 csv 和 excel。

@Command([FileExport]; "逗号分隔值"; "c:\text.csv")

【讨论】：

【解决方案2】：

高效？使用 NotesDXLExporter 导出为 DXL/XML。见link。简单的？在视图中选择文档并使用文件/导出，另存为类型：逗号分隔值。您可以使用需要导出的数据准备自己的视图。

【讨论】：

【解决方案3】：

我得到了以下用于导出 CSV 文件的简单代码。

[Link]

fileNum% = Freefile()
Open filename For Output As fileNum%

' use the view column titles as the CSV headers
Forall c In view.Columns
    If cns = "" Then    
        cns = c.title
    Else
        cns = cns + +","  + c.title         
    End If
End Forall      
Print #fileNum%, cns


 ' now get and print the values for each row and column
Set vc = view.AllEntries
Set entry = vc.GetFirstEntry()
While Not entry Is Nothing 
    rowstring = ""
    Forall colval In entry.ColumnValues
        If rowstring = "" Then
            rowstring = colval
        Else
            rowstring = rowstring + +","  + colval
        End If          
    End Forall
    Print #fileNum%, rowstring
    Set entry = vc.GetNextEntry(entry)
Wend
Close fileNum%

【讨论】：

现在我正在尝试从 CSV 文件导入数据