当前位置:编程学习 > VB >>

求助,关于Access.Application.DoCmd.TransferText

手动导入ACCESS,产生的导入规格intxt

    Dim a As New Access.Application
    a.OpenCurrentDatabase ("L:\DB2.MDB")
    a.DoCmd.TransferText acImportFixed, "intxt", "grxx", "L:\1.txt", False
    a.Quit

导入后,有些字段并没有按照要求导入,还错位的导入了其他字段内
例如:1.txt 格式如下
001,,220101013,20201212,,,湖北省武汉市,420104,,,,,CancerW
002,,20101013,20201212,,,湖北省黄石市,420104,,,,,CancerW

导入后变成格式如下
001 ,,2010101 ,320201212,,,湖北省武汉市42,0104,,,,,CancerW
002 ,,2010101 ,320201212,,,湖北省黄石市42,0104,,,,,CancerW
还有特殊符号入".","()"等,也会类似的情况

请问,这个改如何解决呢?谢谢 --------------------编程问答-------------------- 这个你得先在ACCESS里面手动导入一下看看有没有问题,如果手动导入也有问题,则说明文件格式有冲突
你得先写个预处理过程把文本格式规整一下. --------------------编程问答--------------------
引用 1 楼 wallescai 的回复:
这个你得先在ACCESS里面手动导入一下看看有没有问题,如果手动导入也有问题,则说明文件格式有冲突
你得先写个预处理过程把文本格式规整一下.


我的手动导入,没有问题,就是只是在代码导入的时候出现问题
至于你说的预处理过程,怎么写?求教 --------------------编程问答-------------------- ...没人回复啊。我自己来顶,不能沉啊 --------------------编程问答-------------------- 要检查导入数据库、导出数据库两边的 规格intxt 是否一致。
补充:VB ,  数据库(包含打印,安装,报表)
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,