求一存储过程，随机生成若干个不重复数，并插入表

Question

--取得随机数的视图
CREATE VIEW v_RAND
AS
SELECT re=STUFF(RAND(),1,2,'')
GO--生成随机编号的函数
CREATE FUNCTION f_RANDBH(@BHLen int)
RETURNS varchar(50)
AS
BEGIN
DECLARE @r varchar(50)
IF NOT(ISNULL(@BHLen,0) BETWEEN 1 AND 50)
SET @BHLen=10lb_bh: --生成随机编号的处理
SELECT @r=re FROM v_RAND
WHILE LEN(@r)<@BHLen
SELECT @r=@r+re FROM v_RAND
SET @r=LEFT(@r,@BHLen) --检查编号在基础数据表中是否存在
IF EXISTS(SELECT * FROM tb WITH(XLOCK,PAGLOCK) WHERE BH=@r)
GOTO lb_bh RETURN(@r)
END
GO--创建引用生成随机编号的函数
CREATE TABLE tb(
BH char(10) PRIMARY KEY DEFAULT dbo.f_RANDBH(10),
col int)--插放数据
BEGIN TRAN
INSERT tb(col) VALUES(1)
INSERT tb(col) VALUES(2)
INSERT tb(col) VALUES(3)
COMMIT TRAN
SELECT * FROM tb
GO
/*--结果
BH                   col 
------------------------------ ----------- 
6128177354           1
7378536177           3
8387186129           2
--*/

Answer 1

declare @tb table(NumberList int)
insert @tb
select 1001 declare @start int,@num int
set @start=1000
set @num=3while @num>0
begin
  set @start=@start+1
  insert @tb select top 1 @start from @tb where not exists(select 1 from @tb where NumberList=@start)
  set @num=@num-1
endselect * from @tb
/*
NumberList  
----------- 
1001
1002
1003
*/

Answer 2

參照下啊:
Create PROC     MakeRandom   
      @num   int   
    
  AS     
  begin   
  Declare   @RndNum   varchar(10)   
  declare   @s   varchar(10)   
  Declare   @Count   INT   
    
  Set   @Count   =   0   
  while   @Count   <@num   
    
  begin   
  set   @s='0123456789'   
  set     @RndNum   =       
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
  +substring(@s,cast(rand()*10   as   int)%10+1,1)   
    
  --select   @RndNum   
  IF   (not   Exists(Select   *   From   RandomCode   where   code=@RndNum))   
  begin   
  Insert   Into   RandomCode(code)   values(@RndNum)   
  set   @Count   =   @Count   +   1   
  end   
  end   
  end   

Answer 3

http://blog.csdn.net/talantlee/articles/435550.aspx

Answer 4

if object_id('tb')is not null drop table tb
go
create table tb(ID int primary key)
go
if object_id('pro_insert')is not null 
drop proc pro_insert
go
create  proc pro_insert
@kss int,
@gs int
as
   declare @i int
   set @i=1
   while @i<= @gs
    begin
         insert tb select @kss+@i where @kss+@i not in (select id from tb)
         set @i=@i+1
    end
go
exec pro_insert 1000,3
select * from tb
/*ID          
----------- 
1001
1002
1003(影響 3 個資料列)*/