This is the way
' ## SELECT MAILINGLISTS
SQL = " SELECT m.intID, m.strName, 'TRUE' as Subscriber" _
& " FROM mailinglist m, [b]users u[/b] " _
& " WHERE EXISTS " _
& " (SELECT intID FROM subscribers s WHERE s.intUserID = u.intID AND s.intMailinglistID = m.intID AND s.intUserID = " & request("ID") & ") " _
& " UNION " _
& " SELECT m.intID, m.strName, 'FALSE' " _
& " FROM mailinglist m, [b]users u[/b] " _
& " WHERE NOT EXISTS " _
& " (SELECT intID FROM subscribers s WHERE s.intUserID = u.intID AND s.intMailinglistID = m.intID AND s.intUserID = " & request("ID") &");"
set mySQL = Conn.Execute(SQL)
listMailinglist = mySQL.GetRows()
' ## SELECT MAILINGLISTS
SQL = " SELECT m.intID, m.strName, 'TRUE' as Subscriber" _
& " FROM mailinglist m " _
& " WHERE EXISTS " _
& " (SELECT intID FROM subscribers s WHERE s.intUserID = u.intID AND s.intMailinglistID = m.intID AND s.intUserID = " & request("ID") & ") " _
& " UNION " _
& " SELECT m.intID, m.strName, 'FALSE' " _
& " FROM mailinglist m " _
& " WHERE NOT EXISTS " _
& " (SELECT intID FROM subscribers s WHERE s.intUserID = u.intID AND s.intMailinglistID = m.intID AND s.intUserID = " & request("ID") &");"
set mySQL = Conn.Execute(SQL)
listMailinglist = mySQL.GetRows()
Nu svarar jag mig själv. Ta bort users u så fungerar det!