*Suck* kompislista

Jag skulle gjort såhär:

[members]
memberid
username

[relations]
id
userid
friendid

Ja men hur ser SQL:en se ut då?

Det beror ju lite på vad du vill göra..

hehe jag ska lista en användares kompislista..

om du ska kunna få något exempel så måste du nog förklara lite mer hur du vill ha det.
ska man kunna lista en kompis och dennes kompisar eller ska man kunna lista en kompis och kompisens mormor och hennes kompisar eller dina kompisar och din mormor eller...

Ja asså när du går in på Gretas kompislista så ska du få upp de kompisar hon har addat o de kompisar som har addat Greta.

Hänger du med?

sorry att jag inte svarat tidigare, har inte haft tid.
det finns förmodligen en massa sätt att lösa detta på, en variant skulle kunna se ut så här:

strsql = "SELECT membername, friendname FROM members m "&_
"inner join friends f on m.id = f.memberid WHERE m.Id =1 "

Set rs = conn.Execute(strsql)

Response.Write "det här är jag: <br>" & rs("membername") & "<br>"
Response.Write "och det här är mina kompisar:<br>"
While not rs.Eof
Response.Write rs("friendname") & "<br>"
rs.movenext
wend

och tabellerna ser ut:

members: Id, membername
friends: Id, memberid, friendname

hur man ska kunna se vilka kompisar som har adderat mig har jag faktiskt ingen bra lösnig på just nu, men om inte de andra medlemmarna här på forumet kommer med ett förslag så ska jag fixa en lösning senare.
Du kan ju åtminstone börja labba lite med denna!

här kommer en fortsättning:

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open strconn

strsql = "SELECT membername, friendname FROM members m "&_
"inner join friends f on m.id = f.memberid WHERE m.Id =1 "
Set rs = conn.Execute(strsql)

strsql2 = "SELECT membername FROM members m "&_
"inner join friends f on m.id = f.memberid WHERE f.friendid =1 "
Set rs2 = conn.Execute(strsql2)

Response.Write "det här är jag: <br>" & rs("membername") & "<br>"
Response.Write "och det här är mina kompisar:<br>"
While not rs.Eof
Response.Write rs("friendname") & "<br>"
rs.movenext
wend
rs.Close()
Set rs = Nothing

Response.Write "dessa personer har adderat mig till deras lista:<br>"
While Not rs2.Eof
Response.Write rs2("membername") & "<br>"
rs2.movenext
wend
rs2.Close()
Set rs2 = Nothing

conn.Close()
Set conn = Nothing

tabeller:

members: Id, membername
friends: Id, memberid, friendid, friendname

Jo fast om man har 2 SQL:er då blir det ju lite knas när man ska sortera dem. Det är där mitt problem ligger.

För jag vill ju kunna sortera kompislistan efter namn typ så att de kompisar jag addat o de som har addat mig ska komma i samma sortering.

denna fixar nog tricket!

friend = 1
strsql = "SELECT membername FROM members WHERE id in(Select memberid from friends where friendid = " & friend & " )or id in (Select friendid from friends where memberid = " & friend & " ) order by membername "

jag är inte stensäker på att det håller men, men ...