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”来获取文件号。