秀外慧中小说 蓝惜月:请问这是什么？

该网页脚本具有以下行为:
>> 写注册表
======================
脚本内容:
BiosQuery();
function BiosQuery()
{
var UNKNOWN= "Unknown"
var err="<NONE>";
var query = "Select Vendor, IdentifyingNumber,Version,Name, UUID From Win32_ComputerSystemProduct";
var ServiceSet=new Enumerator(GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery(query));
try
{
var prop = ServiceSet.item();
var serial = UNKNOWN;
serial = prop.IdentifyingNumber;
}
catch(e){ err=e.description;/*if it fails var will be assigned the default value*/}
try
{
var UUID = UNKNOWN;
UUID = prop.UUID;
}
catch(e){ err=err+" "+description;/*if it fails var will be assigned the default value*/}
try
{
var product = UNKNOWN;
product = prop.Name;
}
catch(e){err=err+" "+e.description;/*if it fails var will be assigned the default value*/}
try
{
var version = UNKNOWN;
version = prop.Version;
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
try
{
var manufacturer = UNKNOWN;
manufacturer = prop.Vendor;
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
var regkey = "HKCU\\Software\\Hewlett-Packard\\DMI\\";
var shell = WScript.CreateObject("WScript.Shell");
try
{
shell.RegWrite(regkey+"Serial",prop.IdentifyingNumber);
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
try
{
shell.RegWrite(regkey+"Product",prop.Name);
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
try
{
shell.RegWrite(regkey+"Version",prop.Version);
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
try
{
shell.RegWrite(regkey+"Manufacturer",prop.Vendor);
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
try
{
shell.RegWrite(regkey+"BS",prop.Vendor+" "+prop.Name+" "+prop.IdentifyingNumber+" "+prop.Version);
shell.RegWrite(regkey+"UUID",prop.UUID);
}
catch(e){err=err+" "+e.description/*if it fails var will be assigned the default value*/}
var fs, a, ForAppending;
ForAppending = 2;
fs = new ActiveXObject("Scripting.FileSystemObject");
var temp = shell.ExpandEnvironmentStrings("%temp%");
a = fs.OpenTextFile(temp+"\\"+"debugf.txt", ForAppending, true);
if (err !="<NONE>")
a.WriteLine("Error="+err);
a.WriteLine("serial="+serial);
a.WriteLine("manufacturer="+manufacturer);
a.WriteLine("product="+product);
a.WriteLine("version="+version);
a.WriteLine("UUID="+UUID);
a.Close();