PowerDesigner導出word，PowerDesigner把表導出到word，PDM導出word文檔

PowerDesigner導出word，PowerDesigner把表導出到word，PDM導出word文檔

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

©Copyright 蕃薯耀 2017年4月06日

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

一、把註釋導出成欄位的執行腳本：

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/