‘ Change the Computers SNMP Description
strSNMPMod =     inputbox(“Enter a Computers SNMP Location”,””)
oshell.RegWrite “HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesSNMPParametersRFC1156AgentsysLocation”, strSNMPMod , “REG_SZ”
set oshell=nothing