Get information information in ASP

<%

Set objshell = creteObject ("wscript.shell") set objenv = objshell.environment ("system") response.write "

Number of processors:" & objenv ("Number_of_processors") & "
"DIM STREVFOR EACH Strev in Objenv Response.write Strevnext%>