Differenze tra le versioni di "Conoscere la distribuzione Linux montata"

Da Gambas-it.org - Wikipedia.
Riga 8: Riga 8:
 
  Public Sub Main()
 
  Public Sub Main()
 
   
 
   
  Dim s As String
+
   Print File.Load("/etc/issue.net")
    
 
  s = File.Load("/etc/issue.net")
 
 
 
  Print s
 
 
    
 
    
 
  End
 
  End
 
  
 
  Public Sub Main()
 
  Public Sub Main()
 
    
 
    
  Dim s As String
+
  Print Scan(File.Load("/etc/lsb-release"), "*DESCRIPTION=*\n")[1]
 
    
 
    
  s = Scan(File.Load("/etc/lsb-release"), "*DESCRIPTION=*\n")[1]
 
 
 
  Print s
 
 
 
 
  End
 
  End
 
  
 
  Public Sub Main()
 
  Public Sub Main()

Versione delle 04:29, 21 set 2023

Per conoscere il nome della distribuzione Linux da noi montata ed utilizzata, è sufficiente leggere all'interno di uno di seguenti file di sistema, presenti nella cartella "/etc":

/etc/lsb-release
/etc/issue
/etc/issue.net


Vediamo di seguito 3 possibili modalità:

Public Sub Main()

 Print File.Load("/etc/issue.net")
  
End
Public Sub Main()
 
 Print Scan(File.Load("/etc/lsb-release"), "*DESCRIPTION=*\n")[1]
 
End
Public Sub Main()

  Dim s As String
 
  s = Replace(File.Load("/etc/issue"), "\\", "\0")
  s = Scan(s, "*\0*")[0]
   
  Print s
  
End

Volendo si può aggiungere anche l'architettura:

Public Sub Main()

  Dim s As String
 
  s = Replace(File.Load("/etc/issue"), "\\", "\0")
  s = Scan(s, "*\0*")[0] & System.Architecture
   
  Print s
  
End