PowerDesigner对MySQL 进行反向工程
2017-04-26 12:35
309 查看
1
1).安MyODBC-standard-3.51.0.7-win.msi、MySQL-connector-odbc-5.1.5-win.msi两个文件。可以支持odbc在win7下创建连接。
2)去C:\Windows\SysWOW64目录下找到odbcad32.exe这个文件,并打开。
3)
填充数据库数据
以上就完成安装了
2在PowerDesigner进行反向工程
文件—-Reverse Engineer –>Database
注释comment和name的互换
下面是将comment的中文替换name
输出
格式设置
输出
展示
1).安MyODBC-standard-3.51.0.7-win.msi、MySQL-connector-odbc-5.1.5-win.msi两个文件。可以支持odbc在win7下创建连接。
2)去C:\Windows\SysWOW64目录下找到odbcad32.exe这个文件,并打开。
3)
填充数据库数据
以上就完成安装了
2在PowerDesigner进行反向工程
文件—-Reverse Engineer –>Database
注释comment和name的互换
代码一:将Name中的字符COPY至Comment中 PowerDesigner->Tools->Execute Commands->Edit/Run Scripts 将代码Copy进去执行就可以了,是对整个CDM或PDM进行操作 Option Explicit ValidationMode = True InteractiveMode = im_Batch Dim mdl ' the current model ' get the current active model Set mdl = ActiveModel If (mdl Is Nothing) Then MsgBox "There is no current Model " ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then MsgBox "The current model is not an Physical Data model. " Else ProcessFolder mdl End If ' This routine copy name into comment for each table, each column and each view ' of the current folder Private sub ProcessFolder(folder) Dim Tab 'running table for each Tab in folder.tables if not tab.isShortcut then tab.comment = tab.name Dim col ' running column for each col in tab.columns col.comment= col.name next end if next Dim view 'running view for each view in folder.Views if not view.isShortcut then view.comment = view.name end if next ' go into the sub-packages Dim f ' running folder For Each f In folder.Packages if not f.IsShortcut then ProcessFolder f end if Next end sub 代码二:将Comment中的字符COPY至Name中 PowerDesigner->Tools->Execute Commands->Edit/Run Scripts 将代码Copy进去执行就可以了,是对整个CDM或PDM进行操作 Option Explicit ValidationMode = True InteractiveMode = im_Batch Dim mdl ' the current model ' get the current active model Set mdl = ActiveModel If (mdl Is Nothing) Then MsgBox "There is no current Model " ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then MsgBox "The current model is not an Physical Data model. " Else ProcessFolder mdl End If Private sub ProcessFolder(folder) On Error Resume Next Dim Tab 'running table for each Tab in folder.tables if not tab.isShortcut then tab.name = tab.comment Dim col ' running column for each col in tab.columns if col.comment="" then else col.name= col.comment end if next end if next Dim view 'running view for each view in folder.Views if not view.isShortcut then view.name = view.comment end if next ' go into the sub-packages Dim f ' running folder For Each f In folder.Packages if not f.IsShortcut then ProcessFolder f end if Next end sub
下面是将comment的中文替换name
输出
格式设置
输出
展示
相关文章推荐
- PowerDesigner对MySQL进行反向工程
- powerdesigner连接Mysql进行反向工程并生成word文档图文教程
- 使用PowerDesigner 15对现有数据库进行反向工程(图解教程一) by Yulh
- 使用PowerDesigner 对现有数据库进行反向工程(图解教程一)
- 使用PowerDesigner 15对现有数据库进行反向工程(图解教程二) by Yulh
- 使用PowerDesigner对现有数据库进行反向工程
- PowerDesigner15在win7-64位系统下对MySQL 进行反向工程以及建立物理模型产生SQL语句步骤图文傻瓜式详解
- 今天用PowerDesigner对CommunityServer的Component集合进行了反向工程
- 使用PowerDesigner 15对现有数据库进行反向工程
- 使用PowerDesigner 15对现有数据库进行反向工程(图解教程)(转)
- PowerDesigner15在win7-64位系统下对MySQL 进行反向工程以及建立物理模型产生SQL语句步骤图文傻瓜式详解
- PowerDesigner15对SQL2005进行反向工程出错
- 使用PowerDesigner 15.2对Oracle进行反向工程
- 使用PowerDesigner 15对现有数据库进行反向工程图解教程
- 使用PowerDesigner 15对现有数据库进行反向工程(图解教程一)
- 使用PowerDesigner 15对现有数据库进行反向工程(图解教程一) by Yulh
- 如何利用powerdesigner进行反向工程
- 关于使用powerdesigner进行反向工程
- 使用PowerDesigner 15对现有数据库进行反向工程(图解教程二) by Yulh
- 使用PowerDesigner 15.2对Oracle进行反向工程