同济大学数据库期末复习教程.pptVIP

数据库技术与应用;知识要点;数据库技术的基本概念;数据库体系结构;设计数据库;管理数据库;管理数据库; 对关系s(snum,sname,sex,age)设计输入触发器，其功能为当用户输入学生记录时对性别进行完整性控制，即当输入值超出“男”、“女” 范围时，显示“性别输入有误”，否则报“性别录入成功！”。 ;CREATE TRIGGER s_sex ON s FOR INSERT AS BEGIN DECLARE @_sex char(2) SELECT @_sex=sex, @_age=age FROM inserted IF @_sex not in (男, 女) BEGIN PRINT 性别输入有误！ ROLLBACK END ELSE BEGIN PRINT 性别录入成功！ COMMIT END END; 对关系SC(snum,cnum,score)设计输入触发器，其功能为当用户输入学生选课成绩记录时,对分数进行完整性控制，即当输入值超出 0～100 范围时，显示“分数输入有误”，否则报“成绩录入成功！”。; 对关系:产品﹙产品号，产品名称,单价,产地﹚设计存储过程，其功能为查找指定地区的产品信息。 例如：查询山东生产的产品信息。 ;应用数据库—ADO.NET;　　对于关系sc(snum,cnum,score)，首先将课程号填充到ComboBox1，然后根据ComboBox1的不同选择，在DataGrid1显示指定课程的课程号、最高成绩、最低成绩。; Private Sub Form3_Load(…) Handles MyBase.Load Dim myconn As SqlConnection = New SqlConnection(Data Source=naonao;Integrated Security=SSPI;Initial Catalog=tjdb) Dim mycmd As New SqlCommand mycmd.Connection = myconn mycmd.CommandText = select distinct cnum from sc Dim myadapter As SqlDataAdapter = New SqlDataAdapter(mycmd) Dim mydataset As New DataSet myadapter.Fill(mydataset, 课程号) Me.ComboBox1.DataSource = mydataset.Tables(课程号) Me.ComboBox1.DisplayMember = cnum End Sub; Private Sub ComboBox1_SelectedIndexChanged(…) Handles… Dim myconn As SqlConnection = New SqlConnection(Data Source=.;Integrated Security=SSPI;Initial Catalog=tjdb) Dim mysql As String mysql = select distinct cnum as 课程号,max(score) as 最高成绩,min(score) as 最低成绩 from sc where cnum= Trim(Me.ComboBox1.Text) group by cnum Dim myadapter As SqlDataAdapter = New SqlDataAdapter(mysql,myconn) Dim mydataset As New DataSet myadapter.Fill(mydataset, 成绩汇总) Me.DataGrid1.DataSource = mydataset.Tables(成绩汇总) Me.DataGrid1.CaptionText = + Trim(Me.ComboBox1.Text) + 课程的最高最低成绩 End Sub;Private Sub Form1_Load(……) Handles MyBase.Load Dim sql As Str