sambalec Posted December 15, 2009 Share Posted December 15, 2009 Hi, how can I find with autoit my Windows serial number, and another Windows informations ? Thanks a lot Sambalec Link to comment Share on other sites More sharing options...
funkey Posted December 15, 2009 Share Posted December 15, 2009 This is for the product key, i hope it works with your windows. What else do you need? You can get the most information with the WMI. Just search for it. expandcollapse popupConsoleWrite(_GetWinProductKey() & @CR) Func _GetWinProductKey() Local $bKey[15] Local $sKey[29] Local $Digits[24] Local $Value = 0 Local $hi = 0 local $n = 0 Local $i = 0 Local $Result Local $RegKey = "HKLM" If Not @OSArch = "X86" Then $RegKey = "HKLM64" $binaryDPID = RegRead($RegKey & "\SOFTWARE\Microsoft\Windows NT\CurrentVersion","DigitalProductID") $Test = @extended If Not @Compiled Then If $Test = 3 Then $binaryDPID = Hex($binaryDPID) EndIf $Digits = StringSplit("BCDFGHJKMPQRTVWXY2346789","") $binaryDPID = stringmid($binaryDPID,105,30) For $i = 1 to 29 step 2 $bKey[int($i / 2)] = dec(stringmid($binaryDPID,$i,2)) next For $i = 28 To 0 Step -1 If Mod(($i + 1), 6) = 0 Then $sKey[$i] = "-" Else $hi = 0 For $n = 14 To 0 Step -1 $Value = Bitor(bitshift($hi ,- 8) , $bKey[$n]) $bKey[$n] = int($Value / 24) $hi = mod($Value , 24) Next $sKey[$i] = $Digits[$hi +1] EndIf Next For $i = 0 To 28 $Result = $Result & $sKey[$i] Next Return $Result EndFunc Programming today is a race between software engineers striving tobuild bigger and better idiot-proof programs, and the Universetrying to produce bigger and better idiots.So far, the Universe is winning. Link to comment Share on other sites More sharing options...
sambalec Posted December 15, 2009 Author Share Posted December 15, 2009 Thanks ! but I have a problem, it's show me : BBBB-BBBB-BBBB-BBBB in console Link to comment Share on other sites More sharing options...
jvanegmond Posted December 15, 2009 Share Posted December 15, 2009 Thanks ! but I have a problem, it's show me : BBBB-BBBB-BBBB-BBBB in consoleYou probably have a pirated version of Windows. github.com/jvanegmond Link to comment Share on other sites More sharing options...
sambalec Posted December 15, 2009 Author Share Posted December 15, 2009 (edited) Sure, so thanks And how can I see the windows user in autoit ? Edited December 15, 2009 by sambalec Link to comment Share on other sites More sharing options...
jvanegmond Posted December 15, 2009 Share Posted December 15, 2009 Sure, so thanks And how can I see the windows user in autoit ?@UserName macro. See the help file. github.com/jvanegmond Link to comment Share on other sites More sharing options...
sambalec Posted December 15, 2009 Author Share Posted December 15, 2009 thanks again! Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now