faccio due query vorrei farne di più
la prima su un db
codice:
<% CNN=Application("CNN")
	set conn=Server.CreateObject("ADODB.Connection")
	conn.open CNN

Const CONST_DISPLAY = 5 
%>
                                <% 
Dim i 
Set rsQuery = Conn.Execute("SELECT * FROM news where smenu = ('notizie mondo - generale')  ORDER BY id DESC") 
If rsQuery.EOF Then 
%>
Non ci sono Dati
<% 
End If 
i = 1 
While Not rsQuery.EOF And i <= CONST_DISPLAY 
%>
                                ','xxx<%=rsQUERY("id")%>',450,550,'yes' ,'no','1',5,4)"><%= rsQuery("titolo") %>-<%= rsQuery("data_ins") %>

 <% 
rsQuery.MoveNext : i = i + 1 
Wend 

%>
la seconda query(di seguito) la faccio su un secondo db

codice:
                             
                                <% CNN3=Application("CNN3")
	set conn=Server.CreateObject("ADODB.Connection")
	conn.open CNN3
Const vista = 5 
%>
                                <% 
Dim Q
Set rs1Query = Conn.Execute("SELECT * FROM newsru where smenu=('nomine-nomine') and vis=-1  ORDER BY id desc") 
If rs1Query.EOF Then 
%>
                               Non ci sono Dati
                               
                                <% 
End If 
Q = 1 
While Not rs1Query.EOF And Q <= vista 
%>
                                ','xxx<%=rs1QUERY("id")%>',450,550,'yes' ,'no','1',5,4)"><%=rs1QUERY("titolo")%>-<%=rs1QUERY("data_ins")%>

                                <% 
rs1Query.MoveNext : Q = Q + 1 
Wend
quando vado a fare la terza mi dà un errore in quanto "punta " al db della seconda query come faccio a chiudere la connessione con il secondo DB (CNN3) e a ritornare sulla prima (CNN) ?