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

存储过程：

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)的更多相关文章

  1. 自动生成数据库字典(sql2008) 转自 飘渺の云海

    每次做项目的时候都要做数据字典,这种重复的工作实在很是痛苦,于是广找资料,终于完成了自动生成数据库字典的工作,废话少说,上代码. 截取一部分图片: 存储过程: SET ANSI_NULLS ON GO ...

  2. MVC Code First 自动生成数据库

    1.新建一个MVC项目

  3. MVC自动生成数据库【Code-FIrst方式】

    一般我们写好实体之后,配置好数据上下文对象,还有在配置文件中改好连接字符串之后. 还不能生成数据库,自动生成数据库,有两步关键步骤:   1.   Enable Migrations   2. Upd ...

  4. EntityFramework系列：SQLite.CodeFirst自动生成数据库

    http://www.cnblogs.com/easygame/p/4447457.html 在Code First模式下使用SQLite一直存在不能自动生成数据库的问题,使用SQL Server C ...

  5. 【工具篇】利用DBExportDoc V1.0 For MySQL自动生成数据库表结构文档

    对于DBA或开发来说,如何规范化你的数据库表结构文档是灰常之重要的一件事情.但是当你的库,你的表排山倒海滴多的时候,你就会很头疼了. 推荐一款工具DBExportDoc V1.0 For MySQL( ...

  6. 基于数据库的自动化生成工具，自动生成JavaBean、自动生成数据库文档等(v4.1.2版)

            目录:            第1版:http://blog.csdn.net/vipbooks/article/details/51912143            第2版:htt ...

  7. atitit.自动生成数据库结构脚本，或者更换数据库，基于hibernate4

    atitit.自动生成数据库结构脚本,或者更换数据库,基于hibernate4 目前近况:: 更换数据库,但是是使用spring集成的. <!-- hibernate配置文件路径 --> ...

  8. 如何快速生成数据库字典（thinkphp5.0）

    本教程将教你快速生成数据库字典 示例代码使用PHP框架:Thinkphp5.0 PHP代码: /** * 生成数据库字典html * 可直接另存为再copy到word文档中使用 * * @return ...

  9. MS SQL生成数据库字典脚本

    开发一个项目时都会有一个蛋疼的问题——写数据库需求文档,然后根据这个文档来建数据库,如果后来需求改了,要改数据库还要改文档,有时忙着忙着就忘改了,导致文档是过期的.那么我们自己写个脚本在数据库运行直接 ...

随机推荐

  1. JS在window和document的应用

    页面跳转: window.location.href('地址') window.open('地址', '_self') 打开新窗口: window.open('地址', '_blank') 只显示地址 ...

  2. miniui datepicker 二次加工

    function onshowpopup(){ $(".mini-calendar-timespinner").css({"width":"180px ...

  3. spring设置全局异常处理器

    1.spring设置全局异常,它的原理是向上捕获 spring.xml配置 <!--自定义全局异常处理器--> <bean id="globalExceptionResol ...

  4. PC小技巧

    一.如何在office 2010中安装 Microsoft Office Document Imaging 我用的是office 2010版本,如下操作可以把照片转换成文本:第一步:使用Microso ...

  5. Linux 常用命令集合

    1. 常用命令 ls  显示当前目录下的文件和文件夹: -ltr 按时间顺序显示文件和文件夹的详细信息,不带参数的时候 只显示文件夹和文件. vi  打开文件的内容 tar -cvf file.tar ...

  6. JAVA线程安全总结（转载）

    JAVA线程安全总结(一) JAVA线程安全总结(二) 最近想将java基础的一些东西都整理整理,写下来,这是对知识的总结,也是一种乐趣.已经拟好了提纲,大概分为这几个主题: java线程安全,jav ...

  7. MVC5+EF6 入门完整教程七

    本篇我们针对表格显示添加一些新功能. 前面我们已经讲解过表格显示数据了,现在我们添加三个常用功能: 对显示结果进行排序.过滤.分页. 文章提纲 理论基础/前置准备 详细步骤 总结 前置准备 – 应用之 ...

  8. [原创]VM虚拟机Centos6.4网络配置。

    关于虚拟机VMware 3种网络模式(桥接.nat.Host-only)的工作原理http://www.cnblogs.com/hehexiaoxia/p/4042583.html 操作环境 主机:W ...

  9. asp.netajax开发应用心得-accordation控件的事件处理

    今天,再次运行以前的项目时,发现按钮的单击事件不起作用了,加了断点之后发现根本没有触发该事件.... 按照网上找到的答案,有的说把控件删掉重新拖拽一个进去,虽然以前也遇到过控件失效,重新拖拽有效的时候 ...

  10. QT 做软件盘

    最近搞了一个组织细胞脱水机项目,当然,对于国内的项目都是仿来仿去的,我们也不例外,开启被仿机器后,第一个看到的界面就是用户登录界面,需要输入中文,作为一个程序员,我的第一反应就是我需要采用什么用的框架 ...