检索包含学号为101所学课程的学生学号.sql

很久以前用delphi写的一个SQLServer外部的企业管理器

                             --检索包含学号为101所学课程的学生学号--
select distinct 学号 from 成绩表 as x where not exists 
     (select * from 成绩表 as y where y.学号='101' and not exists
            (select * from 成绩表 as z where z.学号=x.学号 and z.课号=y.课号))