asp access 数据合并

如图，从表一中按照10条10条的数据调用然后生成一条信息更新到表二中~~

要能够循环的，我有20000条数据~~~也就是说，最后表二中会生成2000条数据。

另外还有个问题，如果是19999条，也按照10条10条循环的话，最后余下的9条也自动生成一条数据~~~

'先建立一个查询表1的记录集
sqlstr="select * from 表1 order by id asc"
n=0
mystr=""
do until RS.eof
  n=n+1
  mystr=mystr & RS("content") & ","
  if n/10=n\10 then
    mystr=left(mystr,len(mystr)-1)
    newsqlstr="insert into 表2(content) values('"&mystr&"')" '这里要建立另一个查询记录集
    mystr=""
  end if
  RS.movenext
loop