powerdesinger 批量修改表前缀

最新推荐文章于 2021-09-27 11:34:21 发布

huang_DRY

最新推荐文章于 2021-09-27 11:34:21 发布

阅读量1.5k

点赞数 1

文章标签： powerdesigner 批量修改表前缀

本文链接：https://blog.csdn.net/huang_dry/article/details/52442135

版权

目的：

powerdesign  批量修改表名  


步骤：

1.  ctrl + shift + x  打开运行VBS 代码窗口

2.  复制下面的代码  并 运行

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
'of the current folder
Private sub ProcessFolder(folder)
   Dim Tab