What a command to display a PDF file in VFP 1

[binhpham]

Hi all
I have a PDF file. It is easy for me to see it out of VFP program,all I do is click on that file.
But I want my users click on a button in the VFP program then it will open that PDF file.
What command should I use ?
Thanks for your help.

 

[craigsboyd]

use ShellExecute or the VFP RUN command

See the following for an excellent tutorial on the ShellExecute API call from VFP:

http://www.ml-consult.demon.co.uk/foxst-26.htm

Either of these will bring up the default PDF viewer on the user's computer.

At runtime you may want to check if the user has a default viewer for PDF and if not then direct them to download and install Adobe Acrobat Reader And/Or provide the facility at the time that your application is getting installed since it will be reliant on PDF viewer of some kind.

Slighthaze = NULL

 

[binhpham]

Hi Slighthaze
Your help is excellent. It works real well. Thanks a lot.
Now I need to find the way to email this PDF file to the user's customers . Any suggestion beside Blat ?

 

[craigsboyd]

Yeah, some suggestions I can think of... Try the code I wrote below out for size:

***Requires FREEWARE w3 JMail Free, v 4.3
****Download at

http://www.dimac.net/

PUBLIC oSMTPMail
oSMTPMail = NEWOBJECT("jmail.SMTPMail&quot
***If you aren't sure leave this commented out and let the object figure it out for you if possible
***oSMTPMail .ServerAddress = "mail.mchsi.com"
oSMTPMail.AddRecipient ("craig1442@mchsi.com&quot
oSMTPMail.SenderName = "SlightHaze"
oSMTPMail.Subject = "Sending Attachment Test..."
oSMTPMail.Body = "Hello World!"
oSMTPMail.AddAttachMent ("C:\AutoExec.bat&quot
oSMTPMail.Execute()
RELEASE oSMTPMail

Slighthaze = NULL

 

[wgcs]

or just use VFP and MSWINSCK.OCX.... SendMail.prg now supports attachments: faq184-3840

 

[binhpham]

Hi Slighthaze and Wgcs ,
Thanks for your helps. I m done. It works perfectly.

Binh Pham

 

[craigsboyd]

binpham,

Are you using the FAQ that wgcs referred you to? If so how big of a file are you attaching and how long is it taking?

Slighthaze = NULL

 

[wgcs]

I'm curious too: My example SendMail.prg would re-encode the file every time an email is sent: If 20 identical emails were sent, then the file would be re-encoded 20 times. And in my tests, a 128k PDF file took 1.95 seconds (65k/sec) to encode after loading using FileToStr, The transfer sending mail depends on your ISP connection.

A 479k PDF file took 68 seconds to encode (7k/sec). I'm not sure, offhand, why the non-linear results. (I re-tried the 128k file, and it took 1.7 seconds....)

A 329k PDF took 22.6 seconds (14k/sec).

It must be the output string building, which (appending a string to the end of another string) would get slower the longer the output string is. Perhaps outputting to a temp file then FileToStr the temp file would be quicker. Any other ideas?

 

[wgcs]

Or, it seems STUFF() goes pretty quickly, (when not changing the length of the output string), so maybe allocate an output buffer of a calculated length, then just STUFF() the encoded characters into it.

 

[wgcs]

FWIW: I tried changing UUEncode to use StrToFile() additive to build the encoded file, and this increased processing of a 320k file from 22sec to 34 seconds.

And I tried predicting the length, then using STUFF (I forgot that stuff doesn't stuff into the original string: It returns the new string as the result) and that increased a 320k file to 75 seconds.

 

[craigsboyd]

wgcs,

Now that is what I call progres!

Slighthaze = NULL

 

[binhpham]

Slighthaze
I use

http://www.dimac.net/

as your guide