Thanks Gary, but this system is written in FPW 2.5. ************************************************* Impeach Blagojevich
http://www.cafepress.com/rightwingmike --- On Fri, 12/19/08, Garry Bettle <[email protected]> wrote: > From: Garry Bettle <[email protected]> > Subject: Re: What's easiest way to send email with pdf attachments from FPW > 2.5? > To: [email protected] > Date: Friday, December 19, 2008, 9:39 AM > On Thu, 18 Dec 2008 20:05:01 -0800 (PST), Michael Madigan > wrote: > > Thanks Malcolm. > > > > I'll check with my client tomorrow if I can get > his email information. > > > > It used to be soooooo easy. > > > > It's blocked from my Comcast account too. I > don't even have a comcast email address, I don't > think. > > > > Hi Michael, > > It sounds like you have pdf options. Here's my 2p > regarding the emailing ... > > I've had success with Blat - I wrote an article for the > last VFUG > newsletter - but was blown away by how simple the following > was. > > It's not mine, but I can't find the url where I > found it ( I think it > was Jack Skelley): > > TRY > LOCAL lcSchema, loConfig, loMsg, loError, lcErr > lcErr = "" > lcSchema = > "http://schemas.microsoft.com/cdo/configuration/"; > loConfig = CREATEOBJECT("CDO.Configuration") > WITH loConfig.FIELDS > .ITEM(lcSchema + "smtpserver") = > "smtp.gmail.com" > .ITEM(lcSchema + "smtpserverport") = 465 > && รณ 587 > .ITEM(lcSchema + "sendusing") = 2 > .ITEM(lcSchema + "smtpauthenticate") = .T. > .ITEM(lcSchema + "smtpusessl") = .T. > .ITEM(lcSchema + "sendusername") = > "*******[email protected]" > .ITEM(lcSchema + "sendpassword") = > "********" > .UPDATE > ENDWITH > loMsg = CREATEOBJECT ("CDO.Message") > WITH loMsg > .Configuration = loConfig > .FROM = "*******[email protected]" > .TO = "******[email protected]" > .Subject = "Testing CDO with VFP and Gmail" > .TextBody = "If this works, I'll eat my > shorts." > .Send() > ENDWITH > CATCH TO loError > lcErr = [Error: ] + STR(loError.ERRORNO) + CHR(13) + ; > [LineNo: ] + STR(loError.LINENO) + CHR(13) + ; > [Message: ] + loError.MESSAGE > FINALLY > RELEASE loConfig, loMsg > STORE .NULL. TO loConfig, loMsg > IF EMPTY(lcErr) > MESSAGEBOX("The message was sent > successfully", 64, "Notice") > ELSE > MESSAGEBOX(lcErr, 16 , "Error") > ENDIF > ENDTRY > > G. > > > _______________________________________________ > 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/[email protected] > ** 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. _______________________________________________ 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/[email protected] ** 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.
