File Manager? - Snitz™ Forums 2000

The Forum has been Updated

The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.

File Manager? - نوشته شده در 27 Oct 2006 (8657 Views)

Desmomax

New Member

مطلب: 55

Hallo !
I am looking for a MOD that allow user to menage their files uploaded in posts (delete, use again in other posts..) and allow me to give a kb limit of files uploaded. At moment the only way is to check the directory named for each user

Can someone suggest me a Mod ?
many thanx
<

Il forum

نوشته شده در 27 Oct 2006

weeweeslap

Senior Member

مطلب: 1077

1077

http://www.snitzbitz.com/mods/default.asp?pg=4&SortBy=Name&SortDir=asc&Version=All
couple file stuff there, file library might be the one you want<

coaster crazy

نوشته شده در 27 Oct 2006

modifichicci

Average Member

مطلب: 787

787

Proeder file attach mod, on snitzbitz.<

Ernia e Laparocele Forum di Ernia e Laparocele Acces - MySql Migration Tutorial Adamantine forum

نوشته شده در 31 Oct 2006

Desmomax

New Member

مطلب: 55

thanks all..
grazie modifichicci

Il forum

نوشته شده در 13 Feb 2007

Desmomax

New Member

مطلب: 55

I installed this mod. I can decide the maximun file size but i can not find where to set the maximun disk space allowed.
is it possible? i'd like to give a limited space where upload files for each user. many thanx
<

Il forum

نوشته شده در 13 Feb 2007

Shaggy

Support Moderator

مطلب: 6780

6780

As far as I know, none of the attachment or file manager files include such a feature; you would need to edit your files to include a check on the size of the folder before processing the upload.
<

Search is your friend “I was having a mildly paranoid day, mostly due to the
fact that the mad priest lady from over the river had
taken to nailing weasels to my front door again.”

نوشته شده در 13 Feb 2007

PPSSWeb

Junior Member

مطلب: 312

312

If you are using Proeder's as suggested above you can modify the code in outputFile.asp to limit by folder size by adding the following:

around line#161 after the endif and before 'Create and Write to a File insert:

Code:

'##################limit uploads directory size to less than maxDiskSpace#####################
Dim ds 
Set ds=ScriptObject.GetFolder(memberPath)
IF ds.Size + bytecount > maxDiskSpace then
	Response.Write	"<html>" & vbNewline
	Response.Write	"<head>" & vbNewline
	Response.Write	"<title>Error while uploading</title>" & vbNewline
	Response.Write	"</head>" & vbNewline
	Response.Write	"<body link=""" & strLinkColor & """ aLink=""" & strActiveLinkColor & """ vLink=""" & strActiveLinkColor & """>" & vbNewline
	Response.Write	"<p align=""center"">" & vbNewline
	Response.Write	"	<font face=""" & strDefaultFontFace & """ size=""" & strHeadFontSize & """ color=""" & strDefaultFontColor & """><b><br>This file cannot be uploaded.<br><br></b></font></ br><hr size=""1"" color=""" & strHiLiteFontColor & """>" & vbNewline
	Response.Write	"	<table>" & vbNewline
	Response.Write	"		<tr><td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """><b> Maximum Disk Space </b></font></td><td><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>- Maximum upload disk space of " & maxDiskSpace/1048576 & "MB exceeded. " & vbNewLine & "Current Disk Usage =  " & Round(ds.Size/1048576,2) & " MB</font></td></tr>" & vbNewline
	Response.Write	"	</table><hr size=""1"" color=""" & strHiLiteFontColor & """>" & vbNewline
	Response.Write	"	<p align=""center""><a href=""#"" onClick=""history.go(-1);"" style=""text-decoration: none""><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>Please click here to go back and choose another file to upload.</font></a></p>" & vbNewline
	Response.Write	"</p>" & vbNewline
	Response.Write	"</body>" & vbNewline
	Response.Write	"</html>" & vbNewline
Else 
'#############################################################################################

around line#224 between the Response.Write and the Else insert:

Code:

'#########close limit for maxDiskSpace#####	
	End If	
	set ds=nothing
'##########################################

Then add the constant maxDiskSpace to your config.asp file in the variable section:

Code:

'###################Define Maximum Disk Space for uploads Per User##############
Const maxDiskSpace = 1048576
'###############################################################################

آخرین ویرایش توسط