开发初期关于自动建表的问题，请教高手！！！

2003-11-10 10:32:04 65 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

一文即可读懂的自动化测试，彻底火了！！！自动化测试，顾名思义，自动完成测试工作。通过一些自动化测试工具或自己造轮子实现模拟之前人工点点的工作并验证其结果完成整个测试过程，这样的测试过程，便是自动化测试。自动化测试，看上去很美，感觉好像是第一次工业革命，它开创了以机器代替手工劳动的时代，实则不然。因为每一个自动化测试的case都是从手工测试做起的，如果没有手工测试的基础，是没法进行自动化测试。自动化测试是将自动化工具和技术应用于软件测试，旨在减少测试工作，自动化测试是将自动化工具和技术应用于软件测试，旨在减少测试工作，更快，更经济地验证软件质量。阅读详情

实现在下表中输入类似内容：
编号表名字段名字段类型字段长度约束
1 a abc char 20 null
2 a dssa char 20 null
3 b asd char 10 null
4 b sdf char 20 null
自动建表得到：
a表：
| abc | dssa
|--------|-------
| sdfs | dsfsd
. .
. .
b表：
|asd | sdf
|-----|------
|ewe |weirwe
求教高手如何实现，存储过程该如何写？

...全文

替换window.showModalDialog 已解决！！！记录一下最近在维护一个项目，使用IE一切正常，但是切谷歌的话正常登陆都不行了。检查了一下发现报错。后来查了一下发现 window.showModalDialog 方法在很久以前就被弃用了！！！解决方案：用window.open来替代。 // 定义一个全局变量判定是否原生支持showModalDialog方法 var has_showModalDialog = !!window.showModalDialog; if(!has_showModalDialog){ //定义window.sho 阅读详情

dick517

疑难问题 22,298 成员 121,727 内容

+ 关注 + 加入社区

切换为时间正序

zjcxc 2003-11-10

打赏
举报

--下面是测试

--创建建立表的存储过程
create proc p_createtable @tbname varchar(20)
as
declare @sql varchar(8000)
set @sql='create table '+@tbname+'('
select @sql=@sql+字段名+' '
+字段类型
+case when 字段类型 in ('varchar','char','nvarchar','nchar','numeric','decimal')
then '('+cast(字段长度 as varchar)+')' else '' end
+case when 约束<>'' then ' default '+约束 else '' end
+','
from 表结构 where 表名=@tbname order by 编号
set @sql=left(@sql,len(@sql)-1)+')'
exec(@sql)
go

--定义表结构的表
create table 表结构(编号 int identity(1,1),
表名 sysname,
字段名 sysname,
字段类型 sysname,
字段长度 int,
约束 varchar(200))

insert into 表结构
select 'a','abc',' char',20,null
union all select 'a','dssa','char',20,null
union all select 'b','asd',' char',10,null
union all select 'b','sdf',' char',20,null
go

--调用测试
exec p_createtable 'a'
exec p_createtable 'b'

--删除生成的表及数据测试环境
drop table 表结构,a,b
drop proc p_createtable

zjcxc 2003-11-10

打赏
举报

--上面的存储过程有些错误,改一下:

--创建建立表的存储过程
create proc p_createtable @tbname varchar(20)
as
declare @sql varchar(8000)
set @sql='create table '+@tbname+'('
select @sql=@sql+字段名+' '
+字段类型
+case when 字段类型 in ('varchar','char','nvarchar','nchar','numeric','decimal')
then '('+cast(字段长度 as varchar)+')' else '' end
+case when 约束<>'' then ' default '+约束 else '' end
+','
from 表结构 where 表名=@tbname order by 编号
set @sql=left(@sql,len(@sql)-1)+')'
exec(@sql)
go

zjcxc 2003-11-10

打赏
举报

然后调用这个存储过程创建表就可以了:

exec p_createtable 'a'
exec p_createtable 'b'

zjcxc 2003-11-10

打赏
举报

--创建建立表的存储过程
create proc p_createtable @tbname varchar(20)
as
declare @sql varchar(8000)
set @sql='create table '+@tbname+'('
select @sql=@sql+字段名+' '
+vcFieldSort
+case when 字段类型 in ('varchar','char','nvarchar','nchar','numeric','decimal')
then '('+cast(字段长度 as varchar)+')' else '' end
+case when 约束<>'' then ' default '+约束 else '' end
+','
from 表结构 where 表名=@tbname order by 编号
set @sql=left(@sql,len(@sql)-1)+')'
exec(@sql)
go

txlicenhe 2003-11-10

打赏
举报

create table t1(编号 int , 表名 varchar(10), 字段名 varchar(10), 字段类型 varchar(10), 字段长度 int, 约束 varchar(10))
insert t1 select 1,'a','abc' ,'char',20, null
union all select 2,'a','dssa' ,'char',20, null
union all select 3,'b','asd' ,'char',10, null
union all select 4,'b','sdf' ,'char',20, null

declare cursor_insert cursor for select distinct 表名 from t1
declare @i varchar(100),@sql varchar(8000)
set @sql=''
open cursor_insert
fetch cursor_insert into @i
while @@fetch_status=0
begin
select @sql=@sql+','+字段名+' '+字段类型+'('+case when 字段类型 like '%char' then cast(字段长度 as varchar(10)) else '' end+case when 约束 is not null then 'check('+约束+')' else '' end + ')' from t1 where 表名=@i
set @sql=right(@sql,len(@sql)-1)
exec('create table '+@i+' ('+@sql+')')
set @sql = ''
fetch cursor_insert into @i
end
close cursor_insert
deallocate cursor_insert

Select * from a
abc dssa
-------------------- --------------------

（所影响的行数为 0 行）
Select * from b
asd sdf
---------- --------------------

（所影响的行数为 0 行）

drop table t1
drop table a,b

pengdali 2003-11-10

打赏
举报

declare cursor_insert cursor for select distinct 表名 from 你的表
declare @i varchar(100),@sql varchar(8000)
set @sql=''
open cursor_insert
fetch cursor_insert into @i
while @@fetch_status=0
begin
select @sql=@sql+','+字段名+' '+字段类型+case when 字段类型 like '%char' then cast(字段长度 as varchar(10)) else '' end+case when 约束 is not null then 'check('+约束+')' else '' end where 你的表 where 表名=@i
set @sql=right(@sql,len(@sql)-1)
exec('create table '+@i+' ('+@sql+')')
fetch cursor_insert into @i
end
close cursor_insert
deallocate cursor_insert

dick517 2003-11-10

打赏
举报

开发初期关于自动建表的问题，请教高手！！！

相关推荐