VB导入EXCEL并保存到SQL SEVER数据库中

Question

点击导入按钮，可以选择要导入的EXCEL，把EXCEL中的数据导入到SQL SEVER数据库中，在VB中的一个表中显示出来，哪位大侠帮一下，小妹不胜感谢！！！！

Answer 1

参考
Private Sub Command1_Click()
    Dim cn As ADODB.Connection    Set cn = New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\mydb2.mdb;;Jet OLEDB:Database Password=111"    cn.Execute "Insert Into [f2] Select * From [Sheet1$] In '" & App.Path & "\f1.xls' 'EXCEL 8.0;'"    cn.Close
    Set cn = NothingEnd Sub

Answer 2

请问，SQL SEVER的数据库后缀名是.mdf,这样就不能识别了，另外[f2]是什么意思？这个是只能从固定的EXCEL表导入？不能选择吗？感谢感谢！！！！！