Changing HKCU on a per user basis

[ikkyusan]

Hello....

I currently use a login script to change specfic HKCU values for each user. This is for use of a piece of software which requires unique serial numbers per user.

I use 1 script per user & this is increasing daily is it possible to consolodate these scripts into 1?? i.e. having a script that referneces some kind of look up table containing all the serial information based on the %username%

below is a copy of the current script

<job id="setserial">
<script language="vbscript">

set myobject=wscript.createobject("wscript.shell")

myobject.RegWrite "HKCU\Software\Random\item\3.0\Security\iSerialNumber", "1234567"
myobject.RegWrite "HKCU\Software\Random\item\3.0\Security\SerialTemp", "1234567"
myobject.RegWrite "HKCU\Software\Random\item\3.0\Security\sActivationKey", "1234567"
myobject.RegWrite "HKCU\Software\Random\item\3.0\Security\KeyTemp", "1234567"
myobject.RegWrite "HKCU\Software\Random\item\3.0\Security\sName", "A User"
myobject.RegWrite "HKCU\Software\\Random\3.0\Security\sCompany", "xxxxxxxxxx"

set myobject = nothing

</script>
</job>