relationsdatabase, skriv flere oplysninger ved hjælp af relation

Mener du?

select * from TABEL where username = "& request.form("username") &"

jeg bruger følgende til at få udskrevet username fra tabel: "booking"
---------
<%if not rsBook.EOF then%>
<%rsBook.Movefirst
do until rsBook.EOF%>
<p><% = Replace(rsBook ("username"),vbCrLf,"<br>")%><br />
<%rsBook.Movenext
  loop%>
<%end if%>

----------
så har jeg en anden tabel "users" hvor der står flere oplysninger om de forskellige brugere, så vil jeg lave sådan at når den udskriver username fra "booking" så går den selv ind og henter resten af oplysningerne om brugeren fra "users" kan man lave det?

Ja det kan man godt.
Nu henter den også alt fra tabelen users til hver enkelt bruger. Det eneste du skal er at udskrive data fra users i din loop med RS("KOLONNE")

<%if not rsBook.EOF then%>
<%rsBook.Movefirst
do until rsBook.EOF
set RS = Conn.execute(select * from users where username = "& rsBook("username") &")
%>
<p><% = Replace(rsBook ("username"),vbCrLf,"<br>")%><br />
<%rsBook.Movenext
  loop%>
<%end if%>

<%if not rsBook.EOF then%>
<%rsBook.Movefirst
do until rsBook.EOF
set RS = Conn.execute(select * from Users where username = "& rsBook("username") &")
%>
%>
<p><% = Replace(rsBook ("username"),vbCrLf,"<br>")%>,  <br />
<%rsBook.Movenext
  loop%>
<%end if%>
------------------
giver følgende fejl
------------
Microsoft VBScript compilation error '800a03ea'

Syntax error

/ita/studie82/admin/booking/show_book.asp, line 46

set RS = Conn.execute(select * from Users where username = "& rsBook("username") &")
----------------------^

har selv fundet en løsning.... lukker

Så skal du lige skrive din løsning her :-)

sql = "SELECT * FROM Users where username ='" & rsBook("username") & "'"
Set rsUser = Server.CreateObject("ADODB.Recordset")
rsUser.Open sql, conn, 3, 3

---------

<% = Replace(rsUser ("firstname"),vbCrLf,"<br>")%>