Differenze tra le versioni di "Ottenere la distribuzione di Linux montata, il tipo di architettura e la versione del kernel"
Da Gambas-it.org - Wikipedia.
Riga 3: | Riga 3: | ||
Dim s As String | Dim s As String | ||
+ | Dim c As Short | ||
− | s = | + | s = File.Load("/etc/issue.net") <FONT Color=gray>' ''In alcune distribuzioni il percorso del file potrebbe essere:'' "'''/etc/issue'''"</font> |
+ | If c > 0 Then s = Left(File.Load("/etc/issue"), c - 1) & gb.NewLine | ||
+ | |||
+ | s = "Sistema Operativo: " & s | ||
s &= "Architettura: " & System.Architecture | s &= "Architettura: " & System.Architecture | ||
s &= "\nKernel: " & Scan(File.Load("/proc/version"), "*(*")[0] | s &= "\nKernel: " & Scan(File.Load("/proc/version"), "*(*")[0] |
Versione attuale delle 17:49, 14 gen 2024
Per conoscere la distribuzione di Linux montata, il tipo di architettura e la versione del kernel utilizzato sulla propria macchina, si può adottare il seguente codice:
Public Sub Main() Dim s As String Dim c As Short s = File.Load("/etc/issue.net") ' In alcune distribuzioni il percorso del file potrebbe essere: "/etc/issue" If c > 0 Then s = Left(File.Load("/etc/issue"), c - 1) & gb.NewLine s = "Sistema Operativo: " & s s &= "Architettura: " & System.Architecture s &= "\nKernel: " & Scan(File.Load("/proc/version"), "*(*")[0] Print s End