请教VB高手！如何用VB将EXCEL导入ACCESS数据库？
发布网友
共3个回答
热心网友
思路：你可以使用ADODB，访问Excel读取数据后，写入Access数据库，如果一点也不懂SQL命令就不要瞎折腾了。
ADODB使用方法如下：
ADODB先要引用才可以的
Dim myconn As New ADODB.Connection
Dim myrecord As New ADODB.Recordset
Set myconn = New ADODB.Connection
myconn.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=F:\ACCESS数据库\db1.mdb" ‘可以修改这个地方来访问Excel或Access，具体可以百度
myconn.Open
Set myrecord = New ADODB.Recordset
myrecord.Open "insert into 学生表 (ID,姓名,班级,性别,民族,年龄) values(30318,'邹六峰','高一一班',0,'汉',2)", myconn, adOpenDynamic, adLockOptimistic
myrecord.Open "select * from 学生表 where ID =30318", myconn, adOpenDynamic, adLockBatchOptimisti追问没有用
热心网友
直接用ACCESS窗体录入数据到 数据表里得了
热心网友
程序中，把EXCEL一行的读出来写入一条记录，直接EXCEL结束嘛
