<%
'파일 크기를 계산해서 알맞은 단위로 변환해줌. (바이트 수)
Function ConvertToFileSize(intByte)

    intFileSize = Int(intByte)
    If intFileSize >= 1073741824 Then
        ConvertToFileSize = FormatNumber((intByte / 1073741824), 2) & " GB"
    Else
        If intFileSize >= 1048576 Then
            ConvertToFileSize = FormatNumber((intByte / 1048576), 2) & " MB"
        Else
            If intFileSize >= 1024 Then
                ConvertToFileSize = FormatNumber((intByte / 1024), 0) & " KB"
            Else
                ConvertToFileSize = intByte & " Byte(s)"
            End If
        End If
    End If

End Function
%>
<%
    'Option Explicit

    Dim objFSO   '드라이브의 정보를 얻어올 객체의 인스턴스용 변수.
    Dim objCdrive   'C드라이브의 모든 정보를 얻어올 핸들링 객체변수.

    'FileSystemObject객체의 인스턴스 생성
    Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

    'C드라이브의 핸들링 얻어오기
    Set objCdrive = objFSO.GetDrive("C:")
%>

[1] C드라이브의 전체 용량 : <%=ConvertToFileSize(objCdrive.TotalSize)%><br>
[2] C드라이브의 남은 용량 : <%=ConvertToFileSize(objCdrive.FreeSpace)%><br>
[3] C드라이브의 파일시스템 : <%=objCdrive.FileSystem%><br>

관련 아티클 리스트
	제       목	파일	작성자	작성일	조회
	20. 기본형 게시판 작성 프로젝트	-	관리자	2001-07-08	7999
	19. FSO(File System Object) : 파일(File) 처리	-	관리자	2001-03-03	10302
	FSO(File System Object) Bible: 파일(File) 처리 관련 예...		레드플러스	2004-04-22	5738
	FSO_GetDrive.asp : C드라이브 정보 얻기		레드플러스	2004-04-27	5710
	FSO_GetDriveUp.asp : C드라이브 정보 얻기(기능 추가)		레드플러스	2004-04-27	6063
	FSO_GetFolder.asp : C:\Temp 폴더의 크기 얻기		레드플러스	2004-04-27	6709
	웹사이트 용량 구하기 예제	-	레드플러스	2004-10-14	6413
	FSO_CreateTextFile.asp : 텍스트 파일 생성하기		레드플러스	2004-04-27	8477
	FSO_WriteLine.asp : 텍스트 파일에 글 쓰기		레드플러스	2004-04-27	6928
	FSO_ReadLine.asp : 텍스트 파일로부터 데이터 읽기		레드플러스	2004-04-27	8924
	18. CDO(Collaboration Data Object) : 메일 전송(SMTP...	-	관리자	2000-12-27	7508