如何把CSV文件读到临时表里？

[wplpss]

Access VBA中，如何把CSV文件读到一个临时表里面？
因为之后要在临时表里一行一行判断验证，没有逻辑错误才能更新到数据库里。
请举例说明。

另外，逐行判断CSV文件里的数据，除了上述方法，可不可以直接在CSV文件里一行
一行判断？如果可以的话，请举例说明。

谢谢！

[wwwwb]

贴你的文本内容
CSV就是TXT文件，如果CSV格式固定，可以直接用JETSQL导入。

[WWWWA]

示例：
Open "a.csv" For Input As #1
Do While Not EOF(1)
Line Input #1, fg
If Len(fg) <> 0 Then
If InStr(fg, "宝宝") > 0 Then
ty = True
Exit Do
End If
End If
Loop
Close #1

[ACMAIN_CHM]

可以直接以ADO打开CSV文件然后逐记录处理。


你需要的处理是什么？

[ACMAIN_CHM]

ACCESS中你可以简单的直接用ADO打开CSV文件。

rs.open "select * from [Text;DATABASE=C:\TEMP].[BOOK1.CSV]",currentproject.connection


关键看你的具体 “判断验证，没有逻辑错误才能更新到数据库里” 是指什么。 如果只是简单的判断，则可以直接使用SQL语句实现。
rs.open "insert into accesTable1 select * from [Text;DATABASE=C:\TEMP].[BOOK1.CSV] where f1<=f2+3",currentproject.connection

[wplpss]

不是简单的判断，一行一行判断，哪一行有错，最后还得把错误的行目报出来。
所以，直接打开ＣＳＶ恐怕不行吧。
得先把数据导入一个表里，或Ｌｉｎｋｔａｂｌｅ，然后用循环一行行判定。

[ACMAIN_CHM]

[Quote]rs.open "insert into accesTable1 select * from [Text;DATABASE=C:\TEMP].[BOOK1.CSV] where f1<=f2+3",currentproject.connection
[/Quote]

这个不就是读到临时表accesTable1 中吗？

[wwwwb]

[Quote=引用 6 楼 wplpss 的回复:]
不是简单的判断，一行一行判断，哪一行有错，最后还得把错误的行目报出来。
所以，直接打开ＣＳＶ恐怕不行吧。
得先把数据导入一个表里，或Ｌｉｎｋｔａｂｌｅ，然后用循环一行行判定。
[/Quote]
导入以临时表中，判断，如有问题，提示

[wplpss]

请看这个帖：
http://topic.csdn.net/u/20100709/11/e27a2282-8111-41e9-a6e4-da07cdf05220.html?30534
谢谢！这个帖一样给分！