Sql导入powerdesigner时中文丢失问题

Sql导入powerdesigner时中文丢失问题（Oracle11g）

（原文是针对Oracle11g,SqlServer2008未测试通过） 

当将sql导入powerdesigner时，中文注释丢失在表结构中全部丢失， 

这时只需运行如下vb脚本即可解决此问题：快试试吧！

PowerDesigner->Tools->Execute Commands->Edit/Run Scripts 

运行脚本如下：

 

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      

                   if col.comment="" then     

                   else    

                        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      

                  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   

解决PowerDesigner 反向工程没有注释（备注）(SQL Server2008)+ Sql导入powerdesigner时中文丢失问题（Oracle11g）