Outlook COM AddIn LDAP code dosent work on Exchange 2003

S

Shiv Kotagal

Outlook Gurus ..
This LDAP code for retrieving smtp address of Senders which runs perfectly with Exchange 5.5 but does not work in Exchange 2003 env. The error I get is 'The specified directory service could not be reached. The service may be temporarily unavailable or the server name may be incorrect." Please help !!!! any help will be greatly appreciated.

Function GetSMTPAddress(oRecip As Outlook.Recipient) As Strin
SERVERNAME = "email2
X400Address = oRecip.AddressEntry.Addres
adspath = "LDAP://" & SERVERNAME & X400Addres
Set obj = GetObject(adspath
GetSMTPAddress = obj.mai
Set obj = Nothin
End Functio

Thanks,
Shiv Kotagal
 
Top