Sorry if I misunderstood you but why wouldnt you uae the same connection? If you use the method above you would:
<% OPTION EXPLICIT %>
<% Set Conn = server.createobject("ADODB.Connection")
conn.open(GetConnectionString)
dim getOrders,getOrderLines
sql = "SELECT ...,...,... FROM ORDERS Where ...;"
set getOrders = conn.execute(sql)
sql = "SELECT ...,...,... FROM orderLine Where ...;"
set getOrderLines = conn.execute(sql)
'Now you have two record sets ready to use
'do stuff with them, then when you ahve finished with them tidy up like so
IF isObject(getOrders) then set getOrders = nothing END IF
IF isObject(getOrderLines) then set getOrderLines = nothing END IF
conn.close
set conn= nothing
%>
Wind is your friend
Matt
|