zoukankan      html  css  js  c++  java
  • PowerDesigner中逆向工程完成后,将数据库中comment脚本赋值到PDM的name

    脚本功能:
    ‘    PowerDesigner中逆向工程完成后,将数据库中comment脚本
    ‘    赋值到PDM的name
    ‘执行方法:
    ‘    Open PDM--Tools--Execute Commands--Run Script
    ‘
    ‘------------------------------------------------------------
    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 
    ‘----------------------
  • 相关阅读:
    web 4.0规范畅想
    统计图(折线,饼图等)避免多个统计图显示冲突
    轮播每页显示4条数据(待写)
    2022年目标
    WSL安装mpich 3.4.2
    an error ocurred during local report processing
    一个winform中多线程的例子
    INSERT INTO 语句的语法错误
    MVC学习笔记
    去掉vsto生成的任务窗格
  • 原文地址:https://www.cnblogs.com/a1a1-3/p/8360862.html
Copyright © 2011-2022 走看看