<script>
function ShowDriveList(){
var fso, s, n, e, x; // 声明变量。
fso = new ActiveXObject("Scripting.FileSystemObject");
e = new Enumerator(fso.Drives); // 在驱动器上创建 Enumerator。
s = "";
for (;!e.atEnd();e.moveNext()) // 枚举驱动器集合。
{
x = e.item();
s = s + x.DriveLetter;
s += " - ";
if (x.DriveType == 3) // 查看是否网络驱动。
n = x.ShareName; // 获取共享名。
else if (x.IsReady) // 查看驱动器是否已就绪。
n = x.VolumeName; // 获取卷名。
else
n = "[驱动器未就绪]";
s += n + "<br>";
}
return(s); // 返回活动驱动器列表。
}
document.write(ShowDriveList());
</script>