使用VBA将不受支持的文本文件中的数据传输到Access表

Question

我有一个ale文本文件。 此文件由相机自动创建，它包含所录制剪辑的所有元数据。

我想创建一个获取ale文件地址（C：\ test.ale）的函数，并添加所有行（从第11行和第11行开始，如screenshot所示）列“开始”，“结束”，“fps”和“ test.ale文件中的“gamma”到我的访问数据库中的“Camera meta data”表。

我尝试过使用DoCmd.TransferSpreadsheet和DoCmd.TransferText，但访问无法识别此文件类型。

我已添加了link to the ale file以及Excel打开文件的屏幕截图。

Answer 1

创建已保存的导入：外部数据 - ＆gt;文本文件，导入结束时，勾选＆＃34;保存导入＆＃34;复选框。在此之后，您可以使用ImportExportSpecifications对象运行此保存的导入：

Dim ieImport As ImportExportSpecification
Set ieImport = CurrentProject.ImportExportSpecifications.Item("My Import Name")
ieImport.Execute

将数据导入临时表并使用服务数据删除不必要的行，或者在需要时使用此服务数据。