Still get security prompt on Recipients.Add

Add-in Express™ Support Service
That's what is more important than anything else

Still get security prompt on Recipients.Add
 
Jan Hyde




Posts: 16
Joined: 2011-04-08
I still get the security warning as soon as I call Recipients.Add

If I use Mapi instead of Outlook I get the security warning as soon as I call ResolveName

I get the same issue using both the Outlook Security Manager 2007 and 2010

System setup:

Vista
VB6
Outlook 2010

I'm out of ideas?
Posted 08 Apr, 2011 05:01:51 Top
Renat Tlebaldziyeu


Guest


Hello Jan,

Please note that Security Manager 2007 doesn't support Outlook 2010 and you should use Security Manager 2010.

The latest build of the Security Manager 2010 ActiveX edition is 1029. Do you use the latest build?
You can download it from our web site, here is the page:
http://www.add-in-express.com/downloads/osm.php

Can I have a look at the code you use?
Posted 08 Apr, 2011 05:43:26 Top
Jan Hyde




Posts: 16
Joined: 2011-04-08
I bought and downloaded the 2010 version yesterday and that is what I am testing with now.

'Create object
Set SecurityManager = CreateObject("AddInExpress.OutlookSecurityManager")

'Disable the warnings
SecurityManager.ConnectTo pOutLook
SecurityManager.DisableOOMWarnings = True

Then if using outlook everything works until I call

Call pMailItem.Recipients.Add(EmailAddress).Resolve

Note, If I remove the .Resolve from the end I still get the security message

If using MAPI (It only does this if it can't start or link to outlook)
In this case the security message appears on ResolveName

MAPIMessages.RecipIndex = MAPIMessages.RecipCount
MAPIMessages.RecipType = mapToList
MAPIMessages.RecipAddress = EmailAddress
'-- Will diplay a dialogue box for unresolved names
MAPIMessages.AddressResolveUI = True
MAPIMessages.ResolveName
Posted 08 Apr, 2011 05:52:29 Top
Jan Hyde




Posts: 16
Joined: 2011-04-08
Oh I should note that if its using mapi then it we use SecurityManager.DisableSMapiWarnings = True
Posted 08 Apr, 2011 05:53:13 Top
Renat Tlebaldziyeu


Guest


Thank you for providing me with the sample code, Jan.

Could you please try to change the following line in your code:
SecurityManager.ConnectTo pOutLook
to
SecurityManager.ConnectTo pOutLook.Application

Did it help?
Posted 08 Apr, 2011 06:01:43 Top
Jan Hyde




Posts: 16
Joined: 2011-04-08
OK tried

SecurityManager.ConnectTo pOutLook.Application

But I still get the security message in the same place.
Posted 08 Apr, 2011 06:08:44 Top
Renat Tlebaldziyeu


Guest


Could you please send me a sample project, which reproduces the issue (please see readme.txt for the support e-mail address and make sure your e-mail contains a link to this topic)?
Posted 08 Apr, 2011 06:16:04 Top
Jan Hyde




Posts: 16
Joined: 2011-04-08
I can reproduce it with the following sample code (VB6)


Dim SecurityManager As Object
Dim pMailItem As Object 'outlook.MailItem
Dim pOutLook As Object 'outlook.Application

Set SecurityManager = CreateObject("AddInExpress.OutlookSecurityManager")
Set pOutLook = CreateObject("Outlook.application")
Set pMailItem = pOutLook.CreateItem(0)

SecurityManager.ConnectTo pOutLook
SecurityManager.DisableOOMWarnings = True

Call pMailItem.Recipients.Add("janh@dummyemail.co.uk").Resolve

SecurityManager.DisableOOMWarnings = False
SecurityManager.Disconnect pOutLook
Posted 08 Apr, 2011 06:56:57 Top
Renat Tlebaldziyeu


Guest


Thank you, Jan. The code looks good.
Could you please specify the bitness of your Outlook 2010? Is it 32bit or 64bit?
Posted 08 Apr, 2011 07:33:26 Top
Jan Hyde




Posts: 16
Joined: 2011-04-08
32 bit

Everything I install is installed as 32 bit.
Posted 08 Apr, 2011 07:54:58 Top