用过WordBasic的朋友看过来(100分)

如何用WordBasic控制Word将正在
编辑的文件存为Html格式?

用以下这句：

ActiveDocument.SaveAs FileName:="1.html", FileFormat:=103 _
, LockComments:=False, Password:="", AddToRecentFiles:=True, _
WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _

?

在WORDBASIC的帮助中有

{可以使用OLEVariant使WORD后台运行}

OBJECT.SaveAs(FileName, FileFormat, LockComments, Password, AddToRecentFiles, WritePassword, ReadOnlyRecommended, EmbedTrueTypeFonts, SaveNativePictureFormat, SaveFormsData, SaveAsAOCELetter)

expression 必选。该表达式返回一个 Document 对象。

FileName Variant 类型，可选。文件名。默认为当前文件夹和文件名。如果从未保存过此文档，则将使用默认的文件名（例如，文档 1.doc）。如果已有 FileName 指定的文档，则覆盖此文档，而且在覆盖前不提醒用户。

FileFormat Variant 类型，可选。文档保存的格式。可为以下 WdSaveFormat 常量之一：wdFormatDocument、 wdFormatDOSText、 wdFormatDOSTextLineBreaks、 wdFormatRTF、 wdFormatTemplate、 wdFormatText、
wdFormatTextLineBreaks 或 wdFormatUnicodeText。指定 FileConverter 对象的 SaveFormat 属性的相应值，可将文档保存为其他格式。

LockComments Variant 类型，可选。如果为 True，则此文档只允许进行批注。

Password Variant 类型，可选。打开文档时的口令。

AddToRecentFiles Variant 类型，可选。如果为 True，将文档添加到“文件”菜单中最近使用的文档列表中。

WritePassword Variant 类型，可选。保存对文档的修改所需的口令。

ReadOnlyRecommended Variant 类型，可选。如果为 True，在每次打开文档时，Word 将建议用户采用只读方式。

EmbedTrueTypeFonts Variant 类型，可选。如果为 True，则将文档与 TrueType 字体一起保存。

SaveNativePictureFormat Variant 类型，可选。如果为 True，则从其他系统平台（如 Macintosh）导入的图形仅保存其 Windows 版本。

SaveFormsData Variant 类型，可选。如果为 True，则将窗体中用户输入的数据存为一条数据记录。

SaveAsAOCELetter Variant 类型，可选。如果文档包含一个附加，当此属性值为 True 时，将文档存为一篇 AOCE 信笺（同时保存邮件）。

dragonhh大哥,我从WordBasic上看到过您贴的帮助.
但是 FileFormat 的参数里好像没有SaveToHtml耶.

倒是liwei老大把FileFormat置为"103"不知是什么意思?

liwei老大,您的例子我还没试,还请等待!

系统变态中,请等待...........................

试过了!

liwei老兄:
我把FileFormat置为"103",delphi告诉我说"超过范围".
但我把FileFormat置为wordbasic所给参数,没问题啊?
能否告诉我为何把FileFormat置为103,好吗?

你有装CONVER TO HTML FILE的转换器吗？
在NORMAL安装OFFICE时，它可是不包括在
里面的。你必须把它选进去才行。 装了
它以后，你就可以SAVE AS HTML了。

我上面那段程序是用WORD宏录制下来的。
具体我也不是太明白。你也可以用WORD
宏录制再录制一遍看看。

我有装CONVER TO HTML FILE的转换器呀!
事实上我是想用程序转换,录制宏我还没试过,马上试...

嘻嘻, 好像FileFormat应置为"101"
用Word97中文版+Win95OSR2 试过,一切OK!

谢谢大家了!
liwei功劳最大
dragonhh和jghuang得些辛苦分吧!

多人接受答案了。