Argh! Microsft Office update
Went crazy today and updated office 2000 on one of our servers. This server has an e-mailer program written in Access. Which send out e-mails. I updated office and everytime it tries to send an e-mail it now asks for my permission!
Is there anyway around this, eg can I turn this added security off or get it to trust my access application.
Re: Argh! Microsft Office update
How do you send emails? Through .SendObject, Outlook, or some other email program?
Re: Argh! Microsft Office update
This is because your original version of office was 97 which did not have any security on the
sending of emails.
Now from 2000 forward they have added more and more security to emailing.
A couple of ways around it which are not pretty.
1.) write an Outlook Add-In to do the sending using the trusted application object that is passed in the
OnConnection parameters. Then you would need to create some king of logic that would, depending on your
requirements are, pull the data from access and send it. If you went the other way around it may not
be trusted so it would generate the Security Popup message.
2.) Purchase a third party control which would bypass it, but I wouldnt recommend it to be installed
on a server system.
3.) rewite the sending code using SMTP and setup your own SMTP server. This is probably the better
of the two options.
HTH
Re: Argh! Microsft Office update
Am sending e-mails like so.
VB Code:
Dim objApp As Outlook.Application
Dim objrecipient As recipient
Dim objattachments As Attachments
Dim objattachment As attachment
Dim objMailitem As Mailitem
Dim myNS As NameSpace
Dim myfolder As MAPIFolder
Dim destfolder As MAPIFolder
Dim myitems As Items
Dim myitem As Mailitem
Private Function sendemail(todest As String, subject As String, body As String) As Boolean
'On Error GoTo sendwarning:
Dim fnam As String
Dim loopcounter As Integer
loopcounter = 0
Set objMailitem = objApp.CreateItem(olMailItem)
objMailitem.To = todest
objMailitem.subject = subject
objMailitem.body = body
objMailitem.Send
sendemail = True
Exit Function
sendwarning:
sendemail = False
End Function
I already had Office 2000 sr1, but went to the website and downloaded some other odds and sods, not quite sure what, just whatever microsoft recomended for office 2000. The only reason I'm worried is at some point we're going to be updating to office xp. Can I send emails with xp as above without it asking for my permissions. Or if anyone could show me some examples of a better way to send e-mails that would be great.
Re: Argh! Microsft Office update
Think the following is what I need.
http://support.microsoft.com/kb/q263297/
It's all a bit over my head, could anyone just confirm that this will sort my problem out.
Re: Argh! Microsft Office update
That only will help if the user is running an account in Exchange and not a pst file. Not to mention that you
have to configure this for each and every clients machine.
Best bet is to rewite using SMTP or as an Outlook Add-In. The security only gets tighter and tighter with each
version/service pack. So unless you want to keep dealing with these kind of issues after each upgrade, I'd highly
suggest a rewrite.
Re: Argh! Microsft Office update
Thanks as this e-mailer program is only on one machine and we are running exchange here think it should work.
Am quite tied to using Outlook as we use it to send faxes via outlook as well as regular e-mails, if fact we use this program for a bit of everything!
Is quite scary really, it sends about 3000 emails\faxes a day, the main problem is that as it's written in Access as it has to get data from linked tables from an SQL server database and it interaletaes with outlook to such an extent it only takes microsoft office to change a little bit and it's going to come down like a pack of cards.
Anyway back to my question can you make an access\vba database an add in?