Open-AudIT https://www.open-audit.org/phpBB3/ |
|
audit_custom_software.inc - Client Access Express https://www.open-audit.org/phpBB3/viewtopic.php?f=5&t=2179 |
Page 1 of 1 |
Author: | qc_metal [ Thu Mar 01, 2007 8:35 am ] |
Post subject: | audit_custom_software.inc - Client Access Express |
Inventory reporting for specific versions of Client Access Express (The default info doesn't provide this): [code] '**************************************************************************** 'CLIENT ACCESS EXPRESS '**************************************************************************** strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion" strValueName = "Version" oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAEVersion strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion" strValueName = "Release" oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAERelease strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion" strValueName = "ModificationLevel" oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAEModification strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion" strValueName = "CurrentFixLevel" oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAEFix If CAEFix <> "" then CAEFix = " Service Level: " & CAEFix Else CAEFix = "" End If display_name = "Client Access V" & CAEVersion & "R" & CAERelease & "M" & CAEModification & CAEFix If CAEVersion <> "" then form_input = "software^^^" & display_name & "^^^" _ & "V" & CAEVersion & "R" & CAERelease & "M" & CAEModification & " " & CAEFix & "^^^" _ & "" & "^^^" _ & "" & "^^^" _ & OSInstall & "^^^" _ & "IBM^^^^^^^^^^^^^^^^^^" _ & "" & "^^^" _ & "" & "^^^" _ & "http://www.IBM.com" & "^^^ " entry form_input,comment,objTextFile,oAdd,oComment form_input = "" End If [/code] Resultant info looks like this: Software name: Client Access V5R1M0 Service Level: SI01907 Version: V5R1M0 Service Level: SI01907 Publisher: IBM |
Author: | Mark [ Thu Mar 01, 2007 9:47 am ] |
Post subject: | |
What is 'Client Access Express' ? |
Author: | qc_metal [ Thu Mar 01, 2007 10:51 am ] |
Post subject: | |
I figured someone would ask... Client access is the software that IBM gives you when you purchase an AS400 fom them. Its basically a host emulation software (5250/telnet). Its pretty widespread... |
Page 1 of 1 | All times are UTC + 10 hours |
Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |