Question

我正在使用查询创建表，然后尝试将该表导出为CSV文件。在Access 2007中工作。

我可以使用下面的代码将其导出为XLS，但是当您在文件夹中查看命名文件时，命名文件具有较长的空格（未显示圆点）并且缩进了。

Example = [………….Factorysvc……….190601...………….]

DoCmd.OutputTo acOutputTable, "CustItemExp", "Excel97-Excel2003Workbook(*.xls)……

我尝试将XLS更改为CSV和TXT，但出现以下错误：

“您尝试输出当前对象的格式不可用”

dbo_setup包含2个字段：

droppath =放置文件的位置
LocationName = Factorysvc

这是完整的代码：

DoCmd.OutputTo acOutputTable, "CustItemExp", "Excel97-Excel2003Workbook(*.xls)", DLookup("droppath", "dbo_SetupExp") & DLookup("LocationName", "dbo_SetupExp") & Format(Date, "yymmdd") & ".xls", False, "", 0, acExportQualityPrint

想让它导出带有dbo_SetupExp.LocationName和创建日期并结合在文件名中的csv或文本文件。

Example: FactorySvc190601.csv

Answer 1

无法访问您的dbo_SetupExp表中保存的数据，我无法解释您所看到的行为，但是，为了解决该问题，我建议以下做法：

DoCmd.OutputTo acOutputTable, "CustItemExp", acFormatXLS, _
    Trim(DFirst("droppath",     "dbo_SetupExp")) & _
    Trim(DFirst("LocationName", "dbo_SetupExp")) & _
    Format(Date, "yymmdd") & ".xls"

此外，由于没有为DLookup函数提供criteria参数（因此该函数将返回表中的随机记录），因此DFirst似乎更适用功能。

如何导出具有串联名称的csv或txt格式的表？

1 个答案: