300分,来吧!Ole 中怎样建立一个WORD文档并存入数据库?重要的是从库中读出几个WORD文档来合成一个文档,同时自动生成目录标题及页眉(100分)

  • 主题发起人 主题发起人 杨深
  • 开始时间 开始时间

杨深

Unregistered / Unconfirmed
GUEST, unregistred user!
Ole 中怎样建立一个WORD文档并存入数据库?(文章第一行标题为索引)
重要的是从库中读出几个WORD来合成一个文档,
同时自动生成目录标题及页眉。
目录根据插入的文档的题目(可以是以前文章第一行标题索引,已在数据中)生成。
 
不是几句话可以说明的,不过定可以实现。
 
>>几个WORD来合成一个文档
用VBA中的InsertAfter方法
>>自动生成目录标题及页眉
也是VBA,在Office的帮助里查一下,或查看宏代码即可
 
各位能不能慢慢道来?
office 中没有VBA的索引或目录。
宏代码怎样看?
 
下面的宏怎样转换为Delphi的程序

Selection.TypeText Text:="skdkfkdflkfdslfdslkfdslkfdslfdsldslf"
Selection.Style = ActiveDocument.Styles("标题 1")
Selection.TypeParagraph
Selection.TypeText Text:="gfdgfdgfd"
Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
Selection.Style = ActiveDocument.Styles("标题 2")
Selection.EndKey Unit:=wdLine
Selection.TypeParagraph

是不是
WordApp.Selection.TypeText('skdkfkdflkfdslfdslkfdslkfdslfdsldslf');
……
但是老出错,没插进去。(EAccessViolation……)



 
我也需要帮助!
 
delphi里不能用SELECTION对象,应该把SELECTION 转化成 RANGE 对象。
var
fRange:Range;
beign
frange:=activedocument.range;
frange.setrange(....);
frange.typetext('aaaaa');
....

end;

>office 中没有VBA的索引或目录。
安装OFFICE的时候,应该自定义安装,选上 vba 帮助
在vba编辑器里按f1可以查看vba帮助


 
请结束或继续!
 
I want to know that.
 
怎样把两个WORD文档合在一起和加页眉?
 
请帮忙,各位高手。
 
我要用OLE 怎样才能使容器一直激活?即菜单不因焦点改变而不出来,或是焦点
失去了以后就不能再激活了。
 
不尽人意,只好结束,不知能不能给自己分数?
 
多人接受答案了。
 
后退
顶部