用户自动生成规则用户名和随机密码

--给你一个参考：稍微修改下该存储过程！应该能满足楼主需求！
/**********************************************************************
存储过程:        P_AutoGenerUserInfo
功能:                生成用户表(包括规则的用户代码和随机密码)
                        如果表不存在,随机生成表名
参数:     
                       表名(@TableName),
                       业务规则编码(@RuleCode),
                       业务规则长度(@RuleCodeCount),
                       随机密码长度(@PassWordLength),
                       用户数(@Count)
返回:              用户表信息
调用方法: 如:生成"ZLP010"为前导码、8位后导码、12位随机密码、50条记录。表名:Test
调用:  P_AutoGenerUserInfo 'TEST','ZLP010',8,12,50
作用:  用户自动生成规则用户名和随机密码
**********************************************************************/
Create Proc P_AutoGenerUserInfo
@TableName  varchar(20),  --表名(@TableName),
@RuleCode varchar(20),    --业务规则编码(@RuleCode),
@RuleCodeCount  int,      --业务规则长度(@RuleCodeCount),
@PassWordLength int,      --随机密码长度(@PassWordLength),
@Count   int              --用户数(@Count)
as
Begin
--如果用户表不存在,创建用户表
declare @s varchar(2000),@RuleCodeString varchar(20),@i int
declare @RandValue varchar(50),@ZeroString varchar(50)
select @i=1,@ZeroString='',@RuleCodeString=''
while @i<=@RuleCodeCount
begin
 set @ZeroString=@ZeroString+'0'
 set @i=@i+1
end

 set @s=' if exists (select * from sysobjects where xtype=''u'' and status>=0 and name = '''+@TableName+''')'+char(13)
 set @s=@s+' drop table '+@TableName+' '+char(13)
 set @s=@s+' CREATE TABLE '+@TableName+'(用户名 varchar(20),密码 varchar(20))'
 exec(@s)

set @i=1
if @@Error=0
begin
while @i<=@Count
  begin
     select @RuleCodeString=@RuleCode+left(@ZeroString,@RuleCodeCount-len(@i))+cast(@i as varchar(10))
--生成@PassWordLength位随机密码
 select @RandValue=right(convert(numeric(18,12),rand()),@PassWordLength)
--生成6位随机密码中,第一位不为0
--select @RandValue=right(convert(numeric(18,12),rand()),@PassWordLength)
-- where substring(right(convert(numeric(18,12),rand()),@PassWordLength),1,1)<>0
--如果需要所有用户密码不能相同,则需要锁表,判断密码是否存在效率不高.如下:
--IF EXISTS(SELECT * FROM @TableName WITH(XLOCK,PAGLOCK) WHERE 密码=@RandValue)
     exec('insert  '+@TableName+'  values  ('''+@RuleCodeString+''','''+@RandValue+''')')
     set @i=@i+1
   end

end

End

GO