如何检查哪个盘是光驱动,系统环境变量

[peterpansh]

如何检查哪个盘是光驱动,系统环境变量

[ttyp]

<script language="JavaScript">
<!--
function ShowDriveType(drvpath)
{
var fso, d, s, t;
fso = new ActiveXObject("Scripting.FileSystemObject");
d = fso.GetDrive(drvpath);

switch (d.DriveType)
{
case 0:
t = "Unknown";
break;
case 1:t = "Removable"; break;
case 2:t = "Fixed"; break;
case 3:t = "Network"; break;
case 4:t = "CD-ROM"; break;
case 5:t = "RAM Disk"; break;

}

s = "Drive " + d.DriveLetter + "：- " + t;
return(s);
}

alert(ShowDriveType("g:\\"));
//-->
</script>