Can Outlook and Access be synchronized?

[BillD]

Can Access be synchronized with Outlook? Can I use outlook from the access
membership database and bring up the members name for scheduling meetings etc.

 

[Arvin Meyer [MVP]]

Can Access be synchronized with Outlook? Can I use outlook from the access
membership database and bring up the members name for scheduling meetings
etc.

Yes you can. You need to store the GUID identifier from Outlook in an Access
table (ExchangeEntryID) to sync them up. The code then looks something like
this:

Private Sub cmdOutlook_Click()
Dim olApp As Object
Dim nsMAPI As NameSpace
Dim MemberFolder As MAPIFolder
Dim i As Integer
Dim Company As Variant
Dim Member As Object
Dim EntryID As Variant

Set olApp = GetObject("", "Outlook.Application")
Set nsMAPI = olApp.GetNamespace("MAPI")
Set MemberFolder = nsMAPI.Folders("Public Folders").Folders("All Public
Folders").Folders("Members")
EntryID = DLookup("ExchangeEntryID", "tblMembers", "[MemberID] = '" &
Me.txtMemberID& "'")

If Not IsNull(EntryID) Then
Set Member = nsMAPI.GetItemFromID(EntryID, ContractorFolder.StoreID)
Member.Display
Else
MsgBox ("This Member is not available in the Members folder.")
End If
End Sub

If you go to one of the Outlook newsgroups, they should be able to direct
you to some code to fill the Access table from the Outlook Address book.

 

[dbahooker]

Arvin should not be trusted; he believes that the only appropriate use
of Access is to use MDB / MDE files.

I mean.. that cry baby needs to lose the training wheels

Can Access be synchronized with Outlook? Can I use outlook from the access
membership database and bring up the members name for scheduling meetings
etc.

Yes you can. You need to store the GUID identifier from Outlook in an Access
table (ExchangeEntryID) to sync them up. The code then looks something like
this:

Private Sub cmdOutlook_Click()
Dim olApp As Object
Dim nsMAPI As NameSpace
Dim MemberFolder As MAPIFolder
Dim i As Integer
Dim Company As Variant
Dim Member As Object
Dim EntryID As Variant

Set olApp = GetObject("", "Outlook.Application")
Set nsMAPI = olApp.GetNamespace("MAPI")
Set MemberFolder = nsMAPI.Folders("Public Folders").Folders("All Public
Folders").Folders("Members")
EntryID = DLookup("ExchangeEntryID", "tblMembers", "[MemberID] = '" &
Me.txtMemberID& "'")

If Not IsNull(EntryID) Then
Set Member = nsMAPI.GetItemFromID(EntryID, ContractorFolder.StoreID)
Member.Display
Else
MsgBox ("This Member is not available in the Members folder.")
End If
End Sub

If you go to one of the Outlook newsgroups, they should be able to direct
you to some code to fill the Access table from the Outlook Address book.

 

[BillD]

Thanks for the help. I know access but do not know programming code. I sent
your answer to my cousin who knows programming. He immediately said " that
looks interesting". He is interested in helping me synchronizing access and
outlook. appointments, emails etc.
Thanks again.
Bill Depow

Can Access be synchronized with Outlook? Can I use outlook from the access
membership database and bring up the members name for scheduling meetings
etc.

Yes you can. You need to store the GUID identifier from Outlook in an Access
table (ExchangeEntryID) to sync them up. The code then looks something like
this:

Private Sub cmdOutlook_Click()
Dim olApp As Object
Dim nsMAPI As NameSpace
Dim MemberFolder As MAPIFolder
Dim i As Integer
Dim Company As Variant
Dim Member As Object
Dim EntryID As Variant

Set olApp = GetObject("", "Outlook.Application")
Set nsMAPI = olApp.GetNamespace("MAPI")
Set MemberFolder = nsMAPI.Folders("Public Folders").Folders("All Public
Folders").Folders("Members")
EntryID = DLookup("ExchangeEntryID", "tblMembers", "[MemberID] = '" &
Me.txtMemberID& "'")

If Not IsNull(EntryID) Then
Set Member = nsMAPI.GetItemFromID(EntryID, ContractorFolder.StoreID)
Member.Display
Else
MsgBox ("This Member is not available in the Members folder.")
End If
End Sub

If you go to one of the Outlook newsgroups, they should be able to direct
you to some code to fill the Access table from the Outlook Address book.
--
Arvin Meyer, MCP, MVP
http://www.datastrat.com
http://www.mvps.org/access
http://www.accessmvp.com

 

[Todos Menos [MSFT]]

dude move to ADP and use DTS or SSIS in order to get to your data

Arvin is a baby retarded programmer
don't listen to him or else you'll be stuck in the 1st grade with him,
making $12/hour

Can Access be synchronized with Outlook? Can I use outlook from the access
membership database and bring up the members name for scheduling meetings
etc.

Yes you can. You need to store the GUID identifier from Outlook in an Access
table (ExchangeEntryID) to sync them up. The code then looks something like
this:

Private Sub cmdOutlook_Click()
Dim olApp As Object
Dim nsMAPI As NameSpace
Dim MemberFolder As MAPIFolder
Dim i As Integer
Dim Company As Variant
Dim Member As Object
Dim EntryID As Variant

Set olApp = GetObject("", "Outlook.Application")
Set nsMAPI = olApp.GetNamespace("MAPI")
Set MemberFolder = nsMAPI.Folders("Public Folders").Folders("All Public
Folders").Folders("Members")
EntryID = DLookup("ExchangeEntryID", "tblMembers", "[MemberID] = '" &
Me.txtMemberID& "'")

If Not IsNull(EntryID) Then
Set Member = nsMAPI.GetItemFromID(EntryID, ContractorFolder.StoreID)
Member.Display
Else
MsgBox ("This Member is not available in the Members folder.")
End If
End Sub

If you go to one of the Outlook newsgroups, they should be able to direct
you to some code to fill the Access table from the Outlook Address book.

 

[Cheese]

I spotted this entry for synchronizing Outlook and Access and I think that
this is what I would like to do as well. I have determined the Global Unique
ID for Outlook but I am confused as to how to set up the programming in a
table in Access. In the design of a table what data type should I use and
where would I insert the programming? Thanks! Cheese

Can Access be synchronized with Outlook? Can I use outlook from the access
membership database and bring up the members name for scheduling meetings
etc.

Yes you can. You need to store the GUID identifier from Outlook in an Access
table (ExchangeEntryID) to sync them up. The code then looks something like
this:

Private Sub cmdOutlook_Click()
Dim olApp As Object
Dim nsMAPI As NameSpace
Dim MemberFolder As MAPIFolder
Dim i As Integer
Dim Company As Variant
Dim Member As Object
Dim EntryID As Variant

Set olApp = GetObject("", "Outlook.Application")
Set nsMAPI = olApp.GetNamespace("MAPI")
Set MemberFolder = nsMAPI.Folders("Public Folders").Folders("All Public
Folders").Folders("Members")
EntryID = DLookup("ExchangeEntryID", "tblMembers", "[MemberID] = '" &
Me.txtMemberID& "'")

If Not IsNull(EntryID) Then
Set Member = nsMAPI.GetItemFromID(EntryID, ContractorFolder.StoreID)
Member.Display
Else
MsgBox ("This Member is not available in the Members folder.")
End If
End Sub

If you go to one of the Outlook newsgroups, they should be able to direct
you to some code to fill the Access table from the Outlook Address book.
--
Arvin Meyer, MCP, MVP
http://www.datastrat.com
http://www.mvps.org/access
http://www.accessmvp.com