ACCESS中如何往2张表中添加数据

2张表：
device                        store
did 自动编号                  storeid    自动编号
dname                          storename
.....
storeid

现在我在界面中想插入一条数据，代码中应该如何写SQL语句呢？
下面是我写的代码，但是第一条语句会连续执行2次把第2条部分覆盖掉，为什么，改如何修改呢？或者有其他什么方法可以实现往2张表中插入数据的吗？谢谢
stemp = "SELECT devices.did, devices.dname, devices.dsn, devices.storeid, devices.dsort, devices.dadministrator, devices.duser, devices.dstatus, devices.dinfo, devices.remark, store.storename from devices INNER JOIN store ON devices.storeid = store.storeid;"
rs.Open stemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

    stemp = "insert into devices"
    stemp = stemp & "(dsn,dsort,dname,dadministrator,duser,dstatus,dinfo)"
    stemp = stemp & "values ('" & Me![dsn] & "','" & Me![dsort] & "','" & Me![dname] & "','" & Me![dadministrator] & "','" & Me![duser] & " ','" & Me![dinfo] & " ','" & Me![dstatus] &