如果空间支持FSO组件的话Function ShowSpaceInfo(drvpath) Dim fso, d, s Set fso = CreateObject(“Scripting.FileSystemObject”) Set d = fso.GetDrive(fso.GetDriveName(fs.GetAbsolutePathName(drvpath))) s = “驱动器 ” & d.DriveLetter & “:” s = s & vbCrLf s = s & “总容量：” & FormatNumber(d.TotalSize/1024, 0) & “KB” s = s & vbCrLf s = s & “可用空间：” & FormatNumber(d.AvailableSpace/1024, 0) & “KB”ShowSpaceInfo=sEnd Function用这个就可以查看另外ftp可以查看所占用空间大小还有一个BT的做法，他不是说有1G吗，那你就用winhex建立一个900多MB的文件传上去，o(∩_∩)o方法一：最简单的方法是登陆虚拟主机后台控制面板查看，一般主机商都会提供相应的功能。以西部数码虚拟主机为例，登录主机独立控制面板。在左侧下面就可以直接看到主机容量使用情况，如图所示。方法二、可以查看已经使用的空间大小。我们打开ftp软件flashfxp，连接上自己的虚拟主机，点击工具菜单下的计算大小，就可以看到该虚拟主机当前文件夹占用的大小。
