Open-AudIT https://www.open-audit.org/phpBB3/ |
|
Windows Audit Issues https://www.open-audit.org/phpBB3/viewtopic.php?f=5&t=4427 |
Page 2 of 2 |
Author: | Mark [ Sun Mar 06, 2011 12:24 am ] |
Post subject: | Re: Windows Audit Issues |
Find some VBScript code on the net to retrieve the keys you need and post it here. It just needs to be added to the audit script and output as per the other keys do. If you can't find what you need - what is the software that you need the keys for called ? |
Author: | djmohr [ Sun Mar 06, 2011 12:51 am ] |
Post subject: | Re: Windows Audit Issues |
@ mark I need it for AutoCAD LT 2010, AutoCAD LT 2011 and AutoCAD 2011 Civil 3D. All these apps are provided by Autodesk. |
Author: | Mark [ Mon Mar 07, 2011 9:47 am ] |
Post subject: | Re: Windows Audit Issues |
You will find the code for those (2010 at least) in the forums. Insert it into your audit script. I have now merged them all (as well as AutoCAD 2011) into the audit script for OAv2. An easy way to do it yourself is to inspect the registry on the machines in question, as per the code in the audit script. Just change the key locations and you should be fine. HINT - 2011 AutoCAD key strKeyPath = "SOFTWARE\Autodesk\AutoCAD\R18.1\ACAD-9001:409" subKey = "SerialNumber" |
Author: | djmohr [ Mon Mar 07, 2011 4:11 pm ] |
Post subject: | Re: Windows Audit Issues |
Awesome, I'll have a look. |
Author: | djmohr [ Mon Mar 07, 2011 9:57 pm ] |
Post subject: | Re: Windows Audit Issues |
nice one Mark I have added the code to my audit.vbs and it seems to be running fine, it just won't display the keys though, is there something else that needs changing? |
Author: | djmohr [ Mon Mar 07, 2011 9:59 pm ] |
Post subject: | Re: Windows Audit Issues |
oh, this is what I added to the audit.vbs: '''''''''''''''''''''''''''''''' ' Autocad 2010 LT '''''''''''''''''''''''''''''''' strKeyPath = "SOFTWARE\Autodesk\AutoCAD LT\R15\ACADLT-8001:409" name_xp = "Autocad 2010 LT" release_type = "" edition_type = "" path = strKeyPath subKey = "SerialNumber" oReg.GetStringValue HKEY_LOCAL_MACHINE,Path,subKey,key if IsNull(key) then else strOffXPRUKey = key form_input = "ms_keys^^^" & name_xp & "^^^" _ & strOffXPRUKey & "^^^" _ & release_type & "^^^" _ & edition_type & "^^^" _ & "autocad_2000" & "^^^" entry form_input,comment,objTextFile,oAdd,oComment strOffXPRUKey = "" release_type = "" edition_type = "" form_input = "" end if '''''''''''''''''''''''''''''''' ' Autocad 2011 LT '''''''''''''''''''''''''''''''' strKeyPath = "SOFTWARE\Autodesk\AutoCAD LT\R16\ACADLT-9001:409" name_xp = "Autocad 2011 LT" release_type = "" edition_type = "" path = strKeyPath subKey = "SerialNumber" oReg.GetStringValue HKEY_LOCAL_MACHINE,Path,subKey,key if IsNull(key) then else strOffXPRUKey = key form_input = "ms_keys^^^" & name_xp & "^^^" _ & strOffXPRUKey & "^^^" _ & release_type & "^^^" _ & edition_type & "^^^" _ & "autocad_2000" & "^^^" entry form_input,comment,objTextFile,oAdd,oComment strOffXPRUKey = "" release_type = "" edition_type = "" form_input = "" end if '''''''''''''''''''''''''''''''' ' Autocad Civil 3D '''''''''''''''''''''''''''''''' strKeyPath = "SOFTWARE\Autodesk\AutoCAD\R18.1\ACAD-9000:409" name_xp = "Autocad Civil 3D" release_type = "" edition_type = "" path = strKeyPath subKey = "SerialNumber" oReg.GetStringValue HKEY_LOCAL_MACHINE,Path,subKey,key if IsNull(key) then else strOffXPRUKey = key form_input = "ms_keys^^^" & name_xp & "^^^" _ & strOffXPRUKey & "^^^" _ & release_type & "^^^" _ & edition_type & "^^^" _ & "autocad_2000" & "^^^" entry form_input,comment,objTextFile,oAdd,oComment strOffXPRUKey = "" release_type = "" edition_type = "" form_input = "" end if Hoping it's right... |
Page 2 of 2 | All times are UTC + 10 hours |
Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |