Multi-OEM/Retail Project {MRP} - Mk3

Discussion in 'MDL Projects and Applications' started by mxman2k, Oct 15, 2016.

  1. Carlos Detweiller

    Carlos Detweiller Emperor of Ice-Cream

    Dec 21, 2012
    5,723
    6,280
    180
    win7_1.png
     
  2. Dubioza Kolektiv

    Dubioza Kolektiv MDL Addicted

    Dec 27, 2012
    831
    1,401
    30
  3. Carlos Detweiller

    Carlos Detweiller Emperor of Ice-Cream

    Dec 21, 2012
    5,723
    6,280
    180
    #9263 Carlos Detweiller, Nov 16, 2022
    Last edited: Nov 16, 2022
    Seems the order is a bit off. Maybe they could be sorted after the drive letter?
     
  4. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    #9264 mxman2k, Nov 17, 2022
    Last edited: Nov 17, 2022
    (OP)
    I not know how to do that, it is a converted VBScript with a bit of adjustments for AutoIT coding..

    On my tests it was in the right order C: -> Z: but for some reason it has the order odd as you mention, it maybe because the first one is port 1 (SATA1) and if the boot drive is not on that port ie C: usually then it showing the order in which the drives are setup? Or the BIOS order for booting is changed?

    Will investigate as the results are placed into a array[xx] and i might be able to sort them - not used arrays much so that be something new for me to play with :D

    Was thinking about the model name, to keep the layout neat (to the 25 char max) to pad the string out if less than 25 chars?

    * Padding to 25/50 chars looks ok, keeps things uniform. :)

    Code:
    F: | Disk #1, Partition #0 | WDC WD40EFRX-68N32N0                               | 3725.9 GB
    D: | Disk #0, Partition #0 | ST2000DM001-1E6164                                 | 1863.01 GB
    C: | Disk #2, Partition #1 | KINGSTON SA2000M8250G                              | 232.26 GB
    The order from my experience is that my C: is a NVMe, the others are spinners, D: is connected to SATA0 port and F is SATA1 port. If anyone knows how to sort in vbscript i can convert over. No PShell code as that a pita at most :D
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  5. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    Code:
    strComputer = "."
    Set wmiServices = GetObject _
        ("winmgmts:{impersonationLevel=Impersonate}!//" & strComputer)
    
    Set wmiDiskDrives = wmiServices.ExecQuery _
        ("SELECT Caption, DeviceID FROM Win32_DiskDrive")
     
    For Each wmiDiskDrive In wmiDiskDrives
        WScript.Echo wmiDiskDrive.Caption & " (" & wmiDiskDrive.DeviceID & ")"
        strEscapedDeviceID = Replace _
            (wmiDiskDrive.DeviceID, "\", "\\", 1, -1, vbTextCompare)
        Set wmiDiskPartitions = wmiServices.ExecQuery _
            ("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & _
        strEscapedDeviceID & """} WHERE AssocClass = " & _
            "Win32_DiskDriveToDiskPartition")
     
        For Each wmiDiskPartition In wmiDiskPartitions
            WScript.Echo vbTab & wmiDiskPartition.DeviceID
            Set wmiLogicalDisks = wmiServices.ExecQuery _
                ("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & _
                    wmiDiskPartition.DeviceID & """} WHERE AssocClass = " & _
                        "Win32_LogicalDiskToPartition")
     
            For Each wmiLogicalDisk In wmiLogicalDisks
                WScript.Echo vbTab & vbTab & wmiLogicalDisk.DeviceID
            Next
        Next
    Next
    Code:
    ; Get Drive partition Info
    Local $wbemFlagReturnImmediately = 16
    Local $wbemFlagForwardOnly = 32
    Local $cld = 0,$DriveInfo[155],$DriveInfo2[155]
    Local $IFlags = $wbemFlagReturnImmediately + $wbemFlagForwardOnly
    Local $wmiServices = objget ("winmgmts:root\cimv2")
    Local $wmiDiskDrives = $wmiServices.ExecQuery("SELECT Caption, DeviceID, Size FROM Win32_DiskDrive","WQL", $IFlags)
    
        For $wmiDiskDrive In $wmiDiskDrives
    
            Local $strEscapedDeviceID = StringReplace($wmiDiskDrive.DeviceID, "\", "\\")
            Local $wmiDiskPartitions = $wmiServices.ExecQuery ("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & $strEscapedDeviceID & """} WHERE AssocClass = " & "Win32_DiskDriveToDiskPartition")
    
            For $wmiDiskPartition In $wmiDiskPartitions
                $wmiLogicalDisks = $wmiServices.ExecQuery ("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & $wmiDiskPartition.DeviceID & """} WHERE AssocClass = " & "Win32_LogicalDiskToPartition")
    
                For $wmiLogicalDisk In $wmiLogicalDisks
                    $cld = $cld + 1
                    $DriveInfo[$cld] = $wmiLogicalDisk.DeviceID & " | " & $wmiDiskPartition.DeviceID & " | " & StringLeft($wmiDiskDrive.Caption,25) & " | " & Round($wmiDiskPartition.Size/1024/1024/1024,2) & " GB"
                    $DriveInfo2[$cld] = $wmiLogicalDisk.DeviceID & " | " & $wmiDiskPartition.DeviceID & " | " & StringLeft($wmiDiskDrive.Caption,50) & " | " & Round($wmiDiskPartition.Size/1024/1024/1024,2) & " GB"
                Next
    
            Next
    
        Next

    Took me a few attempts to convert it as some vbscript commands/syntax is not same in AutoIT, such as the string replace but worked it out after getting no results.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  6. Carlos Detweiller

    Carlos Detweiller Emperor of Ice-Cream

    Dec 21, 2012
    5,723
    6,280
    180
    If it can't be sorted, it's still much better than before (nothing). :)

    It also shows connected USB drives at the time of running it.
     
  7. Enthousiast

    Enthousiast MDL Tester

    Oct 30, 2009
    42,845
    78,864
    450
    #9267 Enthousiast, Nov 17, 2022
    Last edited: Nov 17, 2022
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  8. Enthousiast

    Enthousiast MDL Tester

    Oct 30, 2009
    42,845
    78,864
    450
    After:
    Code:
    -------------------------------------------------------------------------------------------------------------------
                                                 Query Tool GUI v0.10.2.16
    -------------------------------------------------------------------------------------------------------------------
    
    Log Date {UTC}: 11/17/2022 -- 13:09 {24-hour}
    
    Some results may be shortened to fit the output stage, such as RAM information.
    
    This is the postable report that does not contain full serial or sensitive information.
    
    GUI Font Used : Lucida Console Size: 11
    
    ===================================================================================================================
                                                 Operating System Information
    ===================================================================================================================
    Installation Type               : Client
    Name                            : Microsoft Windows 10 Home
    OS/CPU Architecture             : CPU and OS is 64 bit
    Build                           : 10.0.19045 {UBR:2311} {22H2}
    Language                        : Nederlands (Nederland)
    Native Language                 : Nederlands
    Installed/Available Languages   : nl-NL
    Stock Keeping Unit {SKU}        : 101
    Experience Pack                 : 120.2212.4190.0
    Installation Date               : 2/28/2021 at 15:52 PM {UTC}
    Shipped with Reserved 7GB       : No
    Dirty Shutdown Count            : 1
    Build Branch                    : vb_release
    Product ID                      : 00326-10000-00000-AA151  {Extended: 03612-03261-000-000000-00-1043-19042.0000-0592021}
    TimeZone {TZUtil}               : W. Europe Standard Time
    Hours offset from GMT           : 1
    Daylight Saving In Effect       : No
    Daylight Adjust Clock Mode      : Enabled/Checked
    Hypervisor Present              : No
    Virtual Machine Data            : This computer does not appear to be a virtual machine
    
    Windows Key 1 Installed         : 8HVX7 (Last 5 digits shown)
    Windows DpID4 Installed         : 8HVX7 (Last 5 digits shown)
    Windows Default Installed       : 8HVX7 (Last 5 digits shown)
    Windows Default4 Installed      : 8HVX7 (Last 5 digits shown)
    
    TPM Information                 : N/A
    
    ===================================================================================================================
                                      System Drive C: Partition Information
    ===================================================================================================================
    Drive Type                      : SSD
    BUS Type                        : Serial ATA (SATA)
    Total Space                     : 399.84 GB
    Free Space                      : 319.47 GB
    Partition Type                  : GPT
    Firmware Boot Type              : UEFI Mode {R:1}
    Secure Boot Status              : Disabled [Ref:1]
    File System                     : NTFS
    Model Name                      : ADATA SU900
    
    Disk and Partition Information  : Driveletter | Disk #, Partition # | Model Name {50 Chars max} | Size 'GB'
                                    : H: | Disk #1, Partition #0 | JetFlash Transcend 8GB USB Device | 7.04 GB
                                    : C: | Disk #0, Partition #2 | ADATA SU900 | 399.84 GB
                                    : D: | Disk #0, Partition #3 | ADATA SU900 | 288.11 GB
    
    ===================================================================================================================
                                              Memory Information                                                      
    ===================================================================================================================
    Total Physical                  : 4116760 KB (3.93 GB)
    Available Physical              : 1868132 KB (1.78 GB)
    Total Page Size                 : 4837656 KB (4.61 GB)
    Available Page Size             : 2534992 KB (2.42 GB)
    Total Virtual Size              : 4194176 KB (4 GB)
    Available Virtual               : 4034072 KB (3.85 GB)
    Memory Type                     : DDR3
    Memory Error Correction         : Non-ECC
    Memory Slots Fitted             : 4
    DIMM Information {First Four}   : DIMM1 4096MB @ 1600MHz
    
    ===================================================================================================================
                                              Graphics Information                                                    
    ===================================================================================================================
    Adaptor Name                    : Intel(R) HD Graphics 4600
    Adaptor DACType                 : Internal {iGPU}
    Adaptor Driver Information      : 20.19.15.5126 {2020/01/21}
    Adaptor Status                  : Active
    
    Adaptor Name                    : Not Detected
    Adaptor DACType                 : N/A
    Adaptor Driver Information      : N/A
    Adaptor Status                  : Inactive
    
    Virtual Desktop Resolution      : 1600 x 900
    Bits Per Pixel                  : 32
    Video Mode Description          : 1600 x 900 x 4294967296 kleuren {Ref:1}
    
    Some values may not be accurate due to 32 bit API limitations.
    For accurate VRam use DxDiag or other tool.
    
    ===================================================================================================================
                                            Network Adaptor Information                                              
    ===================================================================================================================
    Adaptor 1 Name                  : Qualcomm Atheros AR8161 PCI-E Gigabit Ethernet Controller (NDIS 6.30)
    Connection Status               : Connected
    
    Adaptor 2 Name                  : Qualcomm Atheros AR946x Wireless Network Adapter
    Connection Status               : Media Disconnected
    
    ===================================================================================================================
                                              Processor 1 Information                                                
    ===================================================================================================================
    Name                            : Intel(R) Core(TM) i3-4000M CPU @ 2.40GHz
    Architecture  {Bits}            : 64
    L2 Cache Size {KB}              : 256
    L3 Cache Size {KB}              : 3072
    Current Speed {MHz}             : 2400
    Physical Cores                  : 2
    Logical Cores                   : 4
    Processor Id                    : BFEBFBFF000306C3
    Virtualization Mode             : Enabled
    Manufacturer                    : GenuineIntel [Intel]
    Description                     : Intel64 Family 6 Model 60 Stepping 3
    
    ===================================================================================================================
                                                 DMI/BIOS Information                                                
    ===================================================================================================================
    System Manufacturer             : TOSHIBA
    System Product Name             : SATELLITE PRO C70-A
    BaseBoard Manufacturer          : Type2 - Board Vendor Name1
    BaseBoard Product               : Type2 - Board Product Name1
    BaseBoard Version               : Type2 - Board Version
    
    BIOS Vendor                     : Insyde Corp.
    BIOS Release Date               : 11/04/2013
    BIOS Version                    : 1.50
    Primary BIOS                    : True
    SMBIOS Present                  : True
    SMBIOS Version                  : 2.7
    SLIC/BIOS Data                  : TOSQCI - 1
    
    Valid SLIC Name                 : Toshiba
    Possible Brand Theme            : Toshiba {System Manufacturer}
    
    SLIC Table Status               : SLIC table with valid marker present  {v2.1}
    Emulated SLIC                   : Not required/used for this OS
    
    MSDM Key Description            : TOSQCI|Toshiba
    MSDM Key Detected               : GMRWQ (Last 5 digits shown)
    MSDM Key OS Version/Edition     : Win 8.1 Core
    
    ===================================================================================================================
                                              Miscellaneous Information                                              
    ===================================================================================================================
    Which MRP Version Used          : N/A
    
    Wallpaper Style                 : Fill image to display resolution
    Current Theme Used              : Custom.theme
    
    Installed Dot Net Frameworks    : 2.0  3.0  3.5  4.8  4.0
    Installed Powershell Versions   : 1.0, 2.0, 3.0, 4.0, 5.0, 5.1
    
    Security Product Name{s}        : Windows Defender
    Defender Tamper Protection      : Enabled
    Defender Service Status         : Auto
    Windows Firewall Service State  : Running {Reg: Auto}
    
    Windows Activation Status       : Activated
    Windows Licence Reason          : Valid key was used for the product's licensing channel
    Windows Product Key Channel     : Retail {RETAIL} with HWID {R:PKC}
    Device has KMS Enabled          : No
    KMS Auto Renewal (hook)         : Yes
    
    MS Office {MSI/Traditional}     : 2016/2019
    C2R MS Office                   : Office 16, VOLUME_KMSCLIENT channel
    C2R Excluded Apps               : N/A
    C2R Last Update Channel         : N/A
    C2R Office Activation Status    : Licensed
    C2R Partial Product Key         : WFG99
    Office Reason Information       : No reason information to show/No Issues
    Office MAK/KMS Information      : Automatically re-activates in 179 Days / 259155 minutes
    
    -------------------------------------------------------------------------------------------------------------------
    
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  9. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    It shows any drive that has a letter detected.

    USB ones shown could be a memory stick or external HDD unit, i not know enough on how to distinguish or filter which as the code was just a simple detect and show.

    Have tried to sort the list from C: to Z: but it got way too complicated and i gave up. So it is what it is.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  10. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    On the saved reports a bit more info added for the storage section...

    But in the GUI it will still be the shortened version as it wont fit.

    This will hopefully clear up why the list can be out of place.
    Code:
    Disk and Partition Information  : Driveletter | Disk #, Partition # | Model Name {50 Chars max} | Size 'GB'
    \\.\PHYSICALDRIVE0                C: | Disk #0, Partition #1 | TAISU SSD 120G                                     | 86.81 GB
    \\.\PHYSICALDRIVE0                D: | Disk #0, Partition #2 | TAISU SSD 120G                                     | 24.41 GB
    \\.\PHYSICALDRIVE1                E: | Disk #1, Partition #0 | TOSHIBA MQ01ABD100                                 | 931.51 GB
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  11. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    #9271 mxman2k, Nov 17, 2022
    Last edited: Nov 17, 2022
    (OP)
    Uploaded .17 GUI QT with the above changes to the saved reports so it shows the physicaldriveXX. :)

    Post #3 updated.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  12. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    The results are shown as VideoAdapter1 ,2 3 etc so i guess the parsec was set as 1.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  13. Dubioza Kolektiv

    Dubioza Kolektiv MDL Addicted

    Dec 27, 2012
    831
    1,401
    30
    [​IMG]
     

    Attached Files:

    • 1.JPG
      1.JPG
      File size:
      82.4 KB
      Views:
      100
  14. tcntad

    tcntad MDL Guru

    Oct 26, 2009
    4,350
    1,435
    150
    Yea I believe so also somehow, parsec is only used for remote desktop/streaming games over LAN/WAN
     
  15. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    I would of thought the intel one be primary.

    Although the parsec is set as inactive, intel is active.

    As we know windows does some weird things.

    I was going to have the active one first/top, but decided to just let the video adapter 1 be first as i thought that technically be the active one but it seems windows does its own thing!
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  16. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    Another strange thing is wmic results can sometimes be slightly different to wmi calls be it in vbscript or even pshell as was evident when i tried to get vram data.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  17. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    Im happy i got the gui qt up and running as it looks polished and neater, (once i get alignments right), plus it gives me a challenge and a change of direction.

    Another side effect is some of the new coding can be used in mrp too as the new method has better results or faster than previous ways.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  18. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    As my health has gone down a bit recently i have to force myself to do things, this drains me so i not able to spend as many hours on coding as i used to.

    So i now turn off the pc at a certain time and watch tv to wind down this is why my replies are late as i log in on my phone on the tv advert breaks :D
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  19. mxman2k

    mxman2k MDL Developer

    Jun 20, 2007
    4,897
    15,965
    150
    A bit more added to the GUI QT :whistling:
    Code:
    Upgrade or Clean Installation   : Upgraded on 2/14/2022 {UTC}
    Previous OS Upgraded From       : Windows 7 Home Premium
    If not a upgrade or a clean installation:
    Code:
    Upgrade or Clean Installation   : Clean
    Previous OS Upgraded From       : N/A
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...