首先,我不是 VFP 程序员,所以我做错的可能很简单。
我正在尝试从 VFP 9 数据库的常规字段中提取一些文档。我有一种方法可以有效地将字段复制并粘贴到 Word 中,然后将 Word 文档保存到磁盘。
我在 .prg 文件中的 foxpro 开发环境中完成了这一切。
这是我的代码的核心内容(其中大部分是从 Microsoft 支持问题中复制的):
DO WHILE NOT EOF()
IF EMPTY(tnoteole) then
SKIP
LOOP
ENDIF
KEYBOARD "{ctrl+c} {ctrl+w}"
MODIFY GENERAL tnoteole
TRY
.EditPaste
CATCH
ENDTRY
.InsertPara
filename = Path + ALLTRIM(STR(recnum)) + ".doc"
.FileSaveAs(filename)
.EditSelectAll
.EditClear
SKIP
recnum = recnum + 1
ENDDO
我的问题是,当我从开发环境中运行它时,它工作正常,并且通用字段窗口在屏幕上闪烁并粘贴到 Word 等中。但是当我尝试从编译的 exe 运行它时(过程是由用户单击表单上的按钮触发 - 我有很多工作 - 虽然我实际上希望它是一个批处理作业,不需要用户交互) Word 将打开,但仅此而已。一般字段不会在屏幕上闪烁,基本上它只是永远等待。
(哦,如果你想知道讨厌的 try/catch 事情,我在粘贴一些字段时发现 Word 有一些异常,但是 try/catch 在开发环境中工作正常,所以我认为这不是原因我的问题。)
那么,我怎样才能使这项工作?我有点在foxpro的黑暗中摸索。
请帮忙!:)
谢谢,
克雷格