ƯÁ¤ µð½ºÅ© µå¶óÀ̺곪 ³×Æ®¿öÅ© °øÀ¯ ¼Ó¼º¿¡ ¾×¼¼½ºÇÒ ¼ö ÀÖ´Ù.
![]() |
Script |
[propVal=]..propName; ..methodName(parameters); |
| HTML | ¾ø´Ù. |
Çʼö ¿ä¼Ò·Î È£ÃâµÈ Drive °³Ã¼ÀÌ´Ù.
ActiveXObject¸¦ Ȱ¼ºÈ½Ã۰í GetDrive ¸Þ¼µåµîÀ¸·Î ½Ã½ºÅÛÀÇ Drive °³Ã¼¸¦ È£Ãâ ÇÑ´Ù.
propertyNameÀº ¾Æ·¡ ¼³¸íµÈ ¼Ó¼ºµé Áß ÇϳªÀÌ´Ù.
Drive °³Ã¼¸¦ »ç¿ëÇÏ¿© µå¶óÀÌºê ¼Ó¼º¿¡ ¾×¼¼½ºÇÏ´Â ¿¹Á¦
<SCRIPT language=JScript> function DriveTest(drivePath){ var fso,driveObj,str; fso=new ActiveXObject('Scripting.FileSystemObject') driveObj=fso.GetDrive(fso.GetDriveName(drivePath)); str='µå¶óÀ̺ê '+drivePath+' - '+driveObj.VolumeName +'<BR>'; str+='»ç¿ë °¡´ÉÇÑ °ø°£: '+driveObj.FreeSpace /1024+'KB'; return(str); } </SCRIPT> <DIV id=showjs class=show alt="°á°ú">°á°ú Ç¥½Ãâ</DIV> <DIV class=show onClick="id=showjs.innerHTML=DriveTest('C:\\')"> <SPAN class=ie>JScript</SPAN> <SPAN class=object>Drive</SPAN> °³Ã¼ ¿¹Á¦</DIV>
<SCRIPT language=VBScript> Function DriveTestvb(drivePath) Dim fso,driveObj,str Set fso=CreateObject("Scripting.FileSystemObject") Set driveObj=fso.GetDrive(fso.GetDriveName(drivePath)) str="µå¶óÀ̺ê " & UCase(drivePath) & " - " & driveObj.VolumeName & "<BR>" str=str & "»ç¿ë °¡´ÉÇÑ °ø°£: " & FormatNumber(driveObj.FreeSpace /1024,0) & " KB" DriveTestvb=str End Function </SCRIPT> <DIV id=showvb class=show alt="°á°ú">°á°ú Ç¥½Ãâ</DIV> <DIV class=show onClick="showvb.innerHTML=DriveTestvb('C:\\')"> <SPAN class=ie>VBScript</SPAN> <SPAN class=object>Drive</SPAN> °³Ã¼ ¿¹Á¦</DIV>
AvailableSpace ¼Ó¼º IE4 -
DriveLetter ¼Ó¼º IE4 -
FileSystem ¼Ó¼º IE4 -
FreeSpace ¼Ó¼º IE4 -
IsReady ¼Ó¼º IE4 -
RootFolder ¼Ó¼º IE4 -
SerialNumber ¼Ó¼º IE4 -
TotalSize ¼Ó¼º IE4 -
VolumeName ¼Ó¼º IE4 -Drive °³Ã¼¿¡´Â ¸Þ¼µå°¡ ¾ø´Ù.