Question

如何将excel追加到数据库的某个指定表中？用vb，注意是是加到某个表中哦，大家请注意呀

如题。给个实例好么？我邮箱263885058@qq.com

Answer 1

问题没讲清楚。
1、是在数据库中执行还是在Excel中执行？
2、数据库是什么样的数据库？Access还是 SQL Server?
这里以Office 2003版本为例，代码在Access中执行，将Excel表中的数据追加到Access中的表里：
Private Sub cmdImport_Click()
'Excel表和Access文件置于同一路径下。
'注意Sheet1必须是标准数据表，即不能有合并单元格、空列等情况。
StrSQL = "Insert INTO 员工工资 Select * FROM [Excel 8.0;DATABASE=" & CurrentProject.Path & "\员工工资1.xls].[Sheet1$A:C]"
Currentdb.Execute StrSQL
MsgBox "导入完毕", vbInformation + vbOKOnly, "成功提示"
End Sub
在Excel中执行则较为复杂，需要建立起ADO对象。

Answer 2

1.一行一行取出再写入表内。。。。

追问

怎么写啊？给个实例好么？谢谢啦。。。