如何用代码做追加查询

todaynew

1、窗体上拖入一个按钮；
2、右击按钮---属性----事件----单击，则进入VB视图中；
3、在单击事件中写入以下代码即可：
dim ssql as string
ssql="SELECT 表1.* INTO  "
ssql=ssql & "[C:\Documents and Settings\Administrator"
ssql=ssql & "\桌面\123.mdbWD=123].abc  "
ssql=ssql & "FROM 表1"
docmd.runsql ssql