|
板凳

楼主 |
发表于 2005-5-31 10:36:46
|
只看该作者
to xiaoqi19800513
小蚊子的方法的确最简单高效! <!-- s:lol: --><img src="{SMILIES_PATH}/icon_lol.gif" alt=":lol:" title="Laughing" /><!-- s:lol: -->
我们能不能再探讨一下自动化的,比如用DDE。下面有段样例程序,我们可以一起来探讨学习。
注意,其中就有一句话是教你如何在WORD中插入图片的'InsertPicture'
[code:1ab15]filename word dde 'MSWORD|system' ;
data _null_ ;
file word ;
put '[FileNew .Template="normal.dot", .NewTemplate=0]' ;
put '[toggleportrait]' ;
put '[ViewZoom .TwoPages]' ;
put '[ViewFooter]' ;
put '[FormatFont .Points=10, .Font="Arial", .Bold=1]' ;
put '[FormatParagraph .Alignment=1]' ;
put '[Insert "This is my footer"]' ;
put '[ViewFooter]' ;
put '[ViewHeader]' ;
put '[Insert "This is my lovely header"]' ;
put '[ViewHeader]' ;
put '[InsertPicture .name="C:\test.cgm"]' ;
put '[WordLeft]' ;
put '[SelectCurWord]' ;
put '[FormatPicture .scalex=200, .scaley=200]' ;
put '[WordRight]' ;
put '[insertpagebreak]' ;
put '[InsertFile .name="C:\sample.doc"]' ;
put '[FileSaveAs .name="c:\test.doc"]' ;
put '[FileClose]' ;
run ;[/code:1ab15] |
|