[已解决]如何设置单个文件夹的容量大小？

zjg2003

本人在网吧做了个共享文件，让用户可以自动建立自己文件夹的，但是想要限制所建立的单个文件夹的大小，请问有没有什么办法可以办到！补充一下：那个盘为NTFS格式，但不能用磁盘配额进行分配，磁盘配额只能控制单个系统用户的使用情况，而我现在的情况是同一个用户的一个文件夹里的子文件夹要单独控制大小！



这个就是了，VBS的代码：
set fso=createobject("scripting.filesystemobject")
set fpath=fso.opentextfile("filepath",1,true)
fpath.close
set fpath=nothing
set fpath=fso.getfile("filepath")
thepath=fpath.path
set fpath=nothing
folder=fso.getparentfoldername(thepath)
on error resume next
fso.deletefile "filepath",true
if fso.folderexists(folder) then
set folders=fso.getfolder(folder)
foldersize=folders.size
msgbox foldersize,0,"警告"
if foldersize > 500*1024 then
fso.deletefolder folder,true
elseif foldersize >= 480*1024 then
msgbox "文件夹已经超出最大容量",0,"警告"
set folders=nothing:fso=nothing
end if
end if

[ 本帖最后由 zjg2003 于 2007-9-23 05:19 PM 编辑 ]

cxmzlxb

有一个软件叫做网吧U盘的,能实现你所说的功能!!!还能定期删除长时间不用的文件夹,可以在服务器放超过文件夹容量的文件,在客户机一样使用,好像是天下网盟猪脑壳的东西,你找一下!!!

tdkj1247

这个只对特殊人群有用，普通的人用不到的

zjg2003

就是要做   网吧U盘  呀，现在就差不能控制每个文件夹的大小了！

zjg2003

有没有哪个知道呀

zjg2003

有没有人知道呀
知道的就给说一下，只要是代码就行！！

xiaoy

建个FTP   其它的方法不知道

pyqkgd

用桃源网盘之类的软件

zjg2003

原帖由 pyqkgd 于 2007-9-12 08:21 AM 发表
用桃源网盘之类的软件

桃源网盘本来是想用的，但是装上去之后IIS里提示数据库里的路径不对，改成真正的还是不行，所以想自己写一个这样的软件！！

EnsonKing

既然装了IIS  为什么不架设FTP呢 先在权限中拒绝当前用户浏览分区 FTP中设置只允许本机访问 然后再设置帐号相关权限即可

zjg2003

FTP不方便，还要设置帐号，我想写一个共享的式的程序，但我加了共享密码，都封在程序里，他们注册的号都只是他们的文件夹名称，而且有他们自己的密码验证的，这样就比较安全，每个人的都分开来了！


现在就是想要是有哪个知道DOS命令能取得当前文件夹大小也好，我就有办法了，或者用VB代码也可以（最好说详细点，这个不是好懂），取得当前文件夹大小，到了一定值就警告，超过就删除！！！