ORDENADORES EN RED

Ya hay productos que te hacen eso. Y economicos no te
jodas la vida.





Miao...

Ya hice la pregunta antes, y gracias al que me respondio

como buscar

ordenadores que tienen el sqlserver.
Mi pregunta es como hacer una espiece de 'MIS SITIOS DE

RED', donde yo vea

todos los equipos de mi grupo de trabajo, ya tengan o no

sqlserver.

.

Ya hice la pregunta antes, y gracias al que me respondio como buscar
ordenadores que tienen el sqlserver.
Mi pregunta es como hacer una espiece de 'MIS SITIOS DE RED', donde
yo vea todos los equipos de mi grupo de trabajo, ya tengan o no
sqlserver.

Agrega la referencia a System.DirectoryServices y usa este codigo:

Dim domain As New DirectoryServices.DirectoryEntry("WinNT://DOMINIO")
Dim computadoras As DirectoryServices.DirectoryEntries
Dim computadora As DirectoryServices.DirectoryEntry

computadoras = domain.Children
computadoras.SchemaFilter.Add("Computer")

For Each computadora In computadoras
MessageBox.Show(computadora.Name)
Next

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

¿Y como puedo saber el nombre de DOMINIO?.


"Eduardo A. Morcillo [MS MVP VB]" <emorcilloATmvps.org> escribió en el
mensaje news:%

> Ya hice la pregunta antes, y gracias al que me respondio como buscar
> ordenadores que tienen el sqlserver.
> Mi pregunta es como hacer una espiece de 'MIS SITIOS DE RED', donde
> yo vea todos los equipos de mi grupo de trabajo, ya tengan o no
> sqlserver.

Agrega la referencia a System.DirectoryServices y usa este codigo:

Dim domain As New DirectoryServices.DirectoryEntry("WinNT://DOMINIO")
Dim computadoras As DirectoryServices.DirectoryEntries
Dim computadora As DirectoryServices.DirectoryEntry

computadoras = domain.Children
computadoras.SchemaFilter.Add("Computer")

For Each computadora In computadoras
MessageBox.Show(computadora.Name)
Next

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

¿Y como puedo saber el nombre de DOMINIO?.

System.Environment.UserDomainName

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Pero de esa manera me da el nombre de mi ordenador, pero no el del dominio
de red que supongo que hay que darle en:

Dim domain As New DirectoryServices.DirectoryEntry("WinNT://DOMINIO")

"Eduardo A. Morcillo [MS MVP VB]" <emorcilloATmvps.org> escribió en el
mensaje news:

> ¿Y como puedo saber el nombre de DOMINIO?.

System.Environment.UserDomainName

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo