oracle导出模型,利用 powerdesigner 从oracle数据库中导出数据物理模型结构

Powerdesigner连接oracle数据库导出物理模型

一、创建数据库连接

1.创建oracle的servicename:

开始->所有程序->oracle home->配置和移植工具->Net Manage.打开oracle Net Manager

0818b9ca8b590ca3270a3433284dd417.png

服务器命名->新建服务器命名

0818b9ca8b590ca3270a3433284dd417.png

填写主机名

0818b9ca8b590ca3270a3433284dd417.png

Datebase->config connection弹出Configure Data Connection

测试服务名

0818b9ca8b590ca3270a3433284dd417.png

2.powerdesigner中创建数据源

创建数据源:Add Data Sourse

0818b9ca8b590ca3270a3433284dd417.png

填写servicename 用户名 密码

0818b9ca8b590ca3270a3433284dd417.png

二、连接数据库导出物理模型

1.逆向工程生产物理模型

File->Reverse Engineer->Database

0818b9ca8b590ca3270a3433284dd417.png

确定

0818b9ca8b590ca3270a3433284dd417.png

Ok

三、模型转换中文评论注释

0818b9ca8b590ca3270a3433284dd417.png

Tool->Excute Command->Edit/Run Script

0818b9ca8b590ca3270a3433284dd417.png

Openfile  commen2name.vbs文件:

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 code 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

if len(tab.comment) <> 0 then

tab.name = tab.comment

end if

On Error Resume Next

Dim col 'running column

for each col in tab.columns

if len(col.comment) <>0 then

col.name =col.comment

end if

On Error Resume Next

next

end if

next

end sub

0818b9ca8b590ca3270a3433284dd417.png

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值