jueves, 20 de mayo de 2010

Buscar Usuarios por Grupo en Active Directory

Hace algún tiempo necesitaba un pequeño script para detectar usuarios dentro de mi grupo wireless en Active Directory, asi que me di la tarea de investigar un poco en como lograrlo, así pude crear el siguiente script el cual pueden modificarlo para ver los usuarios que pertenecen a un grupo X.

Lo que hace es crear un archivo txt para guardar los resultados (en el mismo directorio donde esta el script), verifica los usuarios de un grupo y los datos a grabar son SAM Account, Name y displayName.

On Error Resume Next

Const DOMAINGROUP = "LDAP://cn=Wireless, cn=Users, dc=midominio,dc=dom"
Const GROUPHEADER = "<-= GROUP Wireless =->"
Const GROUPFOOTER = "====================="

doYourJob

openFile

Private Sub doYourJob()
Set objGroup = GetObject _
(DOMAINGROUP)
''objGroup.GetInfo

Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.CreateTextFile("memberswifi.txt", True)

file.Writeline GROUPHEADER

For each objMember in objGroup.Members
file.Writeline "[---------------------------]"
file.Writeline objMember.SAMAccountName
file.Writeline objMember.Name
file.Writeline objMember.displayName
Next
file.Writeline GROUPFOOTER
file.Close
End Sub

Private Sub openFile()
Const WIN_STYLE = 4
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "notepad.exe c:memberswifi.txt", WIN_STYLE
End Sub


Graban este archivo con extensión vbs y listo.

Espero les sea de utilidad.

martes, 4 de mayo de 2010

iPhoneLinux / iDroid


(Logo no oficial)

En abril 21 un miembro del conocido iPhone Dev Team mostro al mundo un video donde muestra al OS Android ejecutandose en el hardware de un iPhone 2G.

Hasta el momento solo esta disponible para ese modelo y se esta trabajando para crear ports a los demas modelos.

Actualmente estoy apoyando en el alpha testing para el iPod Touch 2G.

Para mayor información pueden entrar a la pagina ofical del proyecto:

iDroid
Planetbeing blog

Saludos!