数据库实验报告.docVIP

实验二触发器的使用 1、建立一个新的表并有数据 查询语句：select 院系, avg (英语) as 英语平均成绩 into 各院平均英语成绩表 from 学生成绩表 group by 院系 注意点：前面的逗号不要忘记, 把查询结果放入新的表中用into 用触发器修改学生成绩这个表的数据时，院系平均成绩表也会自动更新。 2、触发器（作用是把表关联起来，那么一个表发生改变另个一个表会自动发生改变，不用人工修改。） 3、删除一个表中的一行，另一个表的相应数据也删除 Create trigger 求总成绩 on 学生成绩表 For update As Begin Update 成绩汇总表 Set 总成绩=总成绩-(select sum(英语)from deleted Group by deleted.院系 Having 成绩汇总表.院系=deleted.院系 Update 成绩汇总表 Set 总成绩=总成绩+(select sum (英语) from inserted Group by inserted.院系 Having 成绩汇总表.院系=inserted.院系) End 实验三创建存储过程 1、建立一个无参的存储过程 查询语句：create procedure 查询 as select 学号,姓名,院系 from 学生基本信息 where 院系=公管 2、建立一个有参数的存储过程 查询语句：Create procedure 动态查询(@type char(12)) As Select 学号,姓名,院系 from 学生基本信息 where 院系=@type 结果显示： 3、调用建立好的有参存储过程 查询语句：Declare @ty char (12) Set @ty=’机械学院’ EXEC 动态查询 @ty 结果显示： 实验四Visual Basic 1、数据库与VB联接 属性中的DateSource Adodc1 选中Adodc1在属性中选择Conectionstring 选中DateGride，在属性中的DateGride选择与adodc1连接 点击查询即可将数据库中学生基本信息在VB中显示 输入籍贯后点击“查询”，在表中显示符合要求的学生基本信息 Private Sub Command1_Click() Adodc1.RecordSource = select * from 学生基本信息 where 籍贯 = + (Text1.Text) + Adodc1.Refresh 注意点：(要在Private Sub Command1_Click()和End Sub两个语句中间输入这些语句) End Sub 结果显示如图： 在籍贯与院系中输入信息后，点击“查询”，在表中显示符合要求的学生基本信息 3、再添加学生选课（做法同上） 对Text3 的操作：属性中的datesource 选择adodc1，datefield 学号 在text3的change中写以下代码 Private Sub Text3_Change() If Text3.Text Then Adodc2.RecordSource = select * from 学生选课表 where 学号= + (Text3.Text) + Adodc2.Refresh End If End Sub 结果如下图： 5