Bottom，我打错字，底的英文是buttom

再发一点新资料：

*----------------------
* Word 常量
*----------------------
#DEFINE wdNewBlankDocument                 0
#DEFINE wdNewWebPage                       1
#DEFINE wdNewEmailMessage                  2
#DEFINE wdNewFrameset                      3

#DEFINE wdFormatDocument                   0
#DEFINE wdFormatDOSText                    4
#DEFINE wdFormatDOSTextLineBreaks          5
#DEFINE wdFormatEncodedText                7
#DEFINE wdFormatFilteredHTML               10
#DEFINE wdFormatHTML                       8
#DEFINE wdFormatRTF                        6
#DEFINE wdFormatTemplate                   1
#DEFINE wdFormatText                       2
#DEFINE wdFormatTextLineBreaks             3
#DEFINE wdFormatUnicodeText                7
#DEFINE wdFormatWebArchive                 9
#DEFINE wdFormatXML                        11
#DEFINE wdFormatDocument97                 0
#DEFINE wdFormatDocumentDefault            16
#DEFINE wdFormatPDF                        17
#DEFINE wdFormatTemplate97                 1
#DEFINE wdFormatXMLDocument                12
#DEFINE wdFormatXMLDocumentMacroEnabled    13
#DEFINE wdFormatXMLTemplate                14
#DEFINE wdFormatXMLTemplateMacroEnabled    15
#DEFINE wdFormatXPS                        18

拜托你了，能否注释下。

两大块：第一块是创建Word文档的类型，分别是普通文档、网页文档和电子邮件文档，最后一个框架集还不知道怎么用，在调用Add()方法新建文档时用，语法为oWord.Documents.Add(,,文件类型编码)；第二块是文件存盘的格式码，分别对应“另存为”那若干种格式，看单词大致就能猜到是什么，最有用的莫过于Text（文本文件）、html（网页）和97（兼容Office 97）、PDF、XPS格式了，这个在SaveAs2()方法中使用，语法格式为oDoc.SaveAs2(文件名,格式编码)。

[ 本帖最后由 TonyDeng 于 2012-5-26 22:28 编辑 ]

补一个示例代码：

*
* 用 Microsoft Word 编辑文章
*
PROCEDURE EditDocument(tcFileName)
    LOCAL loWord, loDoc, lbNewFile
   
    lbNewFile = !FILE(tcFileName)
    WAIT "正在启动Microsoft Word，请稍候……" WINDOW NOWAIT
    loWord = CREATEOBJECT("Word.Application")        && loWord 是Word进程
    WAIT CLEAR
    WITH loWord
        loDoc = IIF(!lbNewFile, .Documents.Open(tcFileName), .Documents.Add(,,wdNewWebPage))        && loDoc 是进程文件集中文档之一
        .Visible = .T.
        .Activate
        [....]
        IF !lbNewFile
            loDoc.Save
        ELSE
            loDoc.SaveAs2(tcFileName, wdFormatHTML)
        ENDIF
        * Save保存的是文档，故要用loDoc，Quit退出Word进程，是loWord的方法
        .Quit
    ENDWITH
   
ENDPROC

有没有把比较大的DBF数据导成XLS格式的小程序啊？？？？

向你们学习

学些了！！！