怎么用VB把csv文件导入到ACCESS数据库中

Question

我的CSV文件格式是这样的

东方大酒店
帐户名,结算日期,宽带收费,租金收费
5460,20061121,25,0000000000
5432,20061121,0000000000,0000000000

而数据库里的字段是这样的
酒店名，帐户名,结算日期,宽带收费,租金收费
怎么将CSV文件的数据按对应字段导入到数据库？
因为我要做的系统的数据都是csv文件 ，
录入的时候不方便 要直接导入
就是用程序来实现完成这个功能
做的想和ACCESS里的导入功能一样可以把CSV文件导进去
说的详细一点，关键代码提示写出来更好．．

Answer 1

分两步
1、从txt读出来
2、写入access
Private Sub Command2_Click()
Dim AccAPP As New Access.Application
AccAPP.OpenCurrentDb (数据库路径)
AccAPP.OpenCurrentDatabase "" & App.Path & "\CDD.mdb"
AccAPP.DoCmd.OutputTo acOutputTable, "RLCFP", acFormatCSV, "" & App.Path & "\0906RLCFP.csv", True '导出表
AccAPP.CloseCurrentDatabase '关闭access对象
AccAPP.Quit acQuitSaveNone
Set AccAPP = Nothing
End Sub

Answer 2

CSV是以逗号分隔的文本文件，在ACCESS中，菜单－文件－导入可以直接导入上述文件，如果要编程你可以参考：关于此主题请参考：
导入文本文件时如何指定字段类型？《表》http://access911.net/index.asp?u1=a&u2=77FAB01E16DC
关于此主题请参考：
《VBA》如何将一个文本文件用SQL语句导入到ACCESS表中http://access911.net/index.asp?u1=a&u2=72FAB41E1BDC
方法非常多，你还可以使用ACCESS链接表完成上述操作。
上述所有代码都使用VBA编写，如果你需要使用JDBC来完成应该到JDBC所属的板块提问，关于此主题请参考：
新手来看：Access的特点、概念。什么是纯ACCESS环境？《其他》http://access911.net/index.asp?u1=a&u2=79FAB51E12DC

Answer 3

方法1.在Access中用宏编程成批导入

方法2.在vb中菜单工程->引用,加入microsoft access ??.? object library
然后vb就何以控制access去成批的做任何事情，当然输入cvs就更不成问题了

如果你掌握这种方法，以后你还可以做更多事情

Answer 4

你把文件格式写了干什么啊？
用ACCESS直接导入，然后将字段名改成酒店名，帐户名,结算日期,宽带收费,租金收费
就行了