合工大数据库上机实验2

1、数据库及应用课程实验报告实验名称： Visual FoxPro 6.0的基本操作 实验类型： 验证设计 实验学时： 8学时 学 号： 姓 名： 班 级： 指导教师： 罗贺 实验地点： 管理学院一号楼四楼机房 实验时间： 2012年11月19日、26日 二一二年十二月十日添加30条数据（3）求每门课的平均成绩，并把结果存入average表； 解：USE h:数据库实验作业二实验二score表.dbf EXCLUSIVE sele score表.Cno,avg(score表.score)as 平均分; from score表; into table average; group by score表

2、.Cno Browse 截图：（4）将学生“马丽鹃”的出生日期改为“1982.8.20”； 解：USE h:数据库实验作业二实验二student表.dbf EXCLUSIVE edit for sname='马丽娟' 截图：（5）将所有学生的zipcode属性列值填补上； 解：repl Zipcode with 230006 repl all Zipcode with 230006 USE h:student.dbf EXCLUSIVE modify structure repl all Zipcode with 230006 截图：（6）将average表中的所有课程的平均成

3、绩置零； 解：USE h:数据库实验作业二实验二average.dbf EXCLUSIVE repl all 平均分 with 0 截图：（7）删除average表中的课程号为c007的平均成绩记录； 解：USE h:数据库实验作业二实验二average.dbf EXCLUSIVE delete for Cno='C007' browse pack Browse 截图:（8）删除所有average表中平均成绩记录； 解：delete all pack browse 截图：（9） 建立一个临时学生信息表（tstudent），删除该表中的学号前六位为001011的所 有学生记录。

4、解：Select*; from student; into cursor tstudent; where substr(Sno,1,6)!='001011' browse 截图：（10）查询全体学生的学号与姓名； 解：Select Sno,Sname; From student 截图： （11）查询全体学生的学号、姓名、所属班级； 解：Select Sno,Sname,Sclass; From student 截图：（12）查询全体学生的详细记录； 解：Select *; From student 截图：（13）查询全体学生的姓名及其年龄； 解：Select Sname,yea

5、r(date()-year(Sbirthday) as age; From student 截图：（14）查询全体学生的姓名、出生年份； 解：Select Sname,Sbirthday; From student 截图:（15）查询所有修过课的学生的学号； 解：Select student.Sno; From score, student; Where score.Sno=student.Sno 截图：（16）查询“信管系0101”班全体学生名单； 解：Select Sname; From student; Where Sclass='信管系0101' 截图： （17）查询查

6、询所有年龄在27岁以下的学生姓名及其年龄； 解：Select Sname,year(date()-year(Sbirthday) as age; From student; Where year(date()-year(Sbirthday)<=27 截图：（18）查询考试成绩有不及格的学生的学号； 解：Select Sno; From score; Where Score<60 截图：（19）查询年龄在15至28岁之间的学生姓名、班级和年龄； 解：Select Sname,Sclass, year(date()-year(Sbirthday) as age; From studen

7、t; Where year(date()-year(Sbirthday)>15 and year(date()-year(Sbirthday) <28 截图：（20）查询年龄不在15至28岁之间的学生姓名、班级和年龄； 解：Select Sname,Sclass, year(date()-year(Sbirthday) as age; From student; Where year(date()-year(Sbirthday)<=15 or year(date()-year(Sbirthday)>=28 截图：（21）查询“信管系0101”和“电商系0102”班的学生

8、的姓名和班级信息； 解：Select Sname,Sclass; From student; Where Sclass='信管系0101'or Sclass='电商系0102' 截图：（22）查询既不是“信管系0101”也不是“电商系0102”班的学生的姓名和班级信息； 解：Select Sname,Sclass; From student; Where Sclass!= '信管系0101'and Sclass!='电商系0102' 截图：（23）查询学号为“011113104”的学生的详细情况； 解：Select *; From

9、 student; Where Sno='011113104' 截图：（24）查询学号以“0111”打头的学生信息； 解：Select *; From student; Where substr(Sno,1,4)='0111' 截图： （25）查询所有姓“张”学生的学号、姓名、性别、年龄； 解：Select Sno,Sname,year(date()-year(Sbirthday) as age; From student; Where Sname like '张%' 截图：（26）查询名字中第二个字有“海”字的学生的学号、姓名、性别、年龄； 解

10、：Select Sno,Sname, year(date()-year(Sbirthday) as age; From student; Where substr(Sname,3,2)='海' 截图：（27）查询所有不姓“刘”学生的姓名； 解：Select Sname; From student; Where substr(Sname,1,2)!='刘' 截图：（28）查询课程号以“C”开头的最后两个字母为“05”的课程号和课程名； 解：Select Cno,Cname; From course; Where Cno like 'C%'and s

11、ubstr(Cno,3,2)='05' 截图：（29） 某些学生选修某门课程后没有参加考试，所以有选修课记录，但没有考试成绩，试查 找缺少考试成绩的学生和相应的课程号； 解：Select Sno,Cno; From score; Where Score=0 截图：（30）查找全部有成绩记录的学生学号、课程号； 解：Select Sno,Cno; From score; Where Score!=0 截图：（31）查找“电商系0101”班年龄在27岁以下的学生学号、姓名； 解：Select Sno,Sname; From student; Where Sclass='电商

12、系0101'and year(date()-year(Sbirthday)<27 截图：（32）查找选修了“C001”号课程的学生学号及其成绩，查询结果按分数降序排序； 解：Select Sno,Score; From score; Where Cno='C001' Order by Score desc 截图：（33） 查询全体学生情况，查询结果按所在班级升序排列，对同一班级中的学生按年龄降序 排列； 解：Select *,year(date()-year(Sbirthday)as age; From student; Order by Sclass asc,a

13、ge desc 截图：（34）查询学生总人数； 解：Select count(Sno) as 学生总人数; From student 截图：（35）查询选修了课程的学生人数； 解：Select count(Sno) as 选修了课程的学生人数; From score 截图：（36）在所有课程中查询最高分的学生学号和成绩； 解：Select Sno,max(Score) as 最高分; From score 截图：（37）查询学习“C001”课程的学生最高分数； 解：Select max(Score) as 最高分数; From score; Where Cno='C001' 截

14、图:（38）计算各个课程号与相应的选课人数； 解：Select Cno,count(*) as 选课人数; From score; Group by Cno 截图：（39）查询“电商系0102”班选修了两门课程以上的学生学号、姓名； 解：Select student.Sno,student.Sname,count(*) as 选课门数; From score,student; Where Sclass='电商系0102'and score.Sno=student.Sno Group by Cno; having count(*)>=2 截图：（40）自然连接student

15、和score表； 解：Select *; From student full join score; On student.Sno=score.Sno 截图：（41）使用自身连接查询每一门课程的间接先行课（即先行课的先行课） 解：Select x.Cno,y.Cpno; From course as x,course as y; Where x.Cpno=y.Cno Group by x.Cno 截图：（42）使用复合条件连接查询选修“c001”号课程且成绩在90分以上的所有同学； 解：Select student.Sno,student.Sname,score.Score; From stu

16、dent,score; Where student.Sno=score.Sno ; and score.Cno='C001' and score.Score>=90 截图：（43）使用复合条件连接查询每个学生选修的课程名及其成绩； 解：Select course.Cname,score.Score; From course,score; Where course.Cno=score.Cno 截图：（44）查询选修了全部课程的学生； 解：Select student.Sno,student.Sname; From student; Where Sno in; (select

17、 score.Sno; From score; Group by score.Sno; Having count(*)=7) 截图：（45）查询至少选修全部学分数为4个学分的课程的学生的学号、姓名； 解：select student.Sno,student.Sname; from student,score,course; where student.Sno=score.Sno; and score.Cno=course.Cno; group by score.Sno; having sum(course.Credit)>=4 截图：（46）查询所有选修了C001号课程的学生学号、姓名；

18、 解：Select student.Sno,student.Sname; From student; Where Sno in; (select score.Sno; From score; Where score.Cno='C001') 截图：（47）查询选修了课程C001或c007的学生学号、姓名； 解：Select student.Sno,student.Sname; From student; Where Sno in; (select score.Sno; From score; Where score.Cno='C001'or score.Cno=&

19、#39;C007') 截图:（48）查询“会计系0102”班的学生及年龄不大于27岁（现有年龄）的学生； 解：Select *; From student; Where Sclass='会计系0102'and year(date()-year(Sbirthday)<=27 截图：（49）查询既选修了课程C001又选修了课程c007的所有学生学号、姓名； 解：Select student.Sno,student.Sname; From student; Where Sno in; (select score.Sno; From score; Where score.

20、Cno in('C001','C007'); Group by score.Sno; Having count(Cno)=2) 截图：（50）查询选修了课程名为“数据库原理”的学生的学号、姓名、性别、年龄； 解:Select student.Sno,student.Sname, year(date()-year(Sbirthday) as age; from student,score,course; where course.Cname='数据库原理' and student.Sno=score.Sno; and score.Cno=cours

21、e.Cno 截图：（51）查询其他班中比“信管系0101”班所有学生年龄都小的学生名单； 解：Select Sname; From student; Where Sbirthday>all; (select Sbirthday; From student; Where Sclass='信管系0101') 截图:（52）查询与“齐振国”在同一个班学习的学生学号、姓名、性别、年龄； 解：Select Sno,Sname,year(date()-year(Sbirthday)as age; From student; Where Sclass in; (select Sclass; From student; Where Sname='齐振国') 截图：（53）建立“信管系0101”班学生的视图，定义视图名为“info_student1”； 截图：（55） 建立“信管系0101”班选修了“C001”课程的学生的视图，定义视图名为 “info_C001_student1”； 截图：（56） 建立“信管系0101”班选修了“C001”课程且成绩在90分以上的学生的视图，定义 视图名为“info_c001_student2”； 截图：（57）定义一个反映