Pregunta: | 21979 - TRAER PROFILE DE OUTLOOK |
Autor: | jonathan rivera |
Hola a todos!
Quisiera saber como puedo hacer para extraer el profile defaul de mi cliente de outlook por medio de codigo en visual basic. de antemano muchas gracias. |
Respuesta: | jose hernandez |
mete esto en un boton:
Dim MiOjbetoOutlook As Object Dim perfil As Object Set MiOjbetoOutlook = GetObject("", "OutLook.Application") Set mynamespace = MiOjbetoOutlook.GetNamespace("MAPI") Set perfil = mynamespace.currentuser If perfil Is Nothing Then MsgBox ("perfil no disponible") Exit Sub Else MsgBox perfil End If |