1. 程式人生 > >使用powerdesigner匯入sql指令碼,生成物理模型,name和code都顯示英文的解決方法

使用powerdesigner匯入sql指令碼,生成物理模型,name和code都顯示英文的解決方法

1.使用powerdesigner匯入sql指令碼,生成物理模型,步驟如下:

選擇相應的資料庫

選擇指令碼檔案


成功後,表名和欄位名都顯示英文,comment並沒有顯示。

解決方法:執行一段指令碼即可,步驟如下:




 指令碼如下:

----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

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    

Private   sub   ProcessFolder(folder)     

On Error Resume Next    

      Dim   Tab  'running     table     

       for   each  Tab   in   folder.tables      

             if   not  tab.isShortcut   then      

                 tab.name   =   tab.comment    

                  Dim   col  '   running   column     

                  for   each   col  in   tab.columns      

                   ifcol.comment="" then     

                  else    

                       col.name=   col.comment     

                   endif    

                 next     

             end   if      

      next    

      Dim   view  'running   view     

       for   each  view   in   folder.Views      

             if   not  view.isShortcut   then      

                 view.name   =   view.comment     

             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  


----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

執行後的結果如下: