Thanks Mike

I know I can always count on you (:->)

Rafael Copquin

----- Original Message ----- 
From: "MB Software Solutions,LLC" 
<[email protected]>
To: <[email protected]>
Sent: Friday, September 11, 2009 1:47 PM
Subject: Re: vfp and OpenOffice automation


> Rafael Copquin wrote:
>> Smart solution!
>> Could you post an example, especially of the call to the shellexecute?
>
> Here's a snippet with that code:
>
> SELECT curOutput
> DO CASE
> CASE this.nOutputType = 2 && only students with emails
> COPY TO (lcFile) FIELDS &lcFields FOR lSelected AND NOT
> EMPTY(StuEmail) TYPE XL5
>
> OTHERWISE && CASE this.nOutputType = 1 && All (default)
> COPY TO (lcFile) FIELDS &lcFields FOR lSelected TYPE XL5
>
> ENDCASE
> MESSAGEBOX(FULLPATH(lcFile) + " created with " + ALLTRIM(STR(_tally))
> + " rows.",64,"Excel file created.")
>
> IF this.lOpenExcel THEN && launch Excel file via shellexecute
> WAIT WINDOW NOWAIT "Launching " + FULLPATH(lcFile)
> LOCAL loShell
> loShell = NEWOBJECT("_ShellExecute", "_environ.vcx")
> loShell.ShellExecute(FULLPATH(lcFile))
> RELEASE loShell
> ENDIF
>
> -- 
> Mike Babcock, MCP
> MB Software Solutions, LLC
> President, Chief Software Architect
> http://mbsoftwaresolutions.com
> http://fabmate.com
> http://twitter.com/mbabcock16
>
>
[excessive quoting removed by server]

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/ed34a1ee889d4311b88a4fcafd1a1...@rafanueva
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to