PowerDesigner中将表的注释与表名称互换脚本
'以下部分为将name生成commentOption 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 ...
excel表格定义导入到powerdesigner脚本
打开powerdesigner,shift + ctrl + X 打开脚本窗口输入执行的脚本,点 run 即可。简单的导入Excel脚本'开始Option ExplicitDim mdl ' the current modelSet mdl = ActiveModelMsgBox "当前活动的CDM名称是"+mdl, vbOK + vbInformation, "表"If (mdl Is Nothing) Then MsgBox "There is no Active Mo...