PowerDesigner中使用vbscript访问对象进行批量操作

项目中想把PD建模的数据库中的Name字段全部在Comment里也填写一份，又不想一个表一个表的复制粘贴，所以在网上查了点偷懒省事的方法，原来可以利用VBScript脚本控制PD中的对象进行一些批量操作。

首先是启动你要修改的PD文件，然后双击你要修改的那张图，激活它，注意是图，而不是Tables下的表。然后点击菜单 “Tools->Execute Commands -> Edit/Run Script..."，或者快捷键（Ctrl+Shift+X）

然后把脚本粘贴进去，运行就可以了。脚本如下：

          dim   sName 
          for   each   table   in   ActiveModel.tables 
                for   each   column   in   table.columns 
                        sComm   =   column.GetExtendedAttribute("Comment")       'comment的内容 
                        sName   =   column.GetExtendedAttribute("Name")           'name的内容 
                        'if   sComm   <>   sName   then 
                            column.comment   =   column.comment + column.name 
                        'end   if 
                next 
          next

大家可以根据自己的需要随意修改。有特殊需求的可以查它的脚本帮助文档。
转至：http://blog.csdn.net/cngkqy/archive/2008/04/26/2332539.aspx