寻：地VB中，用存储过程来完成，插入数据，删除数据，查找数据 的操作。

Question

寻：地VB中，用存储过程来完成，插入数据，删除数据，查找数据 的操作。

Answer 1

create proc RentUpdate
@RentID char(6),@CustomerID char(6),@VcdID char(6),@Rentnumber int,@TotRent money,@returnValue int
as
declare @ins1_error int,@upd1_error int,@upd2_error int,@upd3_error int,@upd4_error int
begin tran insert RentDetailsZhu
values(@RentID,@VcdID,'ﾎｴｻｹ',@Rentnumber,@TotRent)
select @ins1_error = @@ERROR update RentZhu
set iTotRentnmuber=iTotRentnmuber+@Rentnumber
where cRentID=@RentID
select @upd1_error = @@error update RentZhu
set iNotReturnNum=iNotReturnNum+@Rentnumber
where cRentID=@RentID
select @upd2_error = @@error update CustomerZhu
set mRental=mRental+@Rentnumber
where cCustomerID=@CustomerID
select @upd3_error = @@error update VcdDetailsZhu
set iQth=iQth-@Rentnumber
where cVcdID=@VcdID
select @upd4_error = @@errorIF @ins1_error=0 and @upd1_error = 0 AND @upd2_error = 0 AND @upd3_error = 0
AND @upd4_error = 0
begin
commit tran
set @returnValue = 1
end
else 
begin
rollback tran
set @returnValue = 0
end*/