如何更改P中的以下驱动器号以改为使用网络完整路径名?
我似乎无法弄清楚
wee
答案 0 :(得分:3)
修改以适应:
Dim FSO As FileSystemObject
Dim DRV As Drive
Dim FO As Folder
Dim sPath As String
sPath = "\\RON-DODIER\Users" 'Network Folder Path
Set FSO = New FileSystemObject
Set FO = FSO.GetFolder(sPath)
Debug.Print FO.Drive.FreeSpace
您还可以使用File对象的Drive属性(如果这是您想要的更多),以确定可用空间量。