1. 程式人生 > >獲取磁盤空間及文件大小

獲取磁盤空間及文件大小

utf 文件的 Language action rip active onclick wid pac

<!DOCTYPE html>
<html>
    <head>
        <title>獲取磁盤和文件空間的大小</title>
        <meta charset="UTF-8">
        <meta name="viewport" content="width=device-width, initial-scale=1.0">
    </head>
    <body>
       <form name="form1" method="post" action="">
  盤        符:	
  <input type="text" name="text1">
<input type="button" name="Button1" value="磁盤空間" onclick="DriveSize(document.form1.text1)"><br><br>
文件大小:
<input type="text" name="text2">
<input type="button" name="Button1" value="文件大小" onclick="ShowFileData(document.form1.text2.value)" >
</form>
<script language="javascript">
<!--
function DriveSize(Drivename){
	var	fso=new ActiveXObject("Scripting.FileSystemObject");
	var	s=fso.GetDrive(Drivename.value);
	if (s.IsReady){
		var str,str1,AllSize=0.0;
		str="當前驅動器的名稱為:"+s.DriveLetter+"\n";
		AllSize=s.TotalSize/1024/1024/1024;
		str=str+"當前驅動器的大小為:"+parseInt(AllSize*10)/10+"\n";
		AllSize=s.FreeSpace/1024/1024/1024;
		str=str+"當前驅動器的可用空間為:"+parseInt(AllSize*10)/10;
		alert(str);
	}else
		alert("該驅動器無效。")
}
function ShowFileData(filespec){
	var fso, f, s;
    fso = new ActiveXObject("Scripting.FileSystemObject");
	f = fso.GetFile(filespec);
	s=f.type+"類型的"+f.name+"文件的大小為:"+(f.size)+"b";
	alert(s);
}

//-->
</script>

    </body>
</html>

  

獲取磁盤空間及文件大小