如何在编程中实现调用WORD编辑后，再进行另存功能？ ( 积分: 50 )

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-06

• #1

我已经实现WORD文件的调用和替换，但不知道如何用程序实现另存，请高手指点？
Delphi7+Office2003
如果能答出来的话，http://www.delphibbs.com/delphibbs/dispq.asp?lid=3124149
这里的100分也送给你，非常感谢！

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-06

• #2

我已经实现WORD文件的调用和替换，但不知道如何用程序实现另存，请高手指点？
Delphi7+Office2003
如果能答出来的话，http://www.delphibbs.com/delphibbs/dispq.asp?lid=3124149
这里的100分也送给你，非常感谢！

 

T

telliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-06

• #3

filename1 := 'c:/wdtest.doc';
WordDocument1.SaveAs(filename1);

哈哈哈，拿分来吧

 

T

telliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-06

• #4

var
filename1 : Olevariant;

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-06

• #5

兄弟，不对呀，你这样只能重新建立一个已命名好的新文件，而我需要将我调用并修改后的文件重命名，请再帮我看看，谢谢。

 

L

lyguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-07

• #6

你可以保存后，再重新改文件名字。

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-07

• #7

不行，因为原文件是模板。

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-07

• #8

不会吧，难道高手都去避暑了吗？

 

D

dengwei1116

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-08

• #9

打开模板，然后再saveas
WordApp.Document.Add('xxx.dot');
//.....
WordApp.Document.SaveAs('yyy.doc');

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-08

• #10

提示没有足够的参数，请详细讲解，好吗？

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-09

• #11

再顶一次吧[]

 

N

northbin2004

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-09

• #12

已自己解决。谢谢兄弟们了。
var filename1levariant;
begin
filename1:=xyd_doc;
wordapp.activedocument.saveas(FileName1,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam);
end;

 

N

northbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-09

• #13

接受答案了.