Access交流中心

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

ACCESS运行时报错

人生如梦  发表于:2018-12-28 14:00:57  
复制

如图所示,在运行批量导入csv代码时报错。注:access版本为2016版。

错误代码:conn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
              "DBQ=" & strFilePath & ";Extensions=asc,csv,tab,txt;Persist Security Info=False"   '打开数据链接关键


点击下载此附件

 

Top
人生如梦 发表于:2018-12-28 15:12:39
自己顶一个 

伊西军 发表于:2018-12-28 21:35:44
没有安装相关的ODBC驱动程序  在 ODBC数据源管理程序->驱动程序 中检查下

伊西军 发表于:2018-12-28 21:42:01

也可以参照下面文章和帖子中的示例修改 应该是可以避免这个问题:http://www.accessoft.com/article-show.asp?id=9582

http://www.accessoft.com/bbs/showtopic.asp?id=30263



人生如梦 发表于:2018-12-29 17:52:07
我试试 十分感谢

人生如梦 发表于:2018-12-29 17:59:16
奇怪 有这个驱动啊

伊西军 发表于:2018-12-29 23:29:11
那就考虑绕过这个方法 试下上边链接中的方法进行解决

人生如梦 发表于:2019-01-02 11:50:26

嗯 我试了下 还是报错 错误代码如下:

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
Public Declare Function LoadCursorByNum Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long



伊西军 发表于:2019-01-02 13:15:11
系统模块中的 不需要复制进去

人生如梦 发表于:2019-01-07 10:20:13
嗯 谢谢版主 

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