PowerDesigner导出word,PowerDesigner把表导出到word,PDM导出word文档

时间:2021-03-16 05:38:32

PowerDesigner导出word,PowerDesigner把表导出到word,PDM导出word文档

 

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

©Copyright 蕃薯耀 2017年4月06日

http://www.cnblogs.com/fanshuyao/

 

一、把注释导出成字段的执行脚本:

Sql代码  PowerDesigner导出word,PowerDesigner把表导出到word,PDM导出word文档
  1. Option Explicit  
  2. ValidationMode = True  
  3. InteractiveMode = im_Batch  
  4.    
  5. Dim mdl 'the current model  
  6.    
  7. 'get the current active model  
  8. Set mdl = ActiveModel  
  9. If (mdl Is Nothing) Then  
  10. MsgBox "There is no current Model"  
  11. ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then  
  12. MsgBox "The current model is not an Physical Data model."  
  13. Else  
  14. ProcessFolder mdl  
  15. End If  
  16.    
  17. 'This routine copy name into code for each table, each column and each view  
  18. 'of the current folder  
  19. Private sub ProcessFolder(folder)  
  20.    
  21. Dim Tab 'running table  
  22. for each Tab in folder.tables  
  23. if not tab.isShortcut then  
  24. if len(tab.comment) <> 0 then  
  25. tab.name = tab.comment  
  26. end if  
  27. On Error Resume Next  
  28. Dim col 'running column  
  29. for each col in tab.columns  
  30. if len(col.comment) <>0 then  
  31. col.name =col.comment  
  32. end if  
  33. On Error Resume Next  
  34. next  
  35. end if  
  36. next  
  37. end sub   
  38.                                                                                                                                                                                               

 

二、把表导出到Word的通用模板:

见附件。

把模板解压后放在PowerDesigner的安装目录下Report Templates  文件夹里,

如D:\PowerDesigner\Resource Files\Report Templates  

 

三、其它参考资料:

http://blog.csdn.net/ferry_passion/article/details/8948456

 

 

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

©Copyright 蕃薯耀 2017年4月06日

http://www.cnblogs.com/fanshuyao/