Changeing Redemption for outlook to Exchange Server

Posted on 2011-04-26
Last Modified: 2012-05-11
I wrote some VBA code to add an MS Outlook contact to the current user's PST file using redemption.
They have now upgraded to MS Exchange. (On a cloud server)
What would I have to do differently to add contacts to the user's exchange account?

Attached is a code snipet of what I do now.

Function BeginContactLoadingProcess() As Boolean
Dim myOutlookApp As Outlook.Application
Dim SafeContact As Object
Dim Contact As Object
Set myOutlookApp = CreateObject("Outlook.Application")

Set Contact = myOutlookApp.CreateItem(olContactItem)

Set SafeContact = CreateObject("Redemption.SafeContactItem")

SafeContact.Item = Contact
SafeContact.CompanyName “Joe Pizza”
SafeContact.FileAs =”Joe’s Pizza Parlor”
SafeContact.FirstName = "Joe"
SafeContact.LastName = "Felini”


SafeContact.Close 1
Set SafeContact = Nothing

End function

Open in new window

Question by:askolits
    LVL 56

    Expert Comment

    by:Jim Dettman (Microsoft MVP/ EE MVE)

      I don't know for sure, but I wouldn't think you would need to change anything.  Your still working through Outlook.

      It's handling the accounts and where things are stored.

    LVL 56

    Expert Comment

    by:Jim Dettman (Microsoft MVP/ EE MVE)

     Scratch that.  I understand the question now.  Your creating something in Redemption, not an Outlook contact.


    Author Comment

    I'm running this in a VB app and essentially pushing info into the Exchange contacts for a particular user's contact list
    I expect it's handled differently. Probably have to provide the Exchange IP address, user name , password etc..?

    Must be some cdo object I have to use in which I have to pass some arguments.
    LVL 3

    Accepted Solution

    You should be OK... you are interacting with the local instance of Outlook... and Outlook will handle the update to the user's contact list back to the Exchange server.  I do something similar with my app where I use VBA to create appointment's for the user's Outlook calendar.  Our users run Outlook connected to a local Exchange server.  FYI... we are on Exchange 2003 and Office 2003...

    Author Comment

    Been away from this for a while. I need to visit my customer again to see exactly what it's doing. I'll get back to you.

    Author Closing Comment

    You were right. User error. (Easy points for you eh?)

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    Threat Intelligence Starter Resources

    Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

    You might have come across a situation when you have Exchange 2013 server in two different sites (Production and DR). After adding the Database copy in ECP console it displays Database copy status unknown for the DR exchange server. Issue is strange…
    Create high volume marketing opportunities using email signatures with these top 10 DOs and DON'Ts of email signature marketing.
    The basic steps you have just learned will be implemented in this video. The basic steps are shown to configure an Exchange DAG in a live working Exchange Server Environment and manage the same (Exchange Server 2010 Software is used in a Windows Ser…
    This Micro Tutorial will demonstrate the easy use of Gmail embedding images in your email so the recipient of your email can view them in context.

    761 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    12 Experts available now in Live!

    Get 1:1 Help Now