Differenze tra le versioni di "Identificare univocamente un computer"

Da Gambas-it.org - Wikipedia.
Riga 7: Riga 7:
 
    
 
    
 
   Dim listaID as String[]
 
   Dim listaID as String[]
  Dim id As String
 
 
    
 
    
 
   listaID = Dir("<FONT Color=#B22222>/dev/disk/by-id</font>").Sort(gb.Ascent)
 
   listaID = Dir("<FONT Color=#B22222>/dev/disk/by-id</font>").Sort(gb.Ascent)

Versione delle 07:58, 8 ago 2020

Per identificare univocamente un computer si potrà adottare la soluzione di leggere il codiice identificativo dell'HDD. Infatti gli ID degli hard-disk sono univoci, per cui non è possibile trovare due ID identici (per lo meno quelli installati all'interno del pc, ma non quelli esterni usb che vengono gestiti da un proprio hardware).
Si leggerà, dunque, il primo file-device presente nella cartella di sistema "/dev/disk/by-id".


Vediamo un semplicissimo esempio pratico:

Public Sub Main()
 
 Dim listaID as String[]
 
 listaID = Dir("/dev/disk/by-id").Sort(gb.Ascent)
 
' Avendo ottenuto la lista degli HDD in modo ordinato, si sceglie il primo presente:
 Print listaID[0]
 
End