2 forespørgsler i en?

Udfordringen består i at jeg skal have flettet 2 forespørgsler sammen.
1. Først skal jeg have det seneste KID fra tabellen konkurrence
2. Derefter skal jeg tælle de kunder med dette KID

Det må kunne gøres meget enkelt men jeg kan bare ikke se skoven for bare træer?

Håber nogen kan hjælpe

Henrik

Koden vist nedenfor
<%
response.expires = 0

' 1 aktuel konkurrence
Set aConn = Server.CreateObject("ADODB.Connection")
aConn.Open Application("nh_kunder")
sql = "SELECT TOP 1 * FROM konkurrence ORDER BY kid desc"
set svar = aconn.execute(sql)
test = svar("kid")
response.write test


'  2 tæl deltagere som har deltaget i den aktuelle konkurrence
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("nh_kunder")
Sqlstmt2 = "SELECT COUNT(id) AS antal FROM countk where kid= test???????????'"
conn.Execute (SQLstmt2)
Set rs2 = conn.Execute(SQLstmt2)

%>
<%=rs2("Antal")%>
<%

aconn.Close
Set aconn = Nothing
set sql = nothing

conn.Close
Set conn = nothing
Set SQLstmt2 = nothing
%>