Microsoft KB Archive/100430

{| = Example 3 Code in Dev. Guide Doesn't Print Word Document =
 * width="100%"|

ID: Q100430

2.50 2.50a WINDOWS kbole kbprint kbinterop kbprg kbdocerr

The information in this article applies to:


 * Microsoft FoxPro for Windows, versions 2.5, 2.5a

SUMMARY
The Example 3 code shown on page D13-22 in the "Developer's Guide" does not print the embedded Microsoft Word for Windows document as stated.

To print the embedded Word for Windows document, make the following changes to the code:

SELECT oletable LOCATE FOR oletype = "MSWord" @ 0,0 SAY object VERB 0 NOWAIT    && NOWAIT clause is undocumented * ichan = DDEInitiate("WinWord", "System") =DDEExecute(ichan, "[FilePrint]") && print the embedded document =DDEExecute(ichan, "[FileClose]") && closes the document ** =DDEExecute(ichan, "[FileExit]")  && exits Word for Windows =DDETerminate(ichan)

MORE INFORMATION
To test the incorrect code, create a table called OLETABLE and add two fields, the first having a field type of character and the second having a field type of general; that is, OLETYPE c(10) and OBJECT g(10). Add one record in OLETABLE, store "MSWord" in OLETYPE, and embed a WinWord document in OBJECT. Then execute the example 3 code. FoxPro seems to hang after running the code and Word for Windows does not print the embedded document stored in the general field.

Additional reference words: FoxWin 2.50 2.50a docerr winword DDE KBCategory: kbole kbprint kbinterop kbprg kbdocerr KBSubcategory: FxinteropDde

Keywords         : FxinteropDde Version          : 2.50 2.50a Platform         : WINDOWS
 * }