Ir a contenido


MENSAJE DE BIENVENIDA Foro vínculado con Twitter, más info aquí.

“El secreto para progresar es empezar por algún lugar. El secreto para empezar por algún lugar es fragmentar tus complejas y abrumadoras tareas de tal manera que queden convertidas en pequeñas tareas que puedas realizar y entonces simplemente comenzar por la primera.” - Mark Twain

Foto

Obtener Registros host A apuntando a una determinada IP


  • Please log in to reply
No replies to this topic

#1 Alberto Dominguez

Alberto Dominguez

    Gurú

  • Administradores
  • 1.059 Mensajes:
  • LocationMadrid

Escrito 23 septiembre 2014 - 16:58


$file=Get-content 'C:\temp\ipsviejas.txt'
foreach ($ip in $file)
{
    write-host ($ip+':')
    Get-WmiObject -Namespace Root\MicrosoftDNS -Query "SELECT * FROM MicrosoftDNS_AType WHERE RecordData='$ip'" -Computer 'SERVERDNS.contoso.com' | select OwnerName -expandproperty OwnerName
}

Saludos,

Alberto Dominguez

Enterprise Architect y Trainer
MCT, MCPD, MCITP, MCITP Dynamics, MCSE, MCSA, MCTS, MCP...
ITIL V3 Foundation Qualification in IT Service Management
Imagen enviadaPerfil Profesional Imagen enviadaTwitter
Imagen enviadaImagen enviadaImagen enviadaImagen enviada

#2 Alberto Dominguez

Alberto Dominguez

    Gurú

  • Administradores
  • 1.059 Mensajes:
  • LocationMadrid

Escrito 26 septiembre 2014 - 08:59

$file=Get-content 'C:\temp\dnsips\ips.txt'
foreach ($ip in $file)
{
    
    $hosts=Get-WmiObject -Namespace Root\MicrosoftDNS -Query "SELECT * FROM MicrosoftDNS_AType WHERE RecordData='$ip'" -Computer 'localhost' | select OwnerName -expandproperty OwnerName
    foreach ($item in $hosts)
    {
	write-host ($ip+';'+$item)
        write-output ($ip+';'+$item)
    }
}

Saludos,

Alberto Dominguez

Enterprise Architect y Trainer
MCT, MCPD, MCITP, MCITP Dynamics, MCSE, MCSA, MCTS, MCP...
ITIL V3 Foundation Qualification in IT Service Management
Imagen enviadaPerfil Profesional Imagen enviadaTwitter
Imagen enviadaImagen enviadaImagen enviadaImagen enviada

#3 Alberto Dominguez

Alberto Dominguez

    Gurú

  • Administradores
  • 1.059 Mensajes:
  • LocationMadrid

Escrito 26 septiembre 2014 - 09:48

Incluyendo la verificación también de CNAMEs que apuntan a Host A que apuntan a la IP indicada:

$computer='localhost'
$file=Get-content 'C:\temp\dnsips\ips.txt'
foreach ($ip in $file)
{
    $hosts=Get-WmiObject -Namespace Root\MicrosoftDNS -Query "SELECT * FROM MicrosoftDNS_AType WHERE RecordData='$ip'" -Computer $computer | select OwnerName -expandproperty OwnerName
    foreach ($item in $hosts)
    {
   $itemAux=$item+'.'
        $CNAMEs=Get-WmiObject -Namespace Root\MicrosoftDNS -Query "SELECT * FROM MicrosoftDNS_CNAMEType WHERE RecordData='$itemAux'" -Computer $computer | select OwnerName -expandproperty OwnerName
   if ($CNAMEs -ne $null)
        {
            foreach ($item2 in $CNAMEs)
            {
          write-host ($ip+';'+$item+';'+$item2)
          write-output ($ip+';'+$item+';'+$item2)
       }
        }
        else
        {
          write-host ($ip+';'+$item)
          write-output ($ip+';'+$item)
        }
    }
}

Saludos,

Alberto Dominguez

Enterprise Architect y Trainer
MCT, MCPD, MCITP, MCITP Dynamics, MCSE, MCSA, MCTS, MCP...
ITIL V3 Foundation Qualification in IT Service Management
Imagen enviadaPerfil Profesional Imagen enviadaTwitter
Imagen enviadaImagen enviadaImagen enviadaImagen enviada




0 usuarios están leyendo este tema

0 miembro/s, 0 invitado/s, 0 usuario/s anónimo/s