innerjoin

set recset = connect.execute (_
"SELECT Kompisar.*, Medlemmar.* " & _
"  FROM Kompisar INNER JOIN Medlemmar " & _
"    ON Medlemmar.Anvandarnamn = Kompisar.till " & _
" Where Kompisar.till = '"&anvandarnamn &"'" & _
"   and accepterad='1' union " & _
"SELECT Kompisar.*, Medlemmar.* " & _
"  FROM Kompisar INNER JOIN Medlemmar " & _
"    ON Medlemmar.Anvandarnamn = Kompisar.fran " & _
" Where Kompisar.fran = '"&anvandarnamn &"'" & _ 
"   and accepterad='1' " & _
" order by relation,fran ASC")

Skriv inte så långa rader.

The text, ntext, or image data type cannot be selected as DISTINCT.

Då använder du union all istället.

set recset = connect.execute (_
"SELECT Kompisar.*, Medlemmar.*,'Till' as typ " & _
"  FROM Kompisar INNER JOIN Medlemmar " & _
"    ON Medlemmar.Anvandarnamn = Kompisar.till " & _
" Where Kompisar.till = '"&anvandarnamn &"'" & _
"   and accepterad='1' union all " & _
"SELECT Kompisar.*, Medlemmar.* ,'Från' " & _
"  FROM Kompisar INNER JOIN Medlemmar " & _
"    ON Medlemmar.Anvandarnamn = Kompisar.fran " & _
" Where Kompisar.fran = '"&anvandarnamn &"'" & _ 
"   and accepterad='1' " & _
" order by relation,fran ASC")

Det kan vara bra att ha en kolumn som anger om det är från eller till.

Flyttas från ASP.

Vad betyder 'Från' och 'Till' ?

koden funkar fortfarande inte när jag skriver ut det med <%=recset("anvandarnamn")%> allt blir samma värde!

så kanske?

set recset = connect.execute (_
"SELECT Kompisar.*, Medlemmar.*" & _
"  FROM Kompisar INNER JOIN Medlemmar " & _
"    ON Medlemmar.Anvandarnamn = Kompisar.till " & _
" Where Kompisar.fran = '"&anvandarnamn &"'" & _
"   and accepterad='1' union all " & _
"SELECT Kompisar.*, Medlemmar.* " & _
"  FROM Kompisar INNER JOIN Medlemmar " & _
"    ON Medlemmar.Anvandarnamn = Kompisar.fran " & _
" Where Kompisar.till = '"&anvandarnamn&"'" & _ 
"   and accepterad='1' " & _
" order by relation,fran ASC")

hur gör jag för att kompisarna kan skriva nått om sin relation!
har dessa fält, Kompisbeskrivning1 och Kompisbeskrivning2?