Mit resultat skal indsættes i en tabel

Her sammemligner den tre tabeller og finder det billigste varenummer.. godt resultatet skal så ind i en tabel 4 så jeg har resultet der.. men hvordan. tabel 4 er sat op ligesom de andre. her er min kode:

<%
SQL = "SELECT  t1.varenummer, t1.DescShort, t1.pris, t1.levnavn  "
SQL = SQL & "FROM (SELECT levnavn, pris, varenummer, DescShort FROM tabel1 "
SQL = SQL & "UNION ALL SELECT levnavn, pris, varenummer, DescShort FROM tabel2 "
SQL = SQL & "UNION ALL SELECT levnavn, pris, varenummer, DescShort FROM tabel3) "
SQL = SQL & "as t1, "
SQL = SQL & "(SELECT min(pris) as mpris, varenummer "
SQL = SQL & "FROM (SELECT pris, varenummer FROM tabel1 "
SQL = SQL & "UNION ALL SELECT pris, varenummer FROM tabel2 "
SQL = SQL & "UNION ALL SELECT pris, varenummer FROM tabel3 "
SQL = SQL & ") GROUP BY varenummer) as t2 "
SQL = SQL & "WHERE t1.pris = t2.mpris AND t1.varenummer = t2.varenummer ORDER BY t1.varenummer;"

Set rs = Conn.Execute(SQL)

lastvare=""
Response.Write "<table>"
Response.Write "<tr><td>varnummer</td><td>Dechsort</td><td>pris</td><td>levnavn</td></tr>"
do while not rs.EOF
  if lastvare = rs("varenummer") then
    if lastvare <> "" then Response.Write ", " & rs("levnavn")
  else
    if lastvare <> "" then Response.Write "</tr>"
    lastvare = rs("varenummer")
    Response.Write "<tr>"
    Response.Write "<td>" & rs("varenummer") & "</td>"
    Response.Write "<td>" & rs("DescShort") & "</td>"
    Response.Write "<td>" & rs("pris") & "</td>"
    Response.Write "<td>" & rs("levnavn") & "</td>"
  end if
  rs.Movenext
loop
Response.Write "</tr>"
Response.Write "</table>"
%>