Question

如何把txt文件导入ACCESS里面

Dim log1, log2, log3 As Long
Dim Con As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SJ.mdb;Persist Security Info=False"
Con.Open
Open App.Path & "\AA.txt" For Input As #1
Do While Not EOF(1)
Input #1, log1, log2, log3
Con.Execute ("insert into table( col1 , col2 , col3 ) values(" & log1 & ", " & log2 & "," & log3 & ")")
Loop
Close #1
ErrHandler: ' 用户按了“取消”按钮
Exit Sub
AA.txt文件里1，2，3
4，5，6
执行程序是提示INSERT INTO 语句语法错误，请高手指教，谢谢！

Answer 1

为什么要导入数据库呢？用表格不是更方便吗？拿表格来归置一下数据吧　把所有数据复制进表格的A1里　记得要选择性粘贴　然后粘贴成文本；然后点A　选中A列　将A列分列　第一步选“分隔符号”　第二步点“其他”然后在后面输入“＃”　第三步直接点完成；这样数据就分开了　然后嘛…点1选中整个1行　复制　然后在A2选择性粘贴　粘贴成数值　并转置　这样就竖过来了；然后把1行删除整行　在分列A列　还是用分隔符号　然后第二步选其他　符号为“＆amp；”　第三步直接回车　这就分开了嘛…最后你想怎么导入就怎么导入了～　如果不想要空行　加个筛选筛出来删了就行了　都做完了另存为“文本文件（制表分隔符）”　然后就是TXT格式了…

追问

将txt导入ACCESS是为了数据的整体保存，以及查看，随着试验项目的增加，要不停的向数据库了些记录。txt文件看起来有点凌乱。

Answer 2

你可以参考这个帖子，或者查询类似的帖子，txt导入到Access在 Access中国论坛已经有很完善的答案了。http://www.office-cn.net/forum.php?mod=viewthread&tid=57078 应该都能满足你的要求了。不行的话再发帖咨询

追问

还有密码？

追答

看右边，一般都有说明密码的。