实验四数据库编程.docVIP

实验四 数据库编程 实验目的和要求 掌握存储过程的创建和使用 掌握触发器的创建和使用 掌握使用VB.NET访问数据库的方法 实验内容 创建和执行存储过程 创建一个cust_select存储过程，执行该存储过程将从表中根据客户的cid检索客户的姓名、所在城市和折扣率。 USE CAP GO CREATE PROCEDURE cust_select (@customer_id char(4),@customer_name varchar(13) OUTPUT, @customer_city varchar(20) OUTPUT,@customer_discnt real OUTPUT) AS IF EXISTS(SELECT * FROM customers where cid=@customer_id) SELECT @customer_name=cname,@customer_city=city, @customer_discnt=discnt from customers where cid=@customer_id ELSE SELECT Person not found! 执行以上定义的cust_select存储过程 DECLARE @cust_name varchar(13) DECLARE @cust_city varchar(20) DECLARE @discnt real EXECUTE cust_select c001, @cust_name output,@cust_city output,@discnt output SELECT customer_name,@cust_name,city,@cust_city ,discount,@discnt 问题：若要检索其他客户的信息，使用存储过程如何实现？ 编写一个存储过程，向customers表中插入一条记录，并显示提示信息。 编写一个存储过程，根据用户输入的代理商的aid统计该代理商的总销售额。 创建和使用触发器 在CAP数据库中的agents表上建立一个DELETE触发器agent_tri1(使用CREATE TRIGGER语句创建)，使得在删除表agents中的记录的同时，自动检查orders表中是否有与该代理商相关的记录，如果存在相关记录，则取消删除。 USE CAP GO CREATE TRIGGER agent_tri1 ON agents FOR DELETE AS declare @AgentID char(3) select @AgentID= (select aid from deleted) IF (SELECT COUNT(*) FROM orders where orders.aid=@AgentID)0 BEGIN DECLARE @ErrorMessage varchar(100) set @ErrorMessage=You can not delete the agent information with the order record.+char(13)+The transaction will be cancelled RAISERROR(@ErrorMessage,10,1) ROLLBACK TRANSACTION END 在查询窗口中输入以下语句验证触发器 DELETE FROM agents WHERE aid=a01 在agents表中添加一条新纪录（a08,Rose,New York,8），再在查询窗口中输入以下语句验证 DELETE FROM agents WHERE aid=a08 使用系统存储过程sp_helptext查看触发器agent_tril定义的信息 USE CAP EXEC sp_helptext agent_tri1 GO 使用VB.NET访问数据库 编程实现与customers表的连接 操作步骤： 新建VB.Net项目，设计好界面。 编写代码。双击窗体空白处，进入代码编辑窗口。编写代码时，可按以下思路进行编写。 导入命名空间→定义所需变量（数据连接、数据适配器、数据集、连接字符串、SQL语句字符串）→给变量赋值→数据填充→将组合框和数据集联系起来。代码如下： Imports System.Data.SqlClient 导入命名空间 Public Class Form1 Inherits System.Windows.Forms.Form Dim SqlConnection1 As New SqlConnection 定义连接变量 Dim DataSet1 As Da