Converting Exchange Email Address to SMTP Email Address RSS

• • Reply
  

  indri

  Member

  5 Points

  1 Post

  Converting Exchange Email Address to SMTP Email Address

  Jul 07, 2004 07:40 PM|LINK

  Please help, I got this far: Const intContactFolder As Integer = 1 Dim objOutlook As Outlook.Application = New Outlook.Application Dim objNS As Outlook.NameSpace = objOutlook.Session '* Get 'Contacts' folder. Dim objAddrList As Outlook.AddressList = objNS.Session.AddressLists(intContactFolder) '* Get first entry in 'Contacts' folder. Dim objAddrEntry As Outlook.AddressEntry = objAddrList.AddressEntries.Item(1) '----- I know I need to convert exchange email address to SMTP email address here: ------ '* Get first address in the book. Dim strEmailAddr As String = objAddrEntry.Members.Item(1).Address Thank you!!