这个存储过程怎么写啊

Question

这个存储过程怎么写啊   向两个表A，B中插入数据，要求将A中插入一条数据时自动产生的一个ID插入到B中，谢谢

Answer 1

表A 上建立一个触发器，
IF OBJECT_ID ('MYTRIGGER ', 'TR') IS NOT NULL
   DROP TRIGGER MYTRIGGER ;
GO
CREATE TRIGGER MYTRIGGER 
ON 表A 
AFTER INSERT
INSERT INTO B(ID)
SELECT MAX(ID) FROM A
GO

Answer 2

create proc p1(@ID int)
as
insert t1(Col) values(@ID)
insert t2(Col) values(@ID)

Answer 3

用触发器.CREATE TRIGGER my_trig ON A
FOR INSERT
AS 
  insert into b(id) select id from inserted
GO

Answer 4

CREATE TRIGGER my_trig ON A 
FOR INSERT 
AS 
  insert into b(id) select id from inserted 
GO 

Answer 5

create database dbTemp;
use dbTemp;
raiserror('正在创建表:A表....',0,1)
create table A(AID int not null identity(1,1) constraint pk_aid primary key clustered, AName nvarchar(10))
GO
raiserror('正在插入A表:三条记录....',0,1)
INSERT A   SELECT 'zjp'
UNION  ALL   SELECT '8023'
UNION  ALL    SELECT 'X8023Z'GO
create table B(BID int constraint FK_Bid FOREIGN KEY (BID) REFERENCES A(AID), BName nvarchar(10))
GO
raiserror('正在插入B表:三条记录....',0,1)
INSERT B  SELECT 1,'xhy'
UNION  ALL   SELECT 2,'123'
UNION  ALL    SELECT 2,'456'--创建插入两表的存储过程
--插入开始
create procedure SP_INSERT_AB
 @AName nvarchar(10),
 @BName nvarchar(10)
  WITH ENCRYPTION 
as
  begin tran--启动事务
        declare @ERROR int
        set @ERROR=0
        declare @CurrentID int
        begin
            INSERT INTO A VALUES(@AName)
            SET @ERROR =@ERROR +@@ERROR
              IF (@ERROR <>0) GOTO EXT
            set @CurrentID=@@IDENTITY   
            insert into B values(@CurrentID,@BName)
           SET @ERROR =@ERROR +@@ERROR
              IF (@ERROR <>0) GOTO EXT
        end
  
   --异常出口
   EXT:

   --判断执行状态
  IF (@ERROR =0)
     BEGIN
         COMMIT
     END
  ELSE
     ROLLBACK
go
--插入结束
--执行存储过程
exec SP_Insert_AB '777','888'
--select * from a
--select * from b
--删除数据库
go
use master
drop database dbTemp
go

Answer 6

回上楼：去看看这篇文章吧。这个说得很好哈。
http://www.cnblogs.com/tom-fu/archive/2008/06/25/1229314.html