How to get the free space of a hard drive

http://vbnet.mvps.org/index.html?code/disk/diskspace.htm

or try this
http://abstractvb.com/code.asp?A=945

http://vbnet.mvps.org/index.html?code/disk/index.html
here is a free tool
http://www.greatfreeware.com/Utilities/Disk_Analysis_Utilities/2389.html

i have PC Based upon IP address
is there any solution Like(i will put IP address of that PC and  drive name it will show free space)

hi

http://vbnet.mvps.org/index.html?code/network/ipaddress.htm
http://vbnet.mvps.org/code/network/wnetenumresource.htm
http://vbnet.mvps.org/index.html?code/disk/index.html

hope u can combine results from these to find ur solution

Hi, ADhiman.

This solution may help you.  I slightly modified the code found at (https://www.experts-exchange.com/questions/20064358/Get-a-list-of-local-Network-Drives.html?query=drive+free+space&topics=93):

Private Sub CommandButton1_Click()
On Error GoTo Errorhandler

    Dim fso As New Scripting.FileSystemObject, dr As Scripting.Drive
    For Each dr In fso.Drives
        MsgBox "Drive letter:           " & dr.DriveLetter & vbNewLine & "Drive Total Size:     " & Format(dr.TotalSize, "#0,000") _
        & " Bytes" & " / " & Format(dr.TotalSize / 1000000000, "#0.00") & " GB" & vbNewLine & "Drive free space     " & Format(dr.FreeSpace, "#0,000") & " Bytes" _
        & " / " & Format(dr.FreeSpace / 1000000, "#0.00") & " MB"
    Next
    Exit Sub
   
Errorhandler:
    MsgBox "Drive letter: " & dr.DriveLetter & "--not ready."
    Resume Next

End Sub