Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

用VBA如何实现固定宽度文本记录按条件导入access表

太阳雨  发表于:2010-05-24 22:23:37  
复制

Open App.Path & "\in.txt" For Input As #1

以上语句怎么实现以下数据格式的文本导入access表
1    123    1411    mmmmm
8    123    4569    ddddddd

 

Top
花熊2000 发表于:2010-05-24 22:43:48

按如上的数据格式,可以利用access的导入规则进行。具体操作为:

1、导入外部数据(TXT),调整固定字长宽度

2、保存导入规则

3、具体应用。如果进需要一次导入,利用手工导入,选择已保存好的导入规则进行导入即可

   如果需要频繁导入同类格式文档,则可以通过代码方式,利用TransferText语句进行导入,如

 

DoCmd.TransferText acImportFixed, Me.RULE_DTL, "tbl_tmp_DTL", strCopyFileName

 

我说的比较粗(懒得打字),希望你能看懂



太阳雨 发表于:2010-05-26 19:43:20

如果只需要导入部分满足条件的记录,vba代码怎么写



总记录:2篇  页次:1/1 9 1 :