|
Hi, this script to upload a file using ASP is very simple and useful. Thanks anyway. But i have a question now, how can i haev some script which i can get the name of the file uploded? coz i wish to store this file name in my DB for 'download' page to function.
Kindly please help me on this matter.... thanks a lot
|
|
|
|
|
hi this is nagesh
I am fresher working on asp in small software company.In my module i have user page in that user has the facility to upload file and upload image option.
And in Admin side i want download the user uploaded file and image depending on users selected from the dropdown.
i am using Macromedia with asp and sql server2000 plz help me to do the same.
i want display all uploaded files like reports so admin can download the files by clicking on links
thank you very muchhh
Nagesh
|
|
|
|
|
thanks alot for this script! comes in handy when you have to work on an old POS website!!!
many thanks
|
|
|
|
|
The code is very nice and helpful. i want to apply these changes :
1) restrict to upload only one file.
2) types only .txt and .doc
3) replace the uploaded file or update it.
4) view the file.
5) size shud be 1 mb
i m using SQl server Db
Please any one can send me the code on
: mervin_ds@yahoo.com
Its urgent !!!!!!!!!!
mervin
|
|
|
|
|
|
When I execute process_file.asp I get the following error:
Microsoft VBScript runtime (0x800A004C)
Path not found
/upload/vbsUpload.asp, line 234
What is the mistake I am doing? Please guide me.
|
|
|
|
|
Same thing here...I'm too lazy to count out lines in notepaad...
---mary
|
|
|
|
|
unknown path or directory. u can create new Folder.
objUpload.Files.Item(lngLoop).Save "D:\inetpub\yourFolder\www\uploads"
path server
pls
|
|
|
|
|
I have tried to upload a file to the database using Process_db.asp and it worked fine. However I tried to use the same form to upload two files and I can't seem to get it working. These are the statements I added(in bold):
if getdata("select top 0 * from " & DB,RS) > -1 then
rs.AddNew
rs.Fields("doc_name") = objUpload.Files.Item(0).FileName
rs.Fields("doc_type") = objUpload.Files.Item(0).ContentType
RS("doc_data").AppendChunk objUpload.Files.Item(0).Blob
rs.Fields("doc_name") = objUpload.Files.Item(1).FileName
rs.Fields("doc_type") = objUpload.Files.Item(1).ContentType
RS("doc_data").AppendChunk objUpload.Files.Item(1).Blob
rs.Update
Else
Response.Write "Error"
Response.End
end if
|
|
|
|
|
Hi guys,
i am new to asp and i am using this code on the server side to receive the file which is being posted by a client using HTTP POST multipart/formdata.
i tried using this module and it works just fine. (i have removed all the UI on the Process_File.asp)
<%@ Language=VBScript %>
>
<%
Dim objUpload, lngLoop
If Request.TotalBytes > 0 Then
Set objUpload = New vbsUpload
For lngLoop = 0 to objUpload.Files.Count - 1
'If accessing this page annonymously,
'the internet guest account must have
'write permission to the path below.
objUpload.Files.Item(lngLoop).SaveAs "D:\Fwds\WebSite1" & "\", "bill.txt"
Response.Write "File Uploaded"
Next
End if
%>
i am sending some parameters along with the file like the content type, filename to be used on the server side from the client.
i want to receive those parameters and use them on the server side. How shud i go abut it?
|
|
|
|
|
Hi, is it possible to modify the script slightly to rename the file as it's uploaded? The new name will be bassed on other fields during the upload.
Thanks
|
|
|
|
|
Hi!
i am also facing the exact problem have u been able to solve this problem? if so, can u please share it with me. thanx!!!
|
|
|
|
|
I wrote an additional method which is practically a clone of the Save method but will allow you to name the uploaded file whatever you like.
This is the Code for the method. Include it in the definition for the vbsFile class in vbsUpload.asp
<br />
Public Sub SaveAs(Path, newName)<br />
Dim objFSO, objFSOFile<br />
Dim lngLoop<br />
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")<br />
Set objFSOFile = objFSO.CreateTextFile(Path & newName)<br />
For lngLoop = 1 to LenB(m_Blob)<br />
objFSOFile.Write Chr(AscB(MidB(m_Blob, lngLoop, 1)))<br />
Next<br />
objFSOFile.Close <br />
End Sub<br />
This is the line I use to call it.
objUpload.Files.Item(lngLoop).SaveAs Server.MapPath("Uploads") & "\", "bill.wmv"
Hope this helped.
|
|
|
|
|
Hello everyone who have posted on this forum!
I am totally a newbie to this. I just downloaded the zip file, unzipped it and copied all the files in the zip folder on the webserver. I absolutely did not make any changes to any of the files.
Now, using Internet Explorer when I open Process_File.asp I get the following error:
Error Type:
Sun ONE ASP VBScript compilation (0x800A0422)
'Default' specification can only be used on Property Get
vbsUpload.asp, line 174, column 25
Line 174 is: Public Default Function Item(Index)
I looked this error on msdn and did not find any information on how to troubleshoot it. MSDN just says "You used the Default reserved word on a Property Let or Property Set. You can only specify the Default reserved word for a Property Get."
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/8499d363-c6e4-4a6d-97b7-52650b7e25d7.asp
I have seen posts that this script works great. However, I got the error at the very first step. Can anyone please tell me how to make this script work?
My email address is elitedude2001@yahoo.com
|
|
|
|
|
Sorry my English. The program work very well, but when I want save the binary file (Read the database file) to the disk, the file is encrypted and is not excel format. I need help to solution this problem. Thanks
Rui Moreira
|
|
|
|
|
Hi all,
like I said before, I have found this article and the files within very helpfull. But as I started to explore them in order to build my own site, I have discovered that there is a nice functionality that is not present on this.
Let´s say that I want to upload JPG files to a database and want to display them in a nice web page. Question is: how do I do that?
Any ideias? I have tried several things, but since I am not a real programmer (just an interested guy) I found that I wasn´t able to do it.
Can someone help me?
Thanks,
nelson.
|
|
|
|
|
Hi all,
I have a posto below with a problem in the download.asp file.
I have figured it out and here is the corrected download.asp file:
******************************************************************
<%
if getData("select * from doc_warhouse where doc_name <> '' and doc_id='" & request("doc_id") & "'",rs) > 0 then
Response.ContentType = rs("doc_type")
Response.AddHeader "Content-Disposition", "filename=" & rs("doc_name")
Response.BinaryWrite rs("doc_data")
Else
%>
File not found in the database.
<%
End If
%>
***********************************************************************
Hope this helps,
Nelson Ribeiro.
|
|
|
|
|
I found your class very useful and have added a GetText() function for ease of use with Text processing.
<br />
Public Function GetText()<br />
if m_strContentType = "text/plain" Then<br />
Dim lngLoop, strOut<br />
For lngLoop = 1 to LenB(m_Blob)<br />
strOut = strOut & Chr(AscB(MidB(m_Blob, lngLoop, 1)))<br />
Next<br />
GetText = strOut<br />
else<br />
GetText = "Wrong Content type! (content type: " & m_strConectType & ") (required type: text/plain)"<br />
End if<br />
End Function<br />
Thank you,
Ryan
.:~Analyst Developer~:.
|
|
|
|
|
Hi Ryan,
what does this funtion do? In what asp file should I put it and where to I make the calls of this function?
thanks in adv,
nelson
|
|
|
|
|
Hi Nelson,
I created this function (added to the bottom of the vbsupload.asp (that's the include), inside the class underneath the save subroutine) to simply extract the text from the uploaded file(s), but it first checks to make sure that the uploaded files are of 'text'.
I found it useful as my user(s) will be uploading xml (text) files which I wanted to process on-the-fly, this works for me.
Ryan
.:~Analyst Developer~:.
|
|
|
|
|
Nelson,
You call GetText() from within your 'main' asp page, the same page that has the <.. include of "vbsupload.asp"...>.
Example: myVariable = myObject.Files.Item(1).GetText()
Presuming in the above example that 'myObject' is set to your class.
Ryan
.:~Analyst Developer~:.
|
|
|
|
|
hi all,
first of all, I would like to give credit to the guy that wrote these files.
The code is excelent (althought I don´t understand much of ASP I can recognize a good piece of code when I see it).
Because I am a newbie to ASP, I really need some help to understand and correct the behaviour I am getting from these pages.
Here are a couple of things:
1) the download.asp page doesn´t work for me, I mean I get an error in the following SQL statement:
if getData("select * from doc_warhouse where doc_name <> '' and doc_id=" & request("doc_id"),rs) > 0 then
Response.ContentType = rs("doc_type")
....
I have changed it to:
if getData("select * from doc_warhouse where doc_name <> ''",rs) > 0 then (...)
The problem is that I don´t know if the result is the expected behaviour or not.
2) On the other hand, everytime i try to upload a file to the database, I get a window like the ones that appear when we are trying to download a file, althought the file is recorded to the database...a bit strange.
3) How can I retrieve a specific file from the database and show it the browser? I don´t know why but in my case it tries do download/view always the first file in the database.
I could really use some help on this....
Thanks in advance,
Nelson Ribeiro.
|
|
|
|
|
If you had enabled "Client Side debugging" under IIS, you should get a :
"Microsoft VBScript runtime error '800a0005'
Invalid procedure call or argument
vbsupload.asp, line 270"
On the current file version the error is locate on line 236 :"objFSOFile.Write Chr(AscB(MidB(m_Blob, lngLoop, 1)))"
So I suggest to add an "On errror resume Next" at the beginning of the sub Save
|
|
|
|
|
see the following article:
http://www.codeproject.com/aspnet/multiuploads.asp
the lines to save the file are:
string fn = System.IO.Path.GetFileName(HIF.PostedFile.FileName);
HIF.PostedFile.SaveAs(baseLocation + fn);
2 lines compared to i don't know how many in VBS.
|
|
|
|
|
yes but the subject is : File Upload WITHOUT COM object
un aspnet you use the framework upload object...
|
|
|
|