fwiw

I use either Outlook with findwindowpos / timer to look for the annoying security message, a web based perl script and IE automation or this code to call cdosys.dll

Based on what type of system I've written one of them normally turns out to be the better solution.

As far as I know the customer I've lifted this code from is running W7 and not reported any issues.

LPARAMETERS cTo,cBCC,cSubject,cBody,cFrom

cdoBasic = 1

cdoSendUsingPort = 2

IMSG = Createobject("CDO.Message")

iConf = Createobject("CDO.Configuration")

Flds = iConf.Fields

With Flds

IF "JET" $ UPPER(cFrom)

.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic

.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "me@me.com"

.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mypassword"

.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort

.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.me.com"

.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30

.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

.Update()

ENDIF

Endwith

With IMSG

.Configuration = iConf

.To = cTo

** .To="info@compsys.co.uk"

IF "JET" $ UPPER(cFrom)

.From = "me@me.com"

endif

.BCC=cBCC

.Subject = cSubject

IF "<HTML" $ UPPER(cBody)

.htmlbody=cBody

ELSE

.TextBody = cBody

ENDIF

.Send()

Endwith

________________________________

From: profox-bounces@leafe.com on behalf of Rafael Copquin

Sent: Mon 14/06/2010 20:15

To: GrahamB

Subject: Re: Craig Boyds VFPEXMAPI.fll

>El 14/06/2010 15:51, Peter Hart escribió:

>Sys(3050,1,Val (Sys (3050, 1, 0)) / 3)&& Set Visual Foxpro Buffer Size

>Any ideas on how to do this with VFP on Windows 7 or in deed if it is

>necessary in Win 7

I have been using Win 7 (32 bit version) for some time now and never saw the need to set the VFP buffer size

Rafael Copquin

[excessive quoting removed by server]

_______________________________________________

Post Messages to: ProFox@leafe.com

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/0AF51B84D903A144B9EE71AEAFE7E81C0E33B4@compsys1.CompySys.local

** 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.