Access中的TransferText方法在写入信息之前创建并锁定文件

如何解决Access中的TransferText方法在写入信息之前创建并锁定文件

我一直在使用代码字符串在一个Access数据库中导出一组文本文件，但是当我将其移至新文件并调整编码以适合新项目时，我得到一个错误，该文件是即使代码创建了文件，尝试创建的文件也会被锁定使用。

我有一个列表框，用于选择保存的查询和关联的导出规范。 for循环遍历每个选定的项目，设置输出规范，源查询以及输出路径和文件，然后使用TransferText导出选定的查询。我正在输出固定宽度的文本文件。

我的代码是

For Each itm In lstExportQueries.ItemsSelected
    strPathFile = txtOutputLocation & lstExportQueries.ItemData(itm) & ".txt"
    DoCmd.TransferText acExportFixed,lstExportQueries.Column(1,itm),lstExportQueries.ItemData(itm),strPathFile,False
Next

一旦变量被切换出去，命令看起来就像

DoCmd.TransferText acExportFixed,"exp_Sample Export Specification","exp_Sample","C:\Users\bak\Documents\Va\SA545\expERPims_Sample.txt",false 

第一次运行代码时，出现系统资源超出错误并结束。此后，代码在目标文件夹中创建了没有内容的文本文件，然后报告错误，指出该文件在写入任何内容之前已被锁定。 Access将保持文件锁定，直到关闭Access。这些错误均不会触发错误例程。如果我使用保存的规范手动导出，则导出工作正常。这些是介于10到5000条记录之间的小文件，手动运行时不会增加系统负担。