% dim rs, sql, rs1, sql1,rs2,sql2,rs3,sql3,rs4,sql4,rsimg,sqlimg,rsimg2,sqlimg2
set rs = server.createobject("adodb.recordset")
set rs1 = server.createobject("adodb.recordset")
set rs2 = server.createobject("adodb.recordset")
set rs3 = server.createobject("adodb.recordset")
set rs4 = server.createobject("adodb.recordset")
set rsimg = server.createobject("adodb.recordset")
set rsimg2 = server.createobject("adodb.recordset")
%>