分两步
1、从txt读出来
2、写入access
Private Sub Command2_Click()
Dim AccAPP As New AccessApplication
AccAPPOpenCurrentDb (数据库路径)
AccAPPOpenCurrentDatabase "" & AppPath & "\CDDmdb"
AccAPPDoCmdOutputTo acOutputTable, "RLCFP", acFormatCSV, "" & AppPath & "\0906RLCFPcsv", True '导出表
AccAPPCloseCurrentDatabase '关闭access对象
AccAPPQuit acQuitSaveNone
Set AccAPP = Nothing
End Sub
RecordsetOpen 后面的SQL有点问题, textbox1text是变量,不能写在双括号内。
而且密码没有的话,需要在等号后面加 单引号`+单引号+双引号
"SELECT From 柜员列表 where 柜员号 = '" & textbox1text & "'; jet oledb:database password=''"
首先,EXCEL和ACCESS没有可比性,一个就是电子表格,一个是小型的数据库,根据你的说法,建议你应该好好学习ACCESS,在ACCESS中表只是后台数据的存储部分,你可以利用ACCESS的窗体,查询和报表制作出更适合小型企业使用的应用软件,加载更为方便的筛选,数据查询以及报表输出,建议你安装ACCESS2007以上版本学习,肯定会有不一样的感觉
以上就是关于怎么用VB把csv文件导入到ACCESS数据库中全部的内容,包括:怎么用VB把csv文件导入到ACCESS数据库中、EXCEL的VBA ,连接数据库,运行时错误 424 要求对象、想自学excel vba请各位前辈们给一些宝贵的意见等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)