none
Como saber o email a partir do username? RRS feed

  • Pergunta

  • Srs,

    Tenho uma aplicacao que precisa mandar email para alguns usuarios a partir do seu username.

    Como saber o email. sem precisar montar uma tabela relacionando o username com email.

    Valeu,

    NG

    quinta-feira, 6 de dezembro de 2012 13:10

Todas as Respostas

  • Vc definiu o email no Activedirectory?

    se sim use este codigo:

    Public Function GetCurUserEmail(ByVal DomainObj As ActiveDs.IADsContainer, ByVal TargetUserID As String) As String
                Dim User As ActiveDs.IADsUser
                Dim EmailAddress As String = ""
                Try
                    If Not DomainObj Is Nothing Then
                        DomainObj.Filter = New Object() {"User"}
                        For Each User In DomainObj
                            Dim UserName As String
                            UserName = Replace(User.Name, "CN=", "")
                            If TargetUserID = UserName Then
                                EmailAddress = User.EmailAddress
                                Exit For
                            End If
                        Next
                        User = Nothing
                        DomainObj = Nothing
                        Return EmailAddress
                    Else
                        Return Nothing
                    End If
                Catch e As Exception
                    ShowMsgBox(e.Message)
                    Return Nothing
                End Try
            End Function

    fonte:http://kellyschronicles.wordpress.com/2008/07/28/get-user-email-address-in-active-directory-in-vb-net/

    att


    William John Adam Trindade
    Analyste-programmeur
    ----------------------------------------------------------

    Sogi informatique ltée

    quinta-feira, 6 de dezembro de 2012 16:08
    Moderador
  • Ola William,

    Montei um pequeno exemplo com a rotina acima, acrescentei a referencia a ActiveDS.

    Agora preciso saber qual parametro eu passo no DomainObj.

    Ats,

    NG

    quinta-feira, 6 de dezembro de 2012 16:28
  • Ola William,

    Achei como montar o parametro do ActiveDs.IADsContainer.

    Mas agora está dando o erro:

    A propriedade de pasta não pode ser encontrada em cache.

    Parece que no meu dominio não tem esta informação.

    Sei que existe a possibilidade de achar o email pelo outlook server, como?

    Ats,

    NG

    quinta-feira, 6 de dezembro de 2012 17:06