Question

MS Office 365 ProPlus，Access 2007-2016

我需要能够捕获Access DB的查询结果并将其发送到C驱动器上的txt文件中。这将使用任务调度程序以1x / wk的速度完成（我在想），它将运行某种脚本。我发现了基于SQL Server的不同示例，但Access却没有。

任何人都可以提供示例说明吗？

Answer 1

1。从任务计划程序中，您实际上可以调用可以触发模块的宏。进行研究，因为我不知道语法是什么，但是它确实很简单（只需在其后使用x / callmymacro命令执行应用程序即可）

创建文本文件非常容易。您可以使用上述DoCmd.TransferText进行导出，也可以在代码中进行构建，尤其是在查询结果不包含所有内容或仅需要某些片段的情况下。这是适合您的快速又肮脏的模板。

'this is only a template for proof of concept for you - google syntax of how to appropriately
'declare and use recordsets. Same with declaring other variables
'if your text file requieres headers, google how to loop through recordset headers.
'Pretty easy stuff

sep = "|"  'your choice of delimiter
NewTextFile = "pathwhereyouwanttodropyourfile.FileNametxt"
Open NewTextFile For Output As #2

do until rs.eof
    'wholeLine is a string variable used to store the currentline of the text file. 
    WholeLine  = WholeLine & rs("filed1") & sep                    
    Print #2, WholeLine
    WholeLine = "" 'important to reset variable
    rs.movenext
Loop

Close #2

*如果您弄清楚了如何使用数组而不是遍历记录集，那么您将获得很不错的成绩。 *

如何将ACCESS数据库中的sql查询结果写入txt文件？

1 个答案: