Outlook AUtomated email with the "Program sending email on your behlaf " warning

[paulmcdonnell]

Outlook AUtomated email with the "Program sending email on your behlaf " warning

Hi Guys,

I have recently installed a later version of Outlook and yes I have the intervention message everytime my database automates and email - and it does a lot of this , much of the time in the background.

I have read a few threads on how to solve the problem but still am no closer to a solution. If anyone can give any pointers that would be ACE.

All I want outlook to do (as previous versions will allow) is send the email with no warning (AUTOMATED!). I have much code scattered around the database which creates email so I don't want ot have to change the coding of each routine unless i really have to.

I have tried the Outlook Redemption method and download this on to my machine but not sure how it works from here. Does it run when outlook runs (if so I still get the message warning) or am i supposed to do something to it or set something in outlook first?

I've also looked at other posts which use CDO in the code. This would mean me understanding how the CDO works and changing a LOT of my code.

My current coding is shown below:

'DEFINED VARIABLE EARLIER
Public MailboxID As Variant
Public Emailto As Variant
Public who As String
Public onmapi As NameSpace
Public ofcPersonalFolders As Folders
Public offolder As MAPIFolder
Public iFor As Integer
Public ol As Outlook.Application
Public olns As NameSpace
Public outobj As Outlook.Application
Public outappt As Outlook.AppointmentItem
Public ttime As Outlook.AppointmentItem

'EMAIL CODE :
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("Query_Summary_Offers_Placed_old_details")

rst.MoveFirst
Do While Not rst.EOF
With rst

Subject = "[PM]->OFFER WARNING: The Offer for " & ![Number/Name] & " " & ![Address_1] & " is now " & ![Age] & " days old, and has not been update"
body = "The Offer for " & ![Number/Name] & " " & ![Address_1] & " for £" & ![offer] & "(Market Value as £" & ![Market Value] & ") is now " & ![Age] & " days old." & vbCrLf & vbCrLf & "You should ba able to update this offer with feedback now." & vbCrLf & vbCrLf & "Contact the vendor to findout what has happened." & vbCrLf & ![Vendor Name] & vbCrLf & ![Telephone] & vbCrLf & ![dear] & vbCrLf & ! & vbCrLf & ![Website] & vbCrLf & vbCrLf & "This message will now keep appearing until you update the offer."
DoCmd.SendObject , , , Emailto, , , Subject, body & vbCrLf & vbCrLf & "" & vbCrLf & vbCrLf & "Regards" & vbCrLf & "Regards", False
rst.MoveNext
End With
Loop

****************************************
ANY IDEAS WOULD BE APPRECIATED

CHEERS
PAUL

 

[dan-cat]

I know a by-pass for this is to display the email for editing first then click on send.

However you probably don't want to do this am I right?

 

[paulmcdonnell]

Thanks for that

Thanks, but I need it to be pure automation, user intervention does defeat the object a little.

If you have any other ideas please give 'em a shot!

Paul

 

[dan-cat]

Thanks, but I need it to be pure automation, user intervention does defeat the object a little.

If you have any other ideas please give 'em a shot!

Paul

I've heard that if you register a digital signature with microsoft then this will fix the problem

 

[ZMAN2]

Express ClickYes

I have had the same problems with Outlook myself until I found "Express ClickYes."

Express ClickYes is a tiny program that sits in the taskbar and clicks the Yes button on behalf of you, when Outlook's Security Guard opens prompt dialog saying that a program is trying to send an email with Outlook or access its address book. You can suspend/resume it by double-clicking its taskbar icon. Developers can automate its behavior by sending special messages.

I use this all the time and it works great. If someone else could write some additional code (shell command maybe) to activate the application and close it after it completes the send it would be ideal. I use a command in my db to activate this little application before e-mailing and then I just manually close it. Hope this helps.

 

[modest]

You have to include a reference to the redemption.dll (look at your References list).

Then go to my post here to see how to call the redemption objects:
http://www.access-programmers.co.uk/forums/showthread.php?t=83434&highlight=redemption

You only need this for sending a mail, not for other tasks.