makeview.prg

简单VFP学藉管理程序V1.0,大家看看,可能会有帮助

*-- 因为反复创建视图会使数据库文件不断增大，所以
*-- 本程序只在设计初期创建库时运行一次

Set defa to f:\学藉管理\data

Open database it

Create SQL View 学生情况 as ;
	SELECT Grade.年级名称, ;
	Class.班级名称, ;
 	Student.姓名, ;
	iif(Student.姓别,"男","女") as 姓别,;
	Student.年龄,;
	Student.入学时间 ;
	FROM  it!Grade INNER JOIN it!Student;
	INNER JOIN it!class ;
	ON  Class.班级码 = Student.班级码 ;
	ON  Grade.年级码 = Student.年级码

Create SQL View vStudent AS ;
	Select ;
	Grade.年级名称, ;
	Class.班级名称,;
	Student.学号, ;
	Student.姓名, ;
	iif(Student.姓别,"男","女") as 姓别,;
	Student.年龄, ;
	Student.入学时间, ;
	Studetail.时间, ;
	Studetail.英文, ;
	Studetail.语文,;
	Studetail.计算机基础, ;
	Studetail.其它 ;
	FROM it!Student INNER JOIN it!Studetail ;
	INNER JOIN it!class;
	INNER JOIN it!Grade ;
	ON  Grade.年级码 = Student.年级码 ;
	ON  Class.班级码 = Student.班级码 ;
	ON  Student.学生码 = Studetail.学生码;
	ORDER BY Student.学号, Studetail.时间

Cd..