1、选择tools-->execute commands-->edit/run script
2、将下面的代码粘贴到运行框中点击run
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 tab.comment <> "" then
tab.name= tab.comment
end if
Dim col ' running column
for each col in tab.columns
If col.comment <> "" Then
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
if view.comment <> "" then
view.name = view.comment
end if
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
分享到:
相关推荐
PowerDesigner 中将Comment(注释)及Name(名称)内容互相COPY的VBS代码
在unity中,将文本复制到IOS剪贴板,可以使用原生的剪切板
copy-text-to-clipboard 在现代浏览器中将文本复制到剪贴板(0.2 kB)
在CADENCE中将一个PCB复制到另一个PCB中。这样可以大减少开发的周期。
NULL 博文链接:https://lhp0902.iteye.com/blog/2150777
复制和粘贴剪贴板上的内容---Android 中将字符串文字内容复制到系统剪贴板并从剪贴板拿出来显示
# 题目:将一个列表的数据复制到另一个列表中。 # 程序分析:使用列表[:],拿不准可以调用copy模块。
在现代浏览器中将文本复制到剪贴板(0.2 kB) 比较 该模块: 0.2 kB :3.4 kB 安装 $ npm install copy-text-to-clipboard 用法 import copy from 'copy-text-to-clipboard' ; button . addEventListener ( 'click'...
汇编实现逆向复制字符串 汇编实现逆向复制字符串 汇编实现逆向复制字符串 汇编课后答案
镀Chrome剪辑复制 在 chrome 中将文本复制到剪贴板。 var copy = require('chrome-clip-copy') button.addEventListener('click', function () { copy('some text') }) 安装 npm install chrome-clip-copy
Linux中将Tomcat添加到守护进程,让Tomcat随Linux系统自动启动;以及解决执行tomcat start时,“Invalid user name 'tomcat' specified”的异常处理。
用于GUI和app designer设计中将数据保存到word中
VC++中将数据导入到自定义xls表并打印
Pygame中将图片填充到适合显示屏幕大小
VC++中将数据导入到自定义Excel表并打印.rar
java用递归实现文件及文件夹的复制,注意递归中的变量属性
这是一个在VS2008中,将js封装到dll文件中的实例,比较简单,当你在写aspnet Web程序中,不希望自己的js被别人看到,这是一个不错的做法!
PowerPoint2021中将图片填充到形状中.docx
在C#或asp.net中将文件以字节流的方式保存到数据库中