doppio ciclo di recordset

[webdesigning]

Ciao!
Ho cercato di scrivere una pagina che mi permettesse di leggere i dati dell'utente e appena sotto le sue prenotazioni (usando un ID chiave per le 2 tabelle users[Nome,Cognome,ID,Email] e prenotazioni[ID,X,Y]) ma non ci sono riuscito..

come si fa?
dovrei usare una INNER JOIN?

più o meno cosi' dovrebbe essere il risultato

   ____________________________________________________
  |Nome: Mio Nome Cognome: Mio Cognome ID: MioID
  |Email: MiaMail
  |____________________________________________________
    |X: A
    |Y: 23
    |X: B
    |Y: 33
    |______________________________

Ovviamente ci vorra' un ciclo sia per Nome,Cognome, ID, Email per fare in modo di visualizzare tutti i record relativi agli utenti e un ciclo per X e Y.
Grazie in anticipo a chi mi puo' aiutare

[webdesigning]

Nessuno puo' darmi una mano?

[webdesigning]

ho fatto così ma mi legge solo un record...

	<%
	SQL="SELECT * FROM users order by Cognome"
	Set rec = Server.CreateObject("ADODB.Recordset")
	Set Rec=Conn.Execute(SQL)
	While Not rec.EOF
	%>
<div align="center" class="padre">
	<div class="figlio" align="left">
nbsp;
Cognome: <%=rec("Cognome")%>
Nome: <%=rec("Nome")%>
Codice utente: <%=rec("ID")%>

E-mail: <%=rec("Email")%>
Telefono: <%=rec("Telefono")%>


	</div>
		<% 
		Cod=rec("ID")
		SQL="SELECT * FROM layout WHERE stato=True AND UserID='"&Cod&"'" 
		Set rec = Server.CreateObject("ADODB.Recordset")
		Set Rec=Conn.Execute(SQL)
		While Not rec.EOF
		%>
			Fila:<%=rec("X")%>Posto:<%=rec("Y")%>

			<%
			rec.MoveNext
			Wend%>
	</div>
	<%Wend
	rec.close
	%>

[eliane]

Sarà che ho capito!
se mettesse qui il suo codice sarebbe più facile
ma vediamo se é questo che vuoi


deve avere un campo nella tabella2 dove entra la
iduser ->id della prima tabella

<%

sql = "SELECT * FROM tabella
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3

''''''''''''''
sql2 = "SELECT * FROM tabella2 where iduser="&rs("iduser")
Set rs2 = Server.CreateObject("ADODB.Recordset")
rs2.Open sql2, conn ,3,3
Do While Not rs2.EOF


Response.write rs2("X")&"
"&rs2("Y")
rs2.movenext
loop
rs2.Close
set rs2 = Nothing

'''''''''''''''''''''''''''
rs.Close
set rs = Nothing
%>

Ciao

[eliane]

prova cosi
SQL="SELECT * FROM layout WHERE stato=True AND UserID="&Cod

cod é numero
allora senza '

[eliane]

ho trovato altri sbagli
la tabella users
sql e rec
la tabella layout
sql2 rec2
prova cosi:

SQL="SELECT * FROM users order by Cognome"
Set rec = Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL)
While Not rec.EOF
%>
<div align="center" class="padre">
<div class="figlio" align="left">
nbsp;
Cognome: <%=rec("Cognome")%>
Nome: <%=rec("Nome")%>
Codice utente: <%=rec("ID")%>

E-mail: <%=rec("Email")%>
Telefono: <%=rec("Telefono")%>


</div>
<%
Cod=rec("ID")
SQL2="SELECT * FROM layout WHERE stato=True AND UserID="&Cod
Set rec2 = Server.CreateObject("ADODB.Recordset")
Set Rec2=Conn.Execute(SQL2)
While Not rec2.EOF
%>
Fila: <%=rec2("X")%> Posto: <%=rec2("Y")%>

<%
rec2.MoveNext
Wend
rec2.close%>
</div>
<%rec.MoveNext
Wend
rec.close

[webdesigning]

MI DA' QUEST'ERRORE

Response object error 'ASP 0251 : 80004005'

Response Buffer Limit Exceeded

reporting.asp, line 0

Execution of the ASP page caused the Response Buffer to exceed its configured limit.

[eliane]

la pagina completa com'è?

[webdesigning]

<%
SQL="SELECT * FROM users order by Cognome" 
Set rec = Server.CreateObject("ADODB.Recordset") 
Set Rec=Conn.Execute(SQL) 
While Not rec.EOF 
%> 
<div align="center" class="padre"> 
<div class="figlio" align="left">
 
Cognome: <%=rec("Cognome")%> 

Nome: <%=rec("Nome")%> 
Codice utente: <%=rec("ID")%>
 
E-mail: <%=rec("Email")%> 
Telefono: <%=rec("Telefono")%>

 
</div> 
<% 
Cod=rec("ID") 
SQL2="SELECT * FROM layout WHERE stato=True AND UserID='"&Cod&"'" 
Set rec2 = Server.CreateObject("ADODB.Recordset") 
Set Rec2=Conn.Execute(SQL2) 
While Not rec2.EOF 
%> 
Fila: <%=rec2("X")%> Posto: <%=rec2("Y")%>
 
<% 
rec2.MoveNext 
Wend 
rec2.close%> 
</div> 
<%Wend 
rec.close %>

[eliane]

la UserID="&Cod
come avevo detto prima
senza '

e poi

rec2.close
set rec2 = Nothing
--
rec.close
set rec = Nothing

ecco il codice come deve essere:

<%
SQL="SELECT * FROM users order by Cognome"
Set rec = Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL)
While Not rec.EOF
%>
<div align="center" class="padre">
<div class="figlio" align="left">

Cognome: <%=rec("Cognome")%>

Nome: <%=rec("Nome")%>
Codice utente: <%=rec("ID")%>

E-mail: <%=rec("Email")%>
Telefono: <%=rec("Telefono")%>


</div>
<%
Cod=rec("ID")
SQL2="SELECT * FROM layout WHERE stato=True AND UserID="&Cod
Set rec2 = Server.CreateObject("ADODB.Recordset")
Set Rec2=Conn.Execute(SQL2)
While Not rec2.EOF
%>
Fila: <%=rec2("X")%> Posto: <%=rec2("Y")%>

<%
rec2.MoveNext
Wend
rec2.close
set rec2 = Nothing%>
</div>
<%Wend
rec.close
set rec = Nothing %>