Jump to content

Decoding EDID for Monitor Serial


Recommended Posts

Hey guys, i have started to write myself an auditing system in auto IT (needs to be customized)

As part of it, it needs to collect Serial Numbers from the system

i have been using the CompInfo UDFs from here:

http://www.autoitscript.com/forum/index.ph...=29404&st=0

But they dont seem to include a function for getting the serial of a Monitor

I also came across this (in my general net surfing)

http://www.hofferle.com/scripting/serial_numbers.html

Anyone have any idea how to get the same serial that the VB script reports via Auto IT ?

the VBS is way to big for me to tackle a conversion to AutoIT..

Eventual plan is to write it in coma delimited format.

anyone have any ideas?

so far, ive been grabbing the individual bits of info and just sending using MsgBox to ensure it is correct:

ie:

#Include <CompInfo.au3>

Dim $Processors, $BIOS, $SystemProduct, $monitor
; Get the the CPU Speed
_ComputerGetProcessors($processors)
MsgBox(0, "test", "Current Clock Speed: " & $Processors[1][9])
; Get the BIOS version
_ComputerGetBIOS($BIOS)
MsgBox(0, "BIOS", "Name: " & $BIOS[1][0] & @CRLF & _ "BIOS Version: " & $BIOS[1][3])
; Get the SYSTEM Serial
_ComputerGetSystemProduct($SystemProduct)
MsgBox(0, "test", "Name: " & $SystemProduct[1][0] & @CRLF & _ "Identifying Number: " & $SystemProduct[1][1])
Link to comment
Share on other sites

Well.. i have been poking and prodding at the vb script:

RunWait("WScript.exe "&'"'&@ScriptDir&"\MonitorSerial.vbs"&'"')
$File = FileOpen("C:\TEMP\MonitorSerial.txt", 0)
    If @Error = -1 Then
        MsgBox(16, "Error", "No MonitorSerial.txt file exists")
        Exit
    EndIf
$MonitorSerial = FileReadLine($File, 1)
FileClose($File)
FileDelete("C:\TEMP\MonitorSerial.txt")
MsgBox(16, "Monitor Serial", $MonitorSerial)
Exit

and the VBS file that needs to be in the same dir as it is attatched, keeping in mind, all i have done to the vbs file (as linked to above) is to comment out all of its echo statements (so it doesnt keep prompting me) and force it to write the line of text containing the serial to a text doco in c:\temp\monitorserial.txt this file is read from in the auto IT script and then deleted afterwards, the final produce will file/install the vbs file, run it, get the info it needs then fob the vbs file off as well.. a lot of effort to go to to get a simple job done, but its the only way i could get it to work...

now, if anyone can find a neater way (or someone who knows move about VBS than i do (which is recognising an echo statement)) and can perhaps provide me with just the part of the vbs file so i can do a conversion to auto IT i would be much appreciated..

Regards

/tAK

Edited by tAKTelapis
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...