lista de PCs en LAN?

Si estás usando la versión VFP7.0 o en adelante, puedes investigar la
función ANETRESOURCES()


Víctor Brasó
Desarrollador independiente

"Ducky" escribió en el mensaje
news:

Como se puede obtener una lista de las PCs en LAN ?

Muchas gracias,

Acabo de hacer prueba y se tarda mucho. Es normal?
(se inhibe el vfp hasta que la funcion retorna el resultado...)

Que se puede hacer para que no se "trabe" ?

Como se trabaja con las funciones API de Win32 WNetOpenEnum y WNetEnumResource ???

Saludote.


"Victor B." escribió en el mensaje
news:%

Si estás usando la versión VFP7.0 o en adelante, puedes investigar la
función ANETRESOURCES()


Víctor Brasó
Desarrollador independiente

"Ducky" escribió en el mensaje
news:

Como se puede obtener una lista de las PCs en LAN ?

Las unidades tienen que estar mapeadas en el PC.

objWMI = Getobject("winmgmts:\\")
cCadWMI = "Select * from Win32_MappedLogicalDisk"
objUnd = objWMI.ExecQuery(cCadWMI)

For Each oDisk In objUnd
? "Device ID: " + oDisk.DeviceID
? "Nombre: " + oDisk.Name
? "Espacio Libre: " + Transform(oDisk.FreeSpace)
? "Tamaño: " + Transform(oDisk.Size)
? "* * * * * * *"
Next
"Ducky" escribió en el mensaje
news:

Como se puede obtener una lista de las PCs en LAN ?