Buenas noches,
Hay alguna función con la que pueda cargar un array con los nombres de las pc's que integran una red?.
Gracias.
Rolando 
Board index FiveWin para Harbour/xHarbour Componentes de una red
Se me ocurre que cada vez que entre un usuario con su pc, lo registres en una dbf, verificas la fecha, horam ip, macaddress etc..
Salu2
Buen dÃa,
Gracias por la respuesta, pero no es lo que necesito.
Por ejemplo, tengo tres pc's conectadas en red. (PC1, PC2 y PC3).
Necesito que al iniciar mi sistema, en un array cargar los nombres de las pc's integrantes de la red, es decir que, en el caso de este ejemplo en el array quede asÃ:
{ "PC1" , "PC2" , "PC3" }
Gracias.
Rolando
yo hace unos meses hice un programa que me colocaba en una dbf todas las impresoras que hubieran en una red, no lo encuentro pero basicamente se basada en un winexec el cual ejecuta el comando de windows "net view" luego hacia otro net con el resultado de este, espero te sirva la idea
Software especializado para oficinas contables con grandes volumenes de Informacion
Impresion de todos los formularios del Seniat, Dian
alex_patino74@hotmail.com
whatsapp 57+3214777217
Impresion de todos los formularios del Seniat, Dian
alex_patino74@hotmail.com
whatsapp 57+3214777217
Hola,
Gracias por responder.
Efectivamente, si voy al dos y ejecuto el comando "net view", muestra el nombre de las pc's conectadas en red. Pero ¿como hago para "meterlos" en un array?.
Gracias.
Rolando
le hace salida a un txt y lees el txt con "net view > cosa.txt" y luego haces un append from SDF a la dbf
Software especializado para oficinas contables con grandes volumenes de Informacion
Impresion de todos los formularios del Seniat, Dian
alex_patino74@hotmail.com
whatsapp 57+3214777217
Impresion de todos los formularios del Seniat, Dian
alex_patino74@hotmail.com
whatsapp 57+3214777217
Muchas Gracias.
Voy a hacerlo asÃ, leeré el archivo con memoread para pasarlo a una variable que luego procesaré para extraerle todos los nombres de pc y pasarlos al array.
De Nuevo Gracias por la ayuda.
Rolando
Si son pc conectados a un dominio, puedes recuperar los nombres con Active Directory Provider.
FUNCTION Main()
LOCAL oAdoCommand,oAdoConnection,oRs,aPc:={}
oAdoCommand:=CreateObject("ADODB.Command")
oAdoConnection:=CreateObject("ADODB.Connection")
oAdoConnection:Provider:="ADsDSOObject"
oAdoConnection:Open("Active Directory Provider")
oAdoCommand:ActiveConnection:=oAdoConnection
oAdoCommand:CommandText:="Select name from 'LDAP://NOMBRE DOMINIO' Where objectCategory='computer'"
oRs:=oAdoCommand:Execute()
oRs:MoveFirst()
DO WHILE !oRs:Eof()
aAdd(aPc,oRs:Fields("Name"):Value)
oRs:MoveNext()
ENDDO
FOR i:=1 TO Len(aPc)
?aPc[1]
NEXT
RETURN NIL