Shadow Uploader - change the name of the uploaded file change it completely

ASP Free Forums Sponsor:

June 2nd, 2006, 07:23 AM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

(regarding this thread: http://forums.aspfree.com/code-bank...ures-94647.html)

I also want to know how to change the name, i would like to change it completely though.

Quote:

Originally Posted by degsy

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

Last edited by Shadow Wizard : June 13th, 2006 at 08:41 AM.

June 4th, 2006, 03:08 AM

Shadow Wizard

Moderator From Beyond

Join Date: Sep 2004

Location: Israel

Posts: 31,109

Folding Points: 2595929 Folding Title: Super Ultimate Folder - Level 6

Time spent in forums: 3 Months 3 Weeks 2 Days 20 h 18 m 8 sec
Reputation Power: 2919

Quote:

Originally Posted by JustXtreme

I also want to know how to change the name, i would like to change it completely though.

I changed the code and re-attached it, now you can change this line:

Code:

Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), "")

to this:

Code:

Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), "newnamehere")

this will save the file under the name "newnamehere" using the original extension of
the uploaded file.
you can also have this:

Code:

Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), "newnamehere.txt")

and it will override the original extension, saving the file with txt extension.
and as before, this:

Code:

Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), "")

will save the file under its original name.

Comments on this post

JustXtreme agrees: KICK ARse, thanx alot.

__________________

Visit The Windows Scripting Guru***There Is No Magic***I didn't reply recently? Click here to see why

June 5th, 2006, 09:12 AM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

will a variable work there. something like <%response.Write objRS("cnum")%> or request.Form("cnum") if so can i get a sample of that. i'm getting a error, i'm sure i'm not formating something write.

June 5th, 2006, 09:19 AM

degsy

Contributing User

ASP Free God 2nd Plane (6000 - 6499 posts)

Join Date: Aug 2005

Location: North East, UK

Posts: 6,191

Time spent in forums: 3 Weeks 4 Days 19 h 41 m 52 sec
Reputation Power: 134

Here is some sample code for various file name appendages

Code:

If (objUpload.File(x).ImageWidth>200) Or (objUpload.File(x).ImageHeight>200) Then
				Response.Write("Image to big, not saving!")
			Else 
				filename = objUpload.File(x).FileName
				extpos = InStrRev(filename, ".")-1
				ext = Right(filename, len(filename)-extpos)
				filename = Left(filename, extpos)
								
				'filename = filename & "_" & Day(Date) & "_" & Month(Date) & "_" & Year(Date)
				filename = filename & "_" & UDate(Now())
				filename = filename & ext
				Response.Write "File saved as: <b>" & filename & "</b><br>"
				
				filedate_start = InStrRev(filename, "_") + 1
				filedate_end = InStrRev(filename, ".")
				filedate = Mid(filename, filedate_start, filedate_end-filedate_start)
				Response.Write "File timestamp: " & filedate & " = " & unUdate(filedate) & "<br>"
				
				'Response.End 
				Call objUpload.File(x).SaveToDisk(Server.MapPath("."), filename)
				Response.Write("File saved successfully!")
			End If

Date functions

Code:

Function UDate(oldDate)
  	UDate = DateDiff("s", "01/01/1970 00:00:00", oldDate)
End function 

Function unUDate(intTimeStamp)
  unUDate = DateAdd("s", intTimeStamp, "01/01/1970 00:00:00")
End function

Quote:

Found 1 files...
Original file name: av-123.gif
File type: image/gif
File size: 1838
Image width: 60
Image height: 60
File saved as: av-123_1149520651.gif
File timestamp: 1149520651 = 05/06/2006 15:17:31
file saved successfully!

Comments on this post

Shadow Wizard agrees: nice, thanks for sharing!

__________________
CyberTechHelp

June 5th, 2006, 09:54 AM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

Code:

Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), request.form("cnum"))

when i do this i get this
Request object error 'ASP 0207 : 80004005'

Cannot use Request.Form

/demoupload.asp, line 24

Cannot use Request.Form collection after calling BinaryRead

June 5th, 2006, 02:17 PM

Shadow Wizard

Moderator From Beyond

Join Date: Sep 2004

Location: Israel

Posts: 31,109

Time spent in forums: 3 Months 3 Weeks 2 Days 20 h 18 m 8 sec
Reputation Power: 2919

indeed, you can't use Request.Form when uploading. Instead, use the upload component:

Code:

Call objUpload.File(x).SaveToDisk(Server.MapPath("Uploads"), objUpload("cnum"))

June 5th, 2006, 02:21 PM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

how does that tie in to my data, do i just make something like
cnum=response.Write objRS("cnum") or not so much.

June 5th, 2006, 02:26 PM

Shadow Wizard

Moderator From Beyond

Join Date: Sep 2004

Location: Israel

Posts: 31,109

Time spent in forums: 3 Months 3 Weeks 2 Days 20 h 18 m 8 sec
Reputation Power: 2919

sorry, I lost you now. that code you gave is utterly meaningless and wrong,
to assign value to variable have such code:

Code:

cnum = objRS("cnum")

for this to work, you must have variable called "objRS" which is
valid recordset, and field called "cnum" should exist in the table
you selected the data from.

June 5th, 2006, 02:29 PM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

yea i'm trying to do that. i'm trying to add your aspcode and form to my current form.
what i did was use you name field and made that a variable which worked but i wanted to know how to make my own.
thanx

#10

June 5th, 2006, 02:44 PM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

Ok i added your form and asp code to my form, im not even sure if i can do that, but when i hit submit on your form button it just reset the page to the cnumentry.asp page.
any idea.
and this is what my url says
http://audits.demosales.net/auditquery.asp?action=1

Attached Files

auditquery.zip (3.3 KB, 132 views)

#11

June 5th, 2006, 03:15 PM

Shadow Wizard

Moderator From Beyond

Join Date: Sep 2004

Location: Israel

Posts: 31,109

Time spent in forums: 3 Months 3 Weeks 2 Days 20 h 18 m 8 sec
Reputation Power: 2919

this chunk of code looks fine:

Code:

<form action="<%=Request.ServerVariables( "Script_Name" )%>?action=1" enctype="multipart/form-data" method="POST"><br />
<strong>You Entered Refrence Number: <% response.Write objrs("cnum")%><br />
Please Upload A Picture For This Event.<br /></strong><br />
<strong>Audit Picture:</strong> <input type="file" name="file1" /><br />
<input type="hidden" name="name" value=<%response.Write objRS ("cnum")%>  /><br />
<br />
<button type="submit">Upload</button>
</form>

after clicking the Upload button the form should be submitted to the same page.
the link you gave is not working (server not found) can you provide valid link?

#12

June 5th, 2006, 03:25 PM

JustXtreme

I-Team User

Join Date: May 2006

Location: Florida

Posts: 1,217

Time spent in forums: 2 Weeks 6 Days 4 h 49 m 9 sec
Reputation Power: 33

yea it's only internal right now. sorry i would love to give u a valid link. i just wanted u to see what the url looked like.
I can get it to work when there's not another form in the equation? I have the attached working, but i want it to be either in the same form or at least on the same page.

by the way thanx for all the help.

Attached Files

cnumentryforupload.zip (1.7 KB, 288 views)

#13

June 5th, 2006, 03:42 PM

Shadow Wizard

Moderator From Beyond

Join Date: Sep 2004

Location: Israel

Posts: 31,109

Time spent in forums: 3 Months 3 Weeks 2 Days 20 h 18 m 8 sec
Reputation Power: 2919

you should add the cnum to the querystring along with the action:

Code:

<form action="<%= Request.ServerVariables( "Script_Name" )%>?action=1&cnum=<%= objRS("cnum")%>" enctype="multipart/form-data" method="POST"><br />

Comments on this post

JustXtreme agrees: Holy Crap U r the Wizard, Thanx

#14

June 6th, 2006, 04:22 AM

m27uk2000

Registered User

Join Date: May 2006

Posts: 15

Time spent in forums: 4 h 29 m 7 sec
Reputation Power: 0

Hi Guys

I'm posting in here as I just can't seem to get an answer for my file upload problem, i've noticed a few experts in here so hope you don't mind me posting in here.

I am using Freeaspupload and want to insert the name of the file that gets uploaded into the database.

I just don't know what code to use to get the filename, any ideas?

Many thanks.

#15

June 6th, 2006, 04:35 AM

degsy

Contributing User

Join Date: Aug 2005

Location: North East, UK

Posts: 6,191

Time spent in forums: 3 Weeks 4 Days 19 h 41 m 52 sec
Reputation Power: 134

Use the ShadowUploader instead. It has it built in.

You can get the upload code from page 1 and some filename examples from page 5