Respuesta : Consulta AD

#1 Javier Inglés [MS MVP]

01/04/2008 - 09:00 | Informe spam

http://www.msexchange.org/articles/...esses.html

http://www.petri.co.il/forums/showthread.php?t199

Si tienes Exchange 2007 puedes usar esto (formulario que te pide el nombre
de SMTP a buscar y que lo contena el usuario y te los muestra):

http://www.microsoft.com/technet/sc...p0208.mspx

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
[void]
[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

$objForm = New-Object System.Windows.Forms.Form
$objForm.Text = "Data Entry Form"
$objForm.Size = New-Object System.Drawing.Size(300,200)
$objForm.StartPosition = "CenterScreen"

$objForm.KeyPreview = $True
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter")
{$x=$objTextBox.Text;$objForm.Close()}})
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape")
{$objForm.Close()}})

$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Size(75,120)
$OKButton.Size = New-Object System.Drawing.Size(75,23)
$OKButton.Text = "OK"
$OKButton.Add_Click({$x=$objTextBox.Text;$objForm.Close()})
$objForm.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(150,120)
$CancelButton.Size = New-Object System.Drawing.Size(75,23)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({$objForm.Close()})
$objForm.Controls.Add($CancelButton)

$objLabel = New-Object System.Windows.Forms.Label
$objLabel.Location = New-Object System.Drawing.Size(10,20)
$objLabel.Size = New-Object System.Drawing.Size(280,20)
$objLabel.Text = "Dirección de correo SMTP a buscar:"
$objForm.Controls.Add($objLabel)

$objTextBox = New-Object System.Windows.Forms.TextBox
$objTextBox.Location = New-Object System.Drawing.Size(10,40)
$objTextBox.Size = New-Object System.Drawing.Size(260,20)
$objForm.Controls.Add($objTextBox)

$objForm.Topmost = $True

$objForm.Add_Shown({$objForm.Activate()})
[void] $objForm.ShowDialog()

$Texto = "Buscando objectos en cuya dirección SMTP se encuentre:"
write-host -f yellow $Texto
write-host -f green $x

Get-Mailbox -server <el nombre del mailbox server> | where
{$_.EmailAddresses -match $x} | fl
DisplayName,EmailAddresses,PrimarySmtpAddress,DistinguisedName

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services

"Alejandro" escribió en el mensaje
news:

Buenos dias y gracias por anticipado, necesito hacer una consulta que me
diga
las direcciones de correo que hay en mi organizacion.

Un Saludo

Responder a este mensaje

#2 Alejandro

01/04/2008 - 09:21 | Informe spam

Gracias, pero no se si es lo que busco. Tengo Exchange 2003 sobre W2003 y lo
que necesito es sacar un listado con todas las direcciones de correo
electronico que hay en la organizacion, no si existe una.
muchas Gracias

"Javier Inglés [MS MVP]" wrote:

http://www.msexchange.org/articles/...esses.html

http://www.petri.co.il/forums/showthread.php?t199

Si tienes Exchange 2007 puedes usar esto (formulario que te pide el nombre
de SMTP a buscar y que lo contena el usuario y te los muestra):

http://www.microsoft.com/technet/sc...p0208.mspx

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
[void]
[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

$objForm = New-Object System.Windows.Forms.Form
$objForm.Text = "Data Entry Form"
$objForm.Size = New-Object System.Drawing.Size(300,200)
$objForm.StartPosition = "CenterScreen"

$objForm.KeyPreview = $True
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter")
{$x=$objTextBox.Text;$objForm.Close()}})
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape")
{$objForm.Close()}})

$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Size(75,120)
$OKButton.Size = New-Object System.Drawing.Size(75,23)
$OKButton.Text = "OK"
$OKButton.Add_Click({$x=$objTextBox.Text;$objForm.Close()})
$objForm.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(150,120)
$CancelButton.Size = New-Object System.Drawing.Size(75,23)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({$objForm.Close()})
$objForm.Controls.Add($CancelButton)

$objLabel = New-Object System.Windows.Forms.Label
$objLabel.Location = New-Object System.Drawing.Size(10,20)
$objLabel.Size = New-Object System.Drawing.Size(280,20)
$objLabel.Text = "Dirección de correo SMTP a buscar:"
$objForm.Controls.Add($objLabel)

$objTextBox = New-Object System.Windows.Forms.TextBox
$objTextBox.Location = New-Object System.Drawing.Size(10,40)
$objTextBox.Size = New-Object System.Drawing.Size(260,20)
$objForm.Controls.Add($objTextBox)

$objForm.Topmost = $True

$objForm.Add_Shown({$objForm.Activate()})
[void] $objForm.ShowDialog()

$Texto = "Buscando objectos en cuya dirección SMTP se encuentre:"
write-host -f yellow $Texto
write-host -f green $x

Get-Mailbox -server <el nombre del mailbox server> | where
{$_.EmailAddresses -match $x} | fl
DisplayName,EmailAddresses,PrimarySmtpAddress,DistinguisedName

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services

"Alejandro" escribió en el mensaje
news:
> Buenos dias y gracias por anticipado, necesito hacer una consulta que me
> diga
> las direcciones de correo que hay en mi organizacion.
>
> Un Saludo

Responder a este mensaje

#3 Javier Inglés [MS MVP]

01/04/2008 - 09:49 | Informe spam

Mírat entonces los 2 primeros enlaces...

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services

"Alejandro" escribió en el mensaje
news:

Gracias, pero no se si es lo que busco. Tengo Exchange 2003 sobre W2003 y
lo
que necesito es sacar un listado con todas las direcciones de correo
electronico que hay en la organizacion, no si existe una.
muchas Gracias

"Javier Inglés [MS MVP]" wrote:

http://www.msexchange.org/articles/...esses.html

http://www.petri.co.il/forums/showthread.php?t199

Si tienes Exchange 2007 puedes usar esto (formulario que te pide el
nombre
de SMTP a buscar y que lo contena el usuario y te los muestra):

http://www.microsoft.com/technet/sc...p0208.mspx

[void]
[System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
[void]
[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

$objForm = New-Object System.Windows.Forms.Form
$objForm.Text = "Data Entry Form"
$objForm.Size = New-Object System.Drawing.Size(300,200)
$objForm.StartPosition = "CenterScreen"

$objForm.KeyPreview = $True
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter")
{$x=$objTextBox.Text;$objForm.Close()}})
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape")
{$objForm.Close()}})

$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Size(75,120)
$OKButton.Size = New-Object System.Drawing.Size(75,23)
$OKButton.Text = "OK"
$OKButton.Add_Click({$x=$objTextBox.Text;$objForm.Close()})
$objForm.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(150,120)
$CancelButton.Size = New-Object System.Drawing.Size(75,23)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({$objForm.Close()})
$objForm.Controls.Add($CancelButton)

$objLabel = New-Object System.Windows.Forms.Label
$objLabel.Location = New-Object System.Drawing.Size(10,20)
$objLabel.Size = New-Object System.Drawing.Size(280,20)
$objLabel.Text = "Dirección de correo SMTP a buscar:"
$objForm.Controls.Add($objLabel)

$objTextBox = New-Object System.Windows.Forms.TextBox
$objTextBox.Location = New-Object System.Drawing.Size(10,40)
$objTextBox.Size = New-Object System.Drawing.Size(260,20)
$objForm.Controls.Add($objTextBox)

$objForm.Topmost = $True

$objForm.Add_Shown({$objForm.Activate()})
[void] $objForm.ShowDialog()

$Texto = "Buscando objectos en cuya dirección SMTP se encuentre:"
write-host -f yellow $Texto
write-host -f green $x

Get-Mailbox -server <el nombre del mailbox server> | where
{$_.EmailAddresses -match $x} | fl
DisplayName,EmailAddresses,PrimarySmtpAddress,DistinguisedName

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services

"Alejandro" escribió en el mensaje
news:
> Buenos dias y gracias por anticipado, necesito hacer una consulta que
> me
> diga
> las direcciones de correo que hay en mi organizacion.
>
> Un Saludo

Responder a este mensaje

#4 Javier Inglés [MS MVP]

01/04/2008 - 11:18 | Informe spam

Sociom una duda, esa select te da sólo la primary address o también el resto
que puedas tener yde la que la organización sea autoritativa?

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services

"Albert Higueras" escribió en el mensaje
news:

Esta es la select al directorio activo para obtener el dato que te
interesa.

"Select Name, mail from 'LDAP://" & _
"domaincontroler.domain.local/DC=domain,DC=local'" & _
"Where
objectCategory='CN=Person,CN=Schema,CN=Configuration,DC=domain,DC=local'"

Un par de utilidades que puede te interesen:

ADSI Edit: Biene con las support tools de Windows, permite consultar
variables del directorio activo, va de fabula cuando no sabes como se
llama
la variable que buscas.

KIX32: Para ejecutar scripts. Puedes hacer un script que te consulte la
select anterior y te extraiga los resultados a un fichero de texto.

Saludos cordiales,

"Javier Inglés [MS MVP]" escribió en el mensaje
news:

Mírat entonces los 2 primeros enlaces...

Salu2!!
Javier Inglés

https://mvp.support.microsoft.com/p...B5567431B0

MS MVP, Windows Server-Directory Services

"Alejandro" escribió en el mensaje
news:
> Gracias, pero no se si es lo que busco. Tengo Exchange 2003 sobre W2003

y

> lo
> que necesito es sacar un listado con todas las direcciones de correo
> electronico que hay en la organizacion, no si existe una.
> muchas Gracias
>
> "Javier Inglés [MS MVP]" wrote:
>
>>

http://www.msexchange.org/articles/...esses.html

>>
>> http://www.petri.co.il/forums/showthread.php?t199
>>
>> Si tienes Exchange 2007 puedes usar esto (formulario que te pide el
>> nombre
>> de SMTP a buscar y que lo contena el usuario y te los muestra):
>>
>>

http://www.microsoft.com/technet/sc...p0208.mspx

>>
>> [void]
>> [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
>> [void]
>>

[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

>>
>> $objForm = New-Object System.Windows.Forms.Form
>> $objForm.Text = "Data Entry Form"
>> $objForm.Size = New-Object System.Drawing.Size(300,200)
>> $objForm.StartPosition = "CenterScreen"
>>
>> $objForm.KeyPreview = $True
>> $objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter")
>> {$x=$objTextBox.Text;$objForm.Close()}})
>> $objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape")
>> {$objForm.Close()}})
>>
>> $OKButton = New-Object System.Windows.Forms.Button
>> $OKButton.Location = New-Object System.Drawing.Size(75,120)
>> $OKButton.Size = New-Object System.Drawing.Size(75,23)
>> $OKButton.Text = "OK"
>> $OKButton.Add_Click({$x=$objTextBox.Text;$objForm.Close()})
>> $objForm.Controls.Add($OKButton)
>>
>> $CancelButton = New-Object System.Windows.Forms.Button
>> $CancelButton.Location = New-Object System.Drawing.Size(150,120)
>> $CancelButton.Size = New-Object System.Drawing.Size(75,23)
>> $CancelButton.Text = "Cancel"
>> $CancelButton.Add_Click({$objForm.Close()})
>> $objForm.Controls.Add($CancelButton)
>>
>> $objLabel = New-Object System.Windows.Forms.Label
>> $objLabel.Location = New-Object System.Drawing.Size(10,20)
>> $objLabel.Size = New-Object System.Drawing.Size(280,20)
>> $objLabel.Text = "Dirección de correo SMTP a buscar:"
>> $objForm.Controls.Add($objLabel)
>>
>> $objTextBox = New-Object System.Windows.Forms.TextBox
>> $objTextBox.Location = New-Object System.Drawing.Size(10,40)
>> $objTextBox.Size = New-Object System.Drawing.Size(260,20)
>> $objForm.Controls.Add($objTextBox)
>>
>> $objForm.Topmost = $True
>>
>> $objForm.Add_Shown({$objForm.Activate()})
>> [void] $objForm.ShowDialog()
>>
>> $Texto = "Buscando objectos en cuya dirección SMTP se encuentre:"
>> write-host -f yellow $Texto
>> write-host -f green $x
>>
>> Get-Mailbox -server <el nombre del mailbox server> | where
>> {$_.EmailAddresses -match $x} | fl
>> DisplayName,EmailAddresses,PrimarySmtpAddress,DistinguisedName
>>
>>
>>
>> Salu2!!
>> Javier Inglés
>>

https://mvp.support.microsoft.com/p...B5567431B0

>> MS MVP, Windows Server-Directory Services
>>
>>
>>
>> "Alejandro" escribió en el

mensaje

>> news:
>> > Buenos dias y gracias por anticipado, necesito hacer una consulta
>> > que
>> > me
>> > diga
>> > las direcciones de correo que hay en mi organizacion.
>> >
>> > Un Saludo
>>
>>
>>

Responder a este mensaje

#5 Albert Higueras

01/04/2008 - 11:18 | Informe spam

Esta es la select al directorio activo para obtener el dato que te interesa.

"Select Name, mail from 'LDAP://" & _
"domaincontroler.domain.local/DC=domain,DC=local'" & _
"Where
objectCategory='CN=Person,CN=Schema,CN=Configuration,DC=domain,DC=local'"

Un par de utilidades que puede te interesen:

ADSI Edit: Biene con las support tools de Windows, permite consultar
variables del directorio activo, va de fabula cuando no sabes como se llama
la variable que buscas.

KIX32: Para ejecutar scripts. Puedes hacer un script que te consulte la
select anterior y te extraiga los resultados a un fichero de texto.

Saludos cordiales,

"Javier Inglés [MS MVP]" escribió en el mensaje
news:

Mírat entonces los 2 primeros enlaces...

Salu2!!
Javier Inglés

https://mvp.support.microsoft.com/p...B5567431B0

MS MVP, Windows Server-Directory Services

"Alejandro" escribió en el mensaje
news:
> Gracias, pero no se si es lo que busco. Tengo Exchange 2003 sobre W2003

y

> lo
> que necesito es sacar un listado con todas las direcciones de correo
> electronico que hay en la organizacion, no si existe una.
> muchas Gracias
>
> "Javier Inglés [MS MVP]" wrote:
>
>>

http://www.msexchange.org/articles/...esses.html

>>
>> http://www.petri.co.il/forums/showthread.php?t199
>>
>> Si tienes Exchange 2007 puedes usar esto (formulario que te pide el
>> nombre
>> de SMTP a buscar y que lo contena el usuario y te los muestra):
>>
>>

http://www.microsoft.com/technet/sc...p0208.mspx

>>
>> [void]
>> [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
>> [void]
>>

[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

>>
>> $objForm = New-Object System.Windows.Forms.Form
>> $objForm.Text = "Data Entry Form"
>> $objForm.Size = New-Object System.Drawing.Size(300,200)
>> $objForm.StartPosition = "CenterScreen"
>>
>> $objForm.KeyPreview = $True
>> $objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter")
>> {$x=$objTextBox.Text;$objForm.Close()}})
>> $objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape")
>> {$objForm.Close()}})
>>
>> $OKButton = New-Object System.Windows.Forms.Button
>> $OKButton.Location = New-Object System.Drawing.Size(75,120)
>> $OKButton.Size = New-Object System.Drawing.Size(75,23)
>> $OKButton.Text = "OK"
>> $OKButton.Add_Click({$x=$objTextBox.Text;$objForm.Close()})
>> $objForm.Controls.Add($OKButton)
>>
>> $CancelButton = New-Object System.Windows.Forms.Button
>> $CancelButton.Location = New-Object System.Drawing.Size(150,120)
>> $CancelButton.Size = New-Object System.Drawing.Size(75,23)
>> $CancelButton.Text = "Cancel"
>> $CancelButton.Add_Click({$objForm.Close()})
>> $objForm.Controls.Add($CancelButton)
>>
>> $objLabel = New-Object System.Windows.Forms.Label
>> $objLabel.Location = New-Object System.Drawing.Size(10,20)
>> $objLabel.Size = New-Object System.Drawing.Size(280,20)
>> $objLabel.Text = "Dirección de correo SMTP a buscar:"
>> $objForm.Controls.Add($objLabel)
>>
>> $objTextBox = New-Object System.Windows.Forms.TextBox
>> $objTextBox.Location = New-Object System.Drawing.Size(10,40)
>> $objTextBox.Size = New-Object System.Drawing.Size(260,20)
>> $objForm.Controls.Add($objTextBox)
>>
>> $objForm.Topmost = $True
>>
>> $objForm.Add_Shown({$objForm.Activate()})
>> [void] $objForm.ShowDialog()
>>
>> $Texto = "Buscando objectos en cuya dirección SMTP se encuentre:"
>> write-host -f yellow $Texto
>> write-host -f green $x
>>
>> Get-Mailbox -server <el nombre del mailbox server> | where
>> {$_.EmailAddresses -match $x} | fl
>> DisplayName,EmailAddresses,PrimarySmtpAddress,DistinguisedName
>>
>>
>>
>> Salu2!!
>> Javier Inglés
>>

https://mvp.support.microsoft.com/p...B5567431B0

>> MS MVP, Windows Server-Directory Services
>>
>>
>>
>> "Alejandro" escribió en el

mensaje

>> news:
>> > Buenos dias y gracias por anticipado, necesito hacer una consulta que
>> > me
>> > diga
>> > las direcciones de correo que hay en mi organizacion.
>> >
>> > Un Saludo
>>
>>
>>

Responder a este mensaje

Ads by Google

Consulta AD

Preguntas similare

Leer las respuestas