|
|||||||||
|
|||||||||
|
|||||||||
 |
|||||||||
| |
||
|
|
|
| ||||||||||||||||||||||||||||||||
 |
|
|
«
Previous Thread
|
Next Thread
»
|
Thread Tools | Search this Thread |
Rating: 
|
Display Modes |
ASP Free Forums Sponsor:
|
|
|
|
#1
January 13th, 2006, 08:15 PM
|
||||
|
||||
Pure ASP Upload script with additional features
yet another upload script, however this time it let you control
some things that most script won't handle, for example it can check images width and height. upload script is attached in the zip file. sample code using this upload script: Code:
<!-- #include file="ShadowUploader.asp" -->
<%
Dim objUpload
If Request("action")="1" Then
Set objUpload=New ShadowUpload
If objUpload.GetError<>"" Then
Response.Write("sorry, could not upload: "&objUpload.GetError)
Else
Response.Write("found "&objUpload.FileCount&" files...<br />")
For x=0 To objUpload.FileCount-1
Response.Write("file name: "&objUpload.File(x).FileName&"<br />")
Response.Write("file type: "&objUpload.File(x).ContentType&"<br />")
Response.Write("file size: "&objUpload.File(x).Size&"<br />")
Response.Write("image width: "&objUpload.File(x).ImageWidth&"<br />")
Response.Write("image height: "&objUpload.File(x).ImageHeight&"<br />")
If (objUpload.File(x).ImageWidth>200) Or (objUpload.File(x).ImageHeight>200) Then
Response.Write("image to big, not saving!")
Else
Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), "")
Response.Write("file saved successfully!")
End If
Response.Write("<hr />")
Next
Response.Write("thank you, "&objUpload("name"))
End If
End If
%>
<form action="<%=Request.ServerVariables( "Script_Name" )%>?action=1" enctype="multipart/form-data" method="POST">
File1: <input type="file" name="file1" /><br />
File2: <input type="file" name="file2" /><br />
File3: <input type="file" name="file3" /><br />
Name: <input type="text" name="name" /><br />
<button type="submit">Upload</button>
</form>
as you can see, in the Uploader code you can control the maximum upload size (total of all files plus form data) and various messages. the upload take place once you initialize the upload object. however, the files will not be saved to disk until SaveToDisk method is called! you can check file type by ContentType or FileName, and you can check if the file is valid image by checking the ImageWidth or ImageHeight: if they're -1 it's not valid image. revision history
Related threads: Errors: getting Permission Denied error script hangs on SaveToDisk call Bad file name or number error getting Operation Not Allowed error Server.CreateObject Access Error when creating Scripting.Dictionary Invalid procedure call or argument: 'MidB' error when uploading Browser just hangs, file is not uploaded Additional Features: uploading whole directory resize the uploaded images on the fly inserting uploaded images names to database email the uploaded file Get files by their corresponding form element name General Help: where the uploaded files will be saved? uploading any file (not only images) uploading large files preventing user from uploading non image files help implementing the code change the name of the uploaded file change it completely display uploaded image after uploading it integrating the upload with existing code using GetFileIndexByName with non IE browsers Last edited by Shadow Wizard : April 6th, 2009 at 10:23 AM.
|
|
#2
January 14th, 2006, 03:43 AM
|
||||
|
||||
|
Wow dude! this rocks! I have an idea how, but I didn't wanna mess anything up...how do I only allow images?
Also, I found that to make the file if you're manually naming it to have the valid extension regardless, the If statement can look like this: Code:
If Len(strNewFileName) = 0 Then strPath = strPath & m_fileName Else strPath = strPath & strNewFileName & Right(m_fileName, InStrRev(m_fileName, ".")) End If Seriously though dude, great work!
__________________
www.simplelyrics.net - www.playstormgames.com.com - www.g1games.com - www.quotemeanings.net - www.ourfreegames.com
|
|
#3
January 14th, 2006, 02:50 PM
|
|||||
|
|||||
|
as I said, you can check if the file is valid image by checking ImageWidth - if
it's -1 the file is not valid image, regardless of its extension. for example: ASP Code:
this will not save non-image files. as for extension, I fear I didn't understand what you mean - you try to save the file with different extension??
|
|
#4
January 15th, 2006, 12:03 AM
|
||||
|
||||
|
I'm sorry I missed the check image part shadow, i was so excited to see the code
 Quote:
I was talking about if you want to save the file with a different name - the code I gave makes sure the correct extension is attached.
|
|
#5
January 15th, 2006, 05:16 AM
|
||||
|
||||
|
Quote:
|
|
#6
January 17th, 2006, 10:59 AM
|
||||
|
||||
|
is there any way of changing the image width ,height or quality while saving it to disk.
__________________
Mark If you found a post particularly helpful, show your appreciation by clicking the "scales" icon in the bar just above the post, at the right hand side.
|
|
#7
January 17th, 2006, 01:09 PM
|
||||
|
||||
|
Quote:
you'll have to install and use some 3rd party component for this, or better yet - switch to ASP.NET where it's possible using simple code.
|
|
#8
February 5th, 2006, 06:14 PM
|
||||
|
||||
|
update: fixed bug with multiply file upload which crashed.
credit for this goes to Olórin - thanks!
|
|
#9
March 16th, 2006, 06:11 AM
|
||||
|
||||
|
Important update:
improved efficiency of the upload script. files up to 10 MB should be uploaded very fast.
|
|
#10
May 4th, 2006, 02:53 AM
|
||||
|
||||
|
Quote:
NAV prompts only when it find virus, Script Blocking is done silently behind the scenes.
|
|
#11
June 1st, 2006, 07:15 AM
|
|||
|
|||
|
Where is the best part in the script to change the filename.
e.g. original image name = myimage.jpg before saving to disk append the date (would require to split the filename at the period, append the date, then rejoin the parts) myimage_01062006.jpg or prefix the image name with objUpload("name") from the form username_myimage.jpg
__________________
CyberTechHelp
|
|
#12
June 1st, 2006, 04:12 PM
|
||||
|
||||
|
the second parameter in the SaveToDisk method is the file name to use when
saving the file - if left blank, the original file name will be used. or are you asking how to append the date to the file name?
|
|
#13
June 13th, 2006, 10:03 AM
|
||||
|
||||
|
I have cleaned up this thread and Splitted each group of posts into its
own thread. the links can be found in the first post in this thread under "Related threads". Please start new thread, pointing on this one, if you got any specific problem with the ShadowUploader. For general questions or problems, post here and worst case I'll move it when the time come.
|
|
#14
November 30th, 2006, 08:10 AM
|
|||
|
|||
|
Nothing to upload error message
Hey Shadow Wizard
Great looking script, having a bit of trouble using it though. Im getting an error that says "nothing to upload" well i know the file is there, so any ideas? Cheers
|
|
#15
November 30th, 2006, 08:25 AM
|
||||
|
||||
|
hey Paul glad to see you chose my uploader.. this
error means you didn't send any files or you didn't set multipart/form-data for the form. post your full HTML and we'll see...
|
|
| Viewing: ASP Free Forums > Programming > Code Bank > Pure ASP Upload script with additional features |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
|
|
|
|
 |
|
|
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
