home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a087 / 6.ddi / EXAMPLE6.PR_ / EXAMPLE6.bin
Encoding:
Text File  |  1994-02-02  |  183 b   |  8 lines
  1. select oletable
  2. locate for oletype = "MSWord"
  3. @ 0,0 say object verb 0
  4. ichan = DDEInitiate("WinWord","System")
  5. =DDEExecute(ichan,"[FilePrint][FileClose]")
  6. =DDETerminate(ichan)
  7.  
  8.