在用ADO编程时，如何回写数据到一表中？

[nhao1a]

Public conn As New ADODB.Connection
Public rs As New ADODB.Recordset
strcnn = "driver={sql server};server=dssserver1;uid=sa;pwd=;database=yiyuan"
conn.Open strcnn
SQL = "select * from menzhen where name='" & Name & "'"
rs.Open SQL, conn, adOpenStatic, adLockBatchOptimistic
用SQL语句得到的记录是放在rs记录集中的，如何写入数据库中过程表（自己加的）？

(本题目是从表1中找出与表2中不同的记录，然后用表1改写表2，中间数据用过程表来存储 ）

rs.Close
cn.close

[nhao1a]

help me!
help me!

[mxp]

sql=select * into 过程表 from menzhen where name='" & Name & "'"
set rs=cn.execute (sql)