主题：insert into select

我问一下，你直接加载这个access的表(可以根据需要家在全部、部分数据，或者不加载数据)，然后想这个表输入数据，需要的时候，单击保存，不可以吗？ 这样不是简单很多吗？
 
你要自己编码写入access的表，首先得创建一个数据源，连接到这个access文件。
然后：
 
Dim cmd As New SQLCommand
cmd.Connection name = "数据源"
For each r as row in Tables("xxx").临时表
    cmd.CommandText = " Insert Into 表名 (列名1, 列名2, 列名3) Values(" & r(数值列)" & ",'" &  r("字符列") & “‘,“ & r(数值列) & ")"
    cmd.ExecuteNonQuery
next

 

及时这样，也尽量少用Insert.

你可以在表A输入数据，然后将部分数据写入表B，最后分别保存表A和表B，这样编码和维护简单很多。

 

http://www.foxtable.com/help/topics/2490.htm