B4J Code Snippet Get UUID with jshell (Windows)

Tested On Windows Only./
Windows 7 - 8 - 8.1 - 10 - 11

Sub RunShellCommand


    Private shl As Shell
    Private params As List
    params.Initialize
    params.Add("/c")
    params.Add("WMIC CSProduct Get UUID")
    shl.Initialize("shl","cmd.exe",params)
    shl.WorkingDirectory =  "C:\Windows\system32"

    shl.Run(-1)
 
    Wait For shl_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)
    If Success And ExitCode = 0 Then
        Log("Success")
'        Log($" ${StdOut} "$)

        Dim st() As String = Regex.Split(CRLF,StdOut)
        Dim MyUUID As String = st(1)
        Log(MyUUID)

    Else
     
        Log("Error: " & StdErr)
     
    End If
 
End Sub

also u can check this ::

(b4j)[juuid] Get Unique hardware ID

Get Unique hardware ID in b4j tested on windows only you can test on mac or linux 8 method to get Unique hardware id How Use : Dim pdd As jUUID Log(pdd.Get_CPUID ) Log( pdd.Get_HddID1 ) Log( pdd.Get_HddID2 ) Log( pdd.Get_HddID3 ) Log( pdd.Get_HddID4("C") )...

www.b4x.com

 

[MathiasM]

Works good, but it's good to know that WMIC is deprecated in windows 10 since update 21H1.

 

[behnam_tr]

Works good, but it's good to know that WMIC is deprecated in windows 10 since update 21H1.

i tested on windows 7-8.1-11 and is ok
Have you tested on Windows 10 21h1 or 21h2?

 

[DonManfred]

I´ve tested it in 21H2 and it still works.

 

[mcqueccu]

Tested on Windows 11 - 21H2 (22000.469) and it works

 

[MathiasM]

i tested on windows 7-8.1-11 and is ok
Have you tested on Windows 10 21h1 or 21h2?

Yes yes, it will work on all Windows, deprecated means it will get deleted from a future Windows version. Just not yet.