Question

有人可以建议我将Lotus Notes文档导出到CSV和Excel文件的哪种方法（freefile或ole对象创建）是否有效？

Answer 1

我也使用公式导出为csv＆amp; Excel中。

@Command（[FileExport];“逗号分隔值”;“c：\ text.csv”）

Answer 2

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

Answer 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%

将Lotus Notes文档导出为CSV＆amp; Excel文件

3 个答案: