Access97 VBA导出为CSV格式问题

Question

我有一个 access97 数据库，我正在尝试编写一些代码以导出到 CSV 文件 - （我是 VBA 新手）。

然而，我有这个工作，我导出的一个字段是一种货币，因此其中的字段是 £3,456.00 - 当我导出到 CSV 时，我得到的正是这个 - 但我需要它只是数字，即 3456.00。

关于类似的问题 - 我的日期为 dd/mm/yyyy，我想知道是否有办法将 VBA 中的日期转换为 yyyy-mm-dd？

请记住，由于我的知识有限，任何解决方案都必须简单！

Answer 1

抱歉耽搁了；看似简单的事情却花了更长的时间。正如我从您的假设：

DoCmd.TransferText acExportDelim, "olly_csv", "olly aorder export", "\\10.0.0.38\nw_upload\aorders.csv"

您有一个导出规范“olly_csv”，它确定如何导出
SELECT 查询“olly aorder export”的结果集到文件“aorders.csv”
在目标文件夹“\10.0.0.38\nw_upload”中。

将货币字段导出为普通双精度/浮点/单精度数字的简单方法
具有您选择的格式（dd/mm/yyyy）的日期字段将是
仅在出口规范中提出要求。我发现在 Access 中没有办法做到这一点
2000（据我所知，选择日期格式的方法有限，但是导入向导处理列类型的功能并未由
导出向导）。

关于“TransferText”的文档 （抱歉，Access 2003） 声明：

   SpecificationName  Optional Variant. A string expression that's the name of
   an import or export specification you've created and saved in the current
   database. For a fixed-width text file, you must either specify an argument or
   use a schema.ini file, which must be stored in the same folder as the
   imported, linked, or exported text file. To create a schema file, you can use
   the text import/export wizard to create the file. For delimited text files
   and Microsoft Word mail merge data files, you can leave this argument blank
   to select the default import/export specifications.

现在有 Microsoft Docs 语言学流派：乐观主义者会阅读
如下：如果您没有通过导出规范并且有合适的 schema.ini
文件，则导出过程将遵循文件中的规范。悲观主义者
会说：微软从未同意实现你的白日梦 - 如果你不这样做
为非固定宽度文件指定参数，TransferText 命令将
使用一些晦涩的默认导出规范（请付费咨询顾问
寻求并改变它）。

让我们保持乐观吧！

因此，创建一个 schema.ini 文件，其中包含“aorders.csv”部分。对于我的测试我
使用了一个表格

Tabelle: OlliesOrders 
 Name    Typ           Größe
 OrderId Long Integer   4
 Amount  Währung        8
 DateDue Datum/Uhrzeit  8

（抱歉德国人；金额是货币，DateDue 日期/时间）。对于那张桌子
schema.ini 部分如下所示：

[aorders.csv]
ColNameHeader=True
CharacterSet=1252
Format=Delimited(;)
DateTimeFormat=dd/mm/yyyy
Col1=OrderId Integer
Col2=Amount Float
Col3=DateDue Date

您必须根据您的字段调整此示例。您想要列标题吗？是
windows 代码页可以吗？字段分隔符怎么样？我不得不使用 ; （德语语言环境），你
可能需要“Format=CSVDelimited”。请参阅此处了解一些背景信息。然后打电话

DoCmd.TransferText acExportDelim, , "olly aorder export", "\\10.0.0.38\nw_upload\aorders.csv"

来检查乐观主义者是否占主导地位。

对于悲观主义者：

在要导出的表上创建一个新查询。将类型更改为 Ausführung/Execute (?)
并编辑 SQL 直到它看起来像：

SELECT OlliesOrders.* INTO [aorders.csv] IN 'M:\trials\23forum\SOTrials\txt' [TEXT;] FROM OlliesOrders;

resp.:

SELECT YourFieldsList INTO [aorders.csv] IN '\\10.0.0.38\nw_upload' [TEXT;] FROM YourTable;

并执行它（从查询窗口或宏/模块子）。我的结果：

"OrderId";"Amount";"DateDue"
1;1411,09;29/04/2011
2;123,45;13/04/2011

添加：我的主张的证据，即您无法在导出向导中指定类型：

导出

导入