vba - Access 2010 - 创建 VBA 宏生成文本文件

Question

我有一张大约有 900 条记录的表。示例记录如下所示：

字段名称：

ID  FNN DSLAM_ID    SHORT_CODE  PORT_TYPE   PANEL   SLOT    CHANNEL CONNECTION_TYPE SERVICE_TYPE    PVCID   CHANNEL_TYPE    PROD_CODES

记录 1：

1   A99TEST9999 QXXXXENNNN  ABCDE   DSL48P  1   11  38  ABC ADSL    RANDOMIDXXYY    N   ADESP=NNNNNNN_ABCDEFG_L2PPP

我想构建一个文本文件，它为每条记录构建一个新行并输入一个特定字段作为变量。

示例行：

FNN="[FNN]" : ACTION="" : SERVICE_TYPE="[CONNECTION_TYPE]" : NE_ID="[DSLAM_ID]", NE_DEFN="[SERVICE_TYPE]", PORT="[PANEL] / [SLOT] / [CHANNEL]"

我以前见过人们编写脚本来创建路由器配置，本质上这就是我想要为应用程序构建大量配置文件的方法。

Answer 1

您需要获取记录集对象，然后执行以下操作：

Open "yourfilename.txt" for Output as #1
While not (recordset.eof) 
  Print #1, "FNN=" & recordset.fields("FNN").value (add the rest of your string here...)
  recordset.movenext
Wend
Close #1

从技术上讲，您应该使用 FreeFile() 函数获取文件编号，而不是“#1”。