毕业设计指导网站开发,西安大雁塔简介,学电子商务有用吗,做网站的成本在哪我想直观的查看数据库表之间的关系与中文注释#xff0c;发现Navicat Premium下的表模型功能#xff0c;并没有注释功能:用起来不是很方便。所有想到了用PowerDesigner来逆向MYSQL中的表#xff0c;并显示中文注释。一、安装ODBC驱动当前环境#xff1a;window 10 64bitPow…我想直观的查看数据库表之间的关系与中文注释发现Navicat Premium下的表模型功能并没有注释功能:用起来不是很方便。所有想到了用PowerDesigner来逆向MYSQL中的表并显示中文注释。一、安装ODBC驱动当前环境window 10 64bitPowerDesigner 16.5 32bitConnector/ODBC 5.1.13 下载地址http://dev.mysql.com/downloads/connector/odbc/5.1.html选择win-32 MIS安装包由于用的PD版本是32位的所有选择ODBC也得32位否则会出现不兼容。下载之后点击安装。二、配置OBDC驱动连接安装好之后在控制面板中选择管理工具然后填写正确的TCP/IP Server 、User、 Password、点击Database 三角标会弹出相关的库供选择然后可以点击TEST测试连接。最后点击OK。会发现多出一个PD_MYSQL.这个就是在Data Source Name定义的。三、PowerDesigner连接MYSQL打开PowerDesigner,操作如下点击确定后。会列出全部数据的表格。可以在那里选择我们想要的库然后可以通过: Select ALL和Deselect All全选和全不选。选择想要的表然后点击OK。显示如下:四、显示中文注释导是导入成功了但是并没有显示中文注释显示表的中文注释操作如下:在tool中选择Display Preferences在Table中选择Comment然后点击OK。这样表的注释就有了问题是还有字段的注释没有选中Table右键Properties会发现其中已经有了Comment一栏问题是没有在PDM图上显示。解决方法如下要将注释comment的内容替换到code或name中即可。步骤如下:1、Tools-Display Preferences-Table-Advanced...-Columns-List Columns然后将Code移到最上面然后点击OK。2、Tools下增加一个vbs的脚本可以将code内容替换为注释内容复制脚本执行。即可vbs文件内容如下(注意需要管理员运行)******************************************************************************* File: comment2code.vbs* Purpose: 在PowerDesigner的PDM图形窗口中显示数据列的中文注释* Title: 将字段的comment赋值到字段的code中* Category: 打开物理模型运行本脚本(CtrlShiftX)* Copyright:foxzz163.com,2006/07/25 .* Author: foxzz* Created:* Modified:* Version: 1.0* Comment: 遍历物理模型中的所有表将字段的comment赋值到字段的code中。 在将code置换为comment过程中需要考虑的问题 1、code必须唯一而comment有可能不唯一。 处理办法是如果字段的comment重复则字段的codecomment1、2、3... 2、comment值有可能为空这种情况下对字段的code不处理。 针对oracle数据库,将comment on column 字段名称 is ;添加到C:\pdcomment.txt文件中。 在补充comment完毕后便于在数据库中执行******************************************************************************Option ExplicitValidationMode TrueInteractiveMode im_BatchDim system, fileSet system CreateObject(Scripting.FileSystemObject)Dim ForReading, ForWriting, ForAppending 打开文件选项ForReading 1 只读ForWriting 2 可写ForAppending 8 可写并追加打开文本文件Set file system.OpenTextFile(C:\pdcomment.txt, ForWriting, true)判断当前model是否物理数据模型Dim mdlSet mdl ActiveModelIf (mdl Is Nothing) ThenMsgBox 处理对象无模型ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) ThenMsgBox 当前模型不是物理数据模型ElseProcessFolder mdl,fileEnd Iffile.Close******************************************************************************Private sub ProcessFolder(folder,file)Dim i,j,ki0:j0:k0列数组记录字段里不重复的commentDim ColumnComment()Dim ColumnCommentNumber()ReDim Preserve ColumnComment(i)ReDim Preserve ColumnCommentNumber(i)Dim tbl 当前表Dim col 当前字段dim curComment 当前字段comment处理模型中的表for each tbl in folder.tablesif not tbl.isShortcut thenif len(trim(tbl.comment))0 then可以在这里显示table的commenttbl.code tbl.code(trim(tbl.comment))end if处理表中的列for each col in tbl.columnsk 0curComment trim(col.comment)if len(curComment)0 then遍历相异的comment数组for j 0 to iif ColumnComment(j) curComment then如果找到相同的comment,则相关计数器加1ColumnCommentNumber(j) ColumnCommentNumber(j) 1k jend ifNext如果没有相同的comment,则k0,此时ColumnCommentNumber(0)也为0否则ColumnCommentNumber(k)不为0if ColumnCommentNumber(k) 0 thencol.code curComment cstr(ColumnCommentNumber(k))elsecol.code curCommentColumnComment(0)、ColumnCommentNumber(0)永远为空将相异的comment记录添加到数组中i i 1ReDim Preserve ColumnComment(i)ReDim Preserve ColumnCommentNumber(i)ColumnComment(i) curCommentColumnCommentNumber(i) 0end ifelse写入文件中file.WriteLine comment on column tbl.code.col.code is ;end ifnextend if由于不同表的code允许相同,因此此时重新初始化。因为ColumnComment(0)、ColumnCommentNumber(0)为空可以保留ReDim Preserve ColumnComment(0)ReDim Preserve ColumnCommentNumber(0)i0:j0:k0nextDim view 当前视图for each view in folder.Viewsif not view.isShortcut then可以在这里显示view的commentview.code view.commentend ifnext对子目录进行递归Dim subpackage folderFor Each subpackage In folder.Packagesif not subpackage.IsShortcut thenProcessFolder subpackage , fileend ifNextend sub执行成功后效果如下替换后的字段如下因为原文的VB脚本不能用找的其它博文里面的可以成功执行
