zoukankan      html  css  js  c++  java
  • powerdesigner自动写comment

    使用说明: 在【Tools】-【Execute Commands】-【Edit/Run Script】 下。输入下面你要选择的语句即可,也可以保存起来,以便下次使用,后缀为.vbs。

    powerdesigner自动写comment,只要写了name,会自动将name复制到comment中去

    View Code
    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 comment 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
    tab.comment
    = tab.name
    Dim col
    ' running column
    for each col in tab.columns
    col.comment
    = col.name
    next
    end
    if
    next

    Dim view
    'running view
    for each view in folder.Views
    if not view.isShortcut then
    view.comment
    = view.name
    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
  • 相关阅读:
    Activator.CreateInstance 反射实例化对象
    MVC Form提交
    Redis 下载
    List<T> 序列化与反序列化
    快速反射DataTable
    数据库特性
    javascript判断文件大小
    MD5
    HttpHelper
    cacheHelper
  • 原文地址:https://www.cnblogs.com/alisande/p/2122139.html
Copyright © 2011-2022 走看看