自动生成数据库字典(sql2008)

每次做项目的时候都要做数据字典，这种重复的工作实在很是痛苦，于是广找资料，终于完成了自动生成数据库字典的工作，废话少说，上代码。

存储过程：

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

-- =============================================

-- Author:        <Carbe>

-- Create date: <2014-09-19>

-- Description:    <生成数据库字典>

-- =============================================

CREATE PROCEDURE [dbo].[CreateDatabaseDictionarie]

AS

BEGIN

    DECLARE @TableName nvarchar(35),@htmls varchar(8000)

    DECLARE @字段名称 VARCHAR(200)

    DECLARE @类型  VARCHAR(200)

    DECLARE @长度 VARCHAR(200)

    DECLARE @数值精度 VARCHAR(200)

    DECLARE @小数位数 VARCHAR(200)

    DECLARE @默认值 VARCHAR(200)

    DECLARE @允许为空 VARCHAR(200)

    DECLARE @外键 VARCHAR(200)

    DECLARE @主键 VARCHAR(200)

    DECLARE @描述 VARCHAR(200)

    SET NOCOUNT ON;

    DECLARE Tbls CURSOR

    FOR

        Select distinct Table_name

        FROM INFORMATION_SCHEMA.COLUMNS

        order by Table_name

    OPEN Tbls

        PRINT '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">'

        PRINT '<html xmlns="http://www.w3.org/1999/xhtml">'

        PRINT '    <head>'

        PRINT '        <title>KC管理系统-数据库字典</title>'

        PRINT '        <style type="text/css">'

        PRINT '            body{margin:0; font:11pt "arial", "微软雅黑"; cursor:default;}'

        PRINT '            .tableBox{margin:10px auto; padding:0px; width:1000px; height:auto; background:#FBF5E3; border:1px solid #45360A}'

        PRINT '            .tableBox h3 {font-size:12pt; height:30px; line-height:30px; background:#45360A; padding:0px 0px 0px 15px; color:#FFF; margin:0px; text-align:left }'

        PRINT '            .tableBox table {width:1000px; padding:0px }'

        PRINT '            .tableBox th {height:25px; border-top:1px solid #FFF; border-left:1px solid #FFF; background:#F7EBC8; border-right:1px solid #E0C889; border-bottom:1px solid #E0C889 }'

        PRINT '            .tableBox td {height:25px; padding-left:10px; border-top:1px solid #FFF; border-left:1px solid #FFF; border-right:1px solid #E0C889; border-bottom:1px solid #E0C889 }'

        PRINT '        </style>'

        PRINT '    </head>'

        PRINT '    <body>'

    FETCH NEXT FROM Tbls INTO @TableName

    WHILE @@FETCH_STATUS = 0

    BEGIN

        Select @htmls = '        <h3>' + @TableName + ' : '+ CAST(Value as varchar(1000)) + '</h3>'

        FROM sys.extended_properties AS A

        WHERE A.major_id = OBJECT_ID(@TableName)

        and name = 'MS_Description' and minor_id = 0

        PRINT '        <div class="tableBox">'

        PRINT @htmls

        PRINT '            <table cellspacing="0">'

        PRINT '                <tr>'

        PRINT '                    <th>字段名称</th>'

        PRINT '                    <th>类型</th>'

        PRINT '                    <th>长度</th>'

        PRINT '                    <th>数值精度</th>'

        PRINT '                    <th>小数位数</th>'

        PRINT '                    <th>默认值</th>'

        PRINT '                    <th>允许为空</th>'

        PRINT '                    <th>外键</th>'

        PRINT '                    <th>主键</th>'

        PRINT '                    <th>描述</th>'

        PRINT '                </tr>'

        DECLARE TRows CURSOR

        FOR

            SELECT

            '                    <td>' + CAST(clmns.name AS VARCHAR(35)) + '</td>',

            '                    <td>' + CAST(udt.name AS CHAR(15)) + '</td>' ,

            '                    <td>' + CAST(CAST(CASE WHEN typ.name IN (N'nchar', N'nvarchar') AND clmns.max_length <> -1 THEN clmns.max_length/2 ELSE clmns.max_length END AS INT) AS VARCHAR(20)) + '</td>',

            '                    <td>' + CAST(CAST(clmns.precision AS INT) AS VARCHAR(20)) + '</td>',

            '                    <td>' + CAST(CAST(clmns.scale AS INT) AS VARCHAR(20)) + '</td>',

            '                    <td>' + isnull(CAST(cnstr.definition AS VARCHAR(20)),'') + '</td>',

            '                    <td>' + CAST(clmns.is_nullable AS VARCHAR(20)) + '</td>' ,

            '                    <td>' + CAST(clmns.is_computed AS VARCHAR(20)) + '</td>' ,

            '                    <td>' + CAST(clmns.is_identity AS VARCHAR(20)) + '</td>' ,

            '                    <td>' + ISNULL(CAST(exprop.value AS VARCHAR(500)),'') + '</td>'

            FROM sys.tables AS tbl

            INNER JOIN sys.all_columns AS clmns ON clmns.object_id=tbl.object_id

            LEFT OUTER JOIN sys.indexes AS idx ON idx.object_id = clmns.object_id AND 1 =idx.is_primary_key

            LEFT OUTER JOIN sys.index_columns AS idxcol ON idxcol.index_id = idx.index_id AND idxcol.column_id = clmns.column_id AND idxcol.object_id = clmns.object_id AND 0 = idxcol.is_included_column

            LEFT OUTER JOIN sys.types AS udt ON udt.user_type_id = clmns.user_type_id

            LEFT OUTER JOIN sys.types AS typ ON typ.user_type_id = clmns.system_type_id AND typ.user_type_id = typ.system_type_id

            LEFT JOIN sys.default_constraints AS cnstr ON cnstr.object_id=clmns.default_object_id

            LEFT OUTER JOIN sys.extended_properties exprop ON exprop.major_id = clmns.object_id AND exprop.minor_id = clmns.column_id AND exprop.name = 'MS_Description'

            WHERE (tbl.name = @TableName and exprop.class = 1) --I don't wand to include comments on indexes

            ORDER BY clmns.column_id ASC

        OPEN TRows

        FETCH NEXT FROM TRows INTO @字段名称,@类型,@长度,@数值精度,@小数位数,@默认值,@允许为空,@外键,@主键,@描述

        WHILE @@FETCH_STATUS = 0

        BEGIN

            PRINT '                <tr>'

            PRINT @字段名称

            PRINT @类型

            PRINT @长度

            PRINT @数值精度

            PRINT @小数位数

            PRINT @默认值

            PRINT @允许为空

            PRINT @外键

            PRINT @主键

            PRINT @描述

            PRINT '                </tr>'

            FETCH NEXT FROM TRows INTO @字段名称,@类型,@长度,@数值精度,@小数位数,@默认值,@允许为空,@外键,@主键,@描述

        END

        CLOSE TRows

        DEALLOCATE TRows

        PRINT '            </table>'

        PRINT '        </div>'

    FETCH NEXT FROM Tbls INTO @TableName

    END

        PRINT '    </body>'

        PRINT '</html>'

    CLOSE Tbls

    DEALLOCATE Tbls

END

当然这些通过PRING出来的代码使用传统的方式是调用不到的，通过查找资料，终于在国外一个XXX网站找到了解决方案。

private static string message = "";

        public static string ExecuteNonQuery(string connextionString, CommandType commandType, string commandText, bool outputMsg)

        {

            if (connextionString == null || connextionString.Length == ) throw new ArgumentNullException("connectionString");

            // Create & open a SqlConnection, and dispose of it after we are done

            using (SqlConnection connection = new SqlConnection(connextionString))

            {

                message = "";

                connection.Open();

                connection.InfoMessage += delegate(object sender, SqlInfoMessageEventArgs e)

                {

                    message += "\n" + e.Message;

                };

                // Call the overload that takes a connection in place of the connection string

                if (connection == null) throw new ArgumentNullException("connection");

                // Create a command and prepare it for execution

                SqlCommand cmd = new SqlCommand(commandText, connection); ;

                cmd.CommandType = commandType;

                // Finally, execute the command

                int retval = cmd.ExecuteNonQuery();

                // Detach the SqlParameters from the command object, so they can be used again

                cmd.Parameters.Clear();

                connection.Close();

                return message;

            }

        }

调用就不用写了嘛。一切就这么简单，生成的是一份标准的htm代码，可直接放到HTML里面，当然也可以直接从数据库读取出来显示。

自动生成数据库字典(sql2008)的更多相关文章

自动生成数据库字典(sql2008) 转自飘渺の云海
每次做项目的时候都要做数据字典,这种重复的工作实在很是痛苦,于是广找资料,终于完成了自动生成数据库字典的工作,废话少说,上代码. 截取一部分图片: 存储过程: SET ANSI_NULLS ON GO ...
MVC Code First 自动生成数据库
1.新建一个MVC项目
MVC自动生成数据库【Code-FIrst方式】
一般我们写好实体之后,配置好数据上下文对象,还有在配置文件中改好连接字符串之后. 还不能生成数据库,自动生成数据库,有两步关键步骤: 1. Enable Migrations 2. Upd ...
EntityFramework系列：SQLite.CodeFirst自动生成数据库
http://www.cnblogs.com/easygame/p/4447457.html 在Code First模式下使用SQLite一直存在不能自动生成数据库的问题,使用SQL Server C ...
【工具篇】利用DBExportDoc V1.0 For MySQL自动生成数据库表结构文档
对于DBA或开发来说,如何规范化你的数据库表结构文档是灰常之重要的一件事情.但是当你的库,你的表排山倒海滴多的时候,你就会很头疼了. 推荐一款工具DBExportDoc V1.0 For MySQL( ...
基于数据库的自动化生成工具，自动生成JavaBean、自动生成数据库文档等(v4.1.2版)
目录: 第1版:http://blog.csdn.net/vipbooks/article/details/51912143 第2版:htt ...
atitit.自动生成数据库结构脚本，或者更换数据库，基于hibernate4
atitit.自动生成数据库结构脚本,或者更换数据库,基于hibernate4 目前近况:: 更换数据库,但是是使用spring集成的.  ...
如何快速生成数据库字典（thinkphp5.0）
本教程将教你快速生成数据库字典示例代码使用PHP框架:Thinkphp5.0 PHP代码: /** * 生成数据库字典html * 可直接另存为再copy到word文档中使用 * * @return ...
MS SQL生成数据库字典脚本
开发一个项目时都会有一个蛋疼的问题——写数据库需求文档,然后根据这个文档来建数据库,如果后来需求改了,要改数据库还要改文档,有时忙着忙着就忘改了,导致文档是过期的.那么我们自己写个脚本在数据库运行直接 ...

随机推荐

Elasticsearch5.0.1 + Kibana5.0.1 + IK 5.0.1安装记录
最近工作需要,开始研究ES,当前ES的最新版本为5.0.1,从之前的2.x的版本号一下升级到5.x,主要是之前Elastic的产品版本号因为收购等原因很乱,ES 2.X版本的和Kibana 4.x版本 ...
【转】[特征选择] An Introduction to Feature Selection 翻译
中文原文链接:http://www.cnblogs.com/AHappyCat/p/5318042.html 英文原文链接: An Introduction to Feature Selection ...
Guava----Function
1. Function接口,提供两个方法: apply方法: 可以自定义自己想实现的功能 @Nullable T apply(@Nullable F input); 1. 实例: import com ...
我需要在Web上完成一个图片上传的功能后续(+1)
微信入口施工完成.关键字识别中增加了本次活动的"关键字",在系统中增加了链接.不过,由于地址包含私密关键参数,这里隐藏,敬请原谅. 下一步,微信链接的地址页面是要对微信用户的信息进 ...
linux head、tail、sed、cut、grep、find
head用法: head 参数文件名 -cn:显示前n个字节 -n:显示前n行例子:head -c20 1.txt 显示1.txt文件中前20个字符 ls | head -20:显示前20 ...
java 中Session 持久化问题
首先: 今天发现了个session 持久化的问题在Tomcat 停止运行后再启动 session 中保存的东西还会存在 ,百度了一下原理 1.Session Create 时 2.Sessio ...
YY前端课程2
1. alt属性对SEO优化很重要 2. 最早的网页是靠table布局标签,后来用div+css进行网页重构(因此现在网页设计的名字由网页设计变成了网页重构) 3. 静态网页和后台没有交互动态网页和 ...
jquery 格式化日期
function setMaxEndDate(){ var beginDate=$("#beginDate").val(); var time = new Date(beginDa ...
img标签加载FTP的图片 C#
好吧,我是菜鸟,这是我今天遇到的问题,什么也不会,得高人指点 1.使用FtpWebRequest下载图片,以流存贮 2.在ashx文件里面直接已流方式(HttpContext.Current.Resp ...
java selenium (五) 元素定位大全
页面元素定位是自动化中最重要的事情, selenium Webdriver 提供了很多种元素定位的方法. 测试人员应该熟练掌握各种定位方法. 使用最简单,最稳定的定位方法. 阅读目录自动化测试步骤 ...

自动生成数据库字典(sql2008)

自动生成数据库字典(sql2008)的更多相关文章

随机推荐

热门专题