You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
11 lines
259 B
11 lines
259 B
<Job ID="Test">
|
|
<script language=PerlScript runat=server>
|
|
$Shell = $WScript->CreateObject("WScript.Shell");
|
|
|
|
$vars = $Shell->Environment("SYSTEM");
|
|
|
|
foreach $item (Win32::OLE::in($vars)) {
|
|
$WScript->Echo($item);
|
|
}
|
|
</script>
|
|
</Job>
|