VB execl导入ACCESS(中级有关问题）

VB execl导入ACCESS(中级问题）
多个execl的格式:
  XXXX清单

姓名：XXX
-------------------
ID1 数据
1 12
2 34
。。。

合计：XXX


ACCESS的格式

ID1 数据
1 12
2 34

如何execl导入ACCESS？
我编的程序：
  adocn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\111\11.mdb; Persist Security Info=False"
  adocn.Open
adocn.Execute " insert into ab select * from [sheet1$] in 'c:\111\123.xls' 'excel 8.0;'"
出错。
我想把整个EXECL导入ACCESS，然后判断ID和数据是否合法，不合法的删除。以前用VFP就是这样做，现在不知如何改？


[解决办法]
不用导，可以把Excel象操作Access一样操作。
[解决办法]

VB code

adocn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\111\11.mdb; Persist Security Info=False"adocn.Openadocn.Execute "insert into ab(id,data) select f1,f2 from [Excel 8.0;HDR=no;IMEX=2;DATABASE=c:\111\123.xls].[sheet1$];"
[解决办法]
路径自己改一下：

VB code
Private Sub Command5_Click()    '从excel导出到access    Dim db As New ADODB.Connection    Dim sPath As String            sPath = App.Path + "\测试数据\"        db.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sPath & "\db1.mdb;Persist Security Info=False"    Call db.Execute("select * into Table4 From [Sheet1$] In '" & sPath & "\Book2.xls' 'excel 8.0;'")            db.Close    Set db = NothingEnd Sub
[解决办法]
如果是在vb中操作的话可以通过com端口读取出数据，然后insert语句逐个操作，判断id和数据是否合法也在这里面判断。
[解决办法]
探讨


f1,f2是什么意思？

[解决办法]
我也在做这个，的把从串口下给设备的数据，导入EXCEL里，解析给用户看。先学习了。。。。。