Bytte indholdet i to recordset

Umiddelbart er der ikke en direkte smart metode. Er det alle kolonner som skal byttes eller kun en bestemt kolonne.
Det kunne laves i stil med dette:

id1=2
id2=3
SQL = "select * from tabelnavn where id="&id1 & " OR id=" & id2
Set rs=Conn.Execute(SQL)
do while not rs.EOF
  SQL = "update tabelnavn set kolonne = '" & rs("kolonne") & "' WHERE ID="
  if rs("id") = id1 then
    SQL = SQL & id2
  else
    SQL = SQL & id1
  end if
  Conn.Execute(SQL)
loop

Det var to recordset som skulle byttes?
Det kan man gøre sådan her eks:


SQL = "select * from tabel1"
Set rs = Conn.Execute(SQL)
SQL = "select * from tabel2"
Set rs2 = Conn.Execute(SQL)

Set tmprs = rs
Set rs = rs2
Set rs2 = tmprs


Så er indholdet i rs og rs2 byttet rundt.

Det blev en helt tredie løsning med lidt inspiration fra dit forslag. Men du får point alligevel, da jeg efterhånden har lært en pokkers masse fra alle dine andre fremragende svar på eksperten :-)