none
Macro para leer información del active directory RRS feed

  • Pregunta

  • Hola; tengo un pequeño problema con un archivo de Word

    El problema es el siguiente; tengo un archivo en el cual me genera las tarjetas de presentación de cada usuario; si yo quiero imprimir las mias me aparecen mis datos; pero si quisiera imprimir las tarjetas de otro usuario no me lee el active directory y por lo tanto no puedo imprimir las tarjetas de presentación

    Les dejo el código haber si alguien me puede ayudar con este problemita

    Gracias

    Set objSysInfo = CreateObject("ADSystemInfo")
    
    
    result = MsgBox("Are you printing business cards for yourself?", 4)
    
    If result = vbYes Then
        strUser = objSysInfo.userName
        Set objUser = GetObject("LDAP://" & strUser)
    MsgBox strUser
    End If
    
    If result = vbNo Then
        Logon_ID.Show
        
        strUser2 = user1
        Set objUser = GetObject("LDAP://" & strUser2)
    MsgBox strUser
    End If

    martes, 30 de octubre de 2012 14:38

Todas las respuestas

  • ¿Está usted consciente de que este es el foro de SQL Server?  Le recomendaría hacer la pregunta en un foro que sea pertinente a MS Office.  Creo que para ese tema particular no existe uno en este sitio en español.  Si cambia a United States (English), sí encontrará foros para programación Office.

    Jose R. MCP
    Code Samples

    martes, 30 de octubre de 2012 14:45