一气呵成得到 MSSQL DB 中所有表的字段默认值约束的 DDL SQL 脚本

Ms SQL Server
企业管理器EM:
在生成 SQL 脚本时不能为某数据库的所有表只生成"默认值约束"相关的 DDL SQL 脚本,
而不生成建表。
查询分析器QA:
可以单独生成"默认值约束"相关的 DDL SQL 脚本,
但又不能一气呵成得到所有表的"默认值约束"相关的 DDL SQL 脚本。

自己动手丰衣足食:
两种方法:
1.纯 SQL 多表 self join 实现

select   ' ALTER TABLE [ '   +  b.name  +   ' ] ADD CONSTRAINT [ '   +  a.name  +   ' ] DEFAULT  '   +  d. text   +   '  FOR [ '   +  c.name  +   ' ] '   as   [ AddDefaultConstraint ]
, ' ALTER TABLE [ '   +  b.name  +   ' ] DROP CONSTRAINT [ '   +  a.name  +   ' ] '   as   [ DropDefaultConstraint ]
from  sysobjects a
left   join  sysobjects b  on  a.parent_obj  =  b.id
left   join  syscolumns c  on  a.parent_obj  =  c.id  and  a.info  =  c.colid
left   join  syscomments d  on  a.id  =  d.id
where  a.xtype  =   ' d '
order   by  b.name

2.使用 MS T-SQL 函数,少两次显式 self join 使代码简洁些

select   ' ALTER TABLE [ '   +   object_name (a.parent_obj)  +   ' ] ADD CONSTRAINT [ '   +   object_name (a.id)  +   ' ] DEFAULT  '   +  d. text   +   '  FOR [ '   +   COL_NAME (a.parent_obj,a.info)  +   ' ] '   as   [ AddDefaultConstraint ]
, ' ALTER TABLE [ '   +   object_name (a.parent_obj)  +   ' ] DROP CONSTRAINT [ '   +   object_name (a.id)  +   ' ] '   as   [ DropDefaultConstraint ]
from  sysobjects a
left   join  syscomments d  on  a.id  =  d.id
where  a.xtype  =   ' d '
order   by   object_name (a.parent_obj)