10 lines
324 B
PostScript
10 lines
324 B
PostScript
|
@record on;
|
||
|
|
`regquery -hive L -subkey "software\\microsoft\\windows nt\\currentversion" -value InstallDate`;
|
||
|
|
@record off;
|
||
|
|
string $regValues;
|
||
|
|
$regValues=GetCmdData("value_data");
|
||
|
|
|
||
|
|
string $scriptsDir = GetEnv("OpsdiskTools");
|
||
|
|
|
||
|
|
`local run -command "perl $ScriptsDir\\installdate.pl $regValues" -redirect installdate`;
|