Advanced ASP Uploader

• Download source files - 63 Kb
• Download demo project - 119 Kb

Introduction

Browser-based (HTTP) file uploading is a great way to transfer arbitrary files from a client machine to the Web server which adds another dimension to Web-based applications. However, to enable this feature the client form should be submitted using "multipart/form-data" encoding.

Unfortunately, the ASP Request.Form object cannot be used with this encoding type (currently). For this reason, many solutions have been provided by third party components to solve this problem. However, most of these third party components suffer from one or more of the following problems:

1. Discarding other important form data which are not related to the uploaded file.
2. No support for multiple file uploading.
3. Inconsistent interface to the existing Request.Form interface.
4. No support for chunk data reading from the uploaded file (helpful on uploading a large. file into a BLOB field in a database using AppendChunk in an ADO Recordset object).

For these reasons, I have developed a COM object that users can use instead of Request.Form in case of a "multipart/form-data" encoding.

While developing this COM object, I have tried to avoid falling into any of the previous mentioned problems. However, the solution that I am providing will not totally replace Request.Form, rather it will be a complementary solution that users can use incase of a "multipart/form-data" encoding as I mentioned earlier. Users can still use Request.Form for other encoding types, however.

What is multipart/form-data?

This "multipart/form-data" type of encoding is described in RFC1867 which describes how file uploading should be implemented over HTTP protocol. To enable file uploading the form enctype should be set to multipart/form-data and the method should be set to post. Then the input tag should be of type file.

For the previous form here is the required code

<form method=post action=upload.asp enctype="multipart/form-data">
<input name=name value="Al-Mutairi, Fayez">
<input name=email value="fayezmm@yahoo.com">
<input name=file type=file>
<input name=submit type=submit value=Submit>
</form>

When the user clicks the submit button the web server will receive the following:

-----------------------------7d1f5a80420
Content-Disposition: form-data; name="name"

Al-Mutairi, Fayez
-----------------------------7d1f5a80420
Content-Disposition: form-data; name="email"

fayezmm@yahoo.com
-----------------------------7d1f5a80420
Content-Disposition: form-data; name="file"; filename="C:\folder_icon.gif"
Content-Type: image/gif

GIF89a2 2 �� ���������ff�UUUDDD33f"""                        ,    2 2 @
��I��8�ͻ�H �" ��,�|]H�49 7�!� Գ[NG� ��Cq�l:��S�'@��fB�<��v
���
φC$
�+zN���n$u�/z-Vvc@*<,{bdd UX��lCb=?�#f|j�4fq���=>fo��������N
G���<_z�2�T����\R_-�����+�s��͊�Mю]*g֛5���Am����k�/�h���u�[���npʅ�"
�(���i�/ ��*�/ ;

-----------------------------7d1f5a80420
Content-Disposition: form-data; name="submit"

Submit
-----------------------------7d1f5a80420--

At this time when upload.asp started it cannot access the form data using Request.Form So it should use a third party component for help. The component will read the previous request, parse it and build a collection of items that can be accessed in a similar fashion to accessing Request.Form items.

How To Use the Component

Let us build upload.asp using our MyRequest.Form component

<%@ LANGUAGE="JScript%">
<%
    var form = Server.CreateObject("MyRequest.Form");
    form.Init();
    Response.Write("Name =" + form("name"));
    Response.Write("Email =" + form("email"));
    var file = form.Item("file").Item(1);
    Response.Write("FileName =" + file.FileName);
    Response.Write("FileExt  =" + file.FileExt);
    Response.Write("FilePath =" + file.FilePath);
    Response.Write("MimeType =" + file.ContentType);
    Response.Write("FileSize =" + file.TotalBytes);

    // ** To save into a file use Write method of the ADO Stream Object
    var fileStream = Server.CreateObject("ADODB.Stream");
    fileStream.Open();
    fileStream.Type = adTypeBinary;
    fileStream.Write(file.Value);
    fileStream.SaveToFile(Server.MapPath("Uploaded Files") + "\\" + file.FileName, adSaveCreateOverWrite);
    fileStream.Close();

    // ** To save into a database use AppendChunk method of the Field Object of ADO Recordset
    var cn = Server.CreateObject("ADODB.Connection");
    var rs = Server.CreateObject("ADODB.Recordset");
    cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("Database.mdb"));
    rs.Open("Users", cn, adOpenForwardOnly, adLockOptimistic, adCmdTable);
    rs.AddNew();

    rs.Fields("id") = 1000;
    rs.Fields("name") = form("name").Value;
    rs.Fields("email") = form("email").Value;
    rs.Fields("FileType") = file.ContentType;
    rs.Fields("file").AppendChunk(file.Value);

    rs.Update();
    rs.Close();
%>

Interfaces

Here is the IForm Interface
Method	Description
Init(VARIANT varBinary)	Initialize the form with posted data. varBinary is optional it is =Request.BinaryRead(Request.TotalBytes)
Item(VARIANT Index, IListItem** ppItem)	(Default method) Returns the ListItem object with the specified key either as the item name or index.
Count(long* pVal)	Number of listitem's objects.
Here is the IListItem Interface
Method	Description
Value(VARIANT* pValue)	(Default method) Item's value.
Item(long lIndex, IItem** ppItem)	Returns the Item object with the specified index.
Count(long* pVal)	Number of item's objects.
Name(BSTR* pName)	Item's name.
Here is theIItem Interface
Method	Description
Value(VARIANT* pValue)	(Default method) Return the value of the item.
IsFile(BOOL *pVal)	Return TRUE if the Item object is a file otherwise it returns FALSE.
FileName(BSTR *pVal)	The name of the uploaded file. AVALIABLE ONLY if object is a file.
FilePath(BSTR *pVal)	The path of the uploaded file. AVALIABLE ONLY if object is a file.
FileExt(BSTR *pVal)	The extension of the uploaded file. AVALIABLE ONLY if object is a file.
ContentType(BSTR *pVal)	The content-type (MIME TYPE) of the uploaded file. AVALIABLE ONLY if object is a file.
TotalBytes(long *pVal)	Size in bytes of the uploaded file. AVALIABLE ONLY if object is a file.
GetChunk(long offset, long length, VARIANT* pChunk)	Return a chunk of the file with the specified size and position. AVALIABLE ONLY if object is a file.

Further Help

Additional help is supplied with the demo project zip file which includes documentation !

Special thanks to Xicoloko who wrote http://www.codeproject.com/asp/uploader.asp which give me a push to also build my own component but this time (Complete).

You must Sign In to use this message board.

FAQ    Noise Tolerance Very HighHighMediumLowVery Low   Layout Expand Posts & RepliesThread ViewNo JavascriptNo JS + Preview   Per page 102550

Msgs 1 to 25 of 77 (Total in Forum: 77) (Refresh) FirstPrevNext

how to register myrequest.dll on SQL Server 2005 or Vista Home Basic Mekoder 1:52 20 Sep '07   I found the this component simple and straightforward to use, however i can't register myrequest.dll. i am using a SQL Server 2005 from where i am running. My local machine has Vista Home Basic and it doesn't have IIS. How can i get around to register myrequest.dll either on the server or my local drive. I tried any other component to upload files to browser and save them to the database but none work for me. I am running a website with ASP Really in need of help Sign In·View Thread·PermaLink Re: how to register myrequest.dll on SQL Server 2005 or Vista Home Basic pawandhir 6:50 24 Jun '09   I am not able to use SQL Server though. If you have code please help me. Now to your question, I think simply run install.bat file on to your server having IIS. (Copy both file on C drive from your local machine) and run bat file. I am not sure if you are able to figure out your local machine to run ASP from server. If you are, then have the page run onto remote server. Sign In·View Thread·PermaLink Problem compiling jerry Scannell 15:38 6 Nov '06   I loaded the MyRequest project into Visual Studio. When I attempt to build the solution, I get a few warnings about signed/unsigned. I'm not too worried about those. However, I get two errors. One in Form.cpp at line 206: hr = pEnum->Init(vecItems.begin(), vecItems.end(), 0, AtlFlagCopy); Another one at line 80 of ListItem.cpp at line 83: hr = pEnum->Init(vecItems.begin(), vecItems.end(), 0,AtlFlagCopy ); Both instances have a problem with the 'AtlFlagCopy' parameter. I did a search for it throughout the project and only find it at those two lines. Is there supposed to be an include file or something that I might not have?? Thanks for providing this for us to use. I was able to register the MyRequest.dll that came with the demo zip, but I really would like to solve the build problem. Sign In·View Thread·PermaLink 2.00/5 (2 votes) MyRequest.Form init error choijung71 23:42 20 Jul '06   if filename is two byte language, MyRequest.Form init error occur. Sign In·View Thread·PermaLink 2.00/5 (2 votes) Write file error LienKim 17:25 10 Feb '06   Hi.when I run this example i got this error ADODB.Stream error '800a0bbc' Write to file failed. I don't know how to sold it . Plese help. Thank Sign In·View Thread·PermaLink Re: Write file error Visible Soul 1:42 30 Mar '06   The path to which you are saving files do not have appropriate privilege to save file to the local user IUSR_machinename. You can solve this problem by giving "Everyone" or "IUSER_Machinename" accounts the rights to read and write. Feel free to consult if not satisfied. jaywalker_19@hotmail.com Jay Sign In·View Thread·PermaLink Error "Server.Object" Shefa 6:37 15 Jan '06   Error Type: Server object, ASP 0177 (0x800401F3) Invalid class string /ASPUploader Samples/sample3.asp, line 7 Browser Type: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; FunWebProducts) Page: POST 26739 bytes to /ASPUploader Samples/sample3.asp Plz, reply ASAP. thx Sign In·View Thread·PermaLink 2.00/5 (1 vote) Re: Error "Server.Object" Adhan 23:35 8 Feb '06   hi... in this case u should to register the component (.dll). find in directory /bin and run install.exe regard, Adhan Sign In·View Thread·PermaLink Select/Options - How does one handle them dougcranston 6:41 5 Dec '05   I was trying out your application, and my form element that I appear to be having a problem with is when using SELECT tags. The error I get when attempting to "read" the data on the processing page generates the following error.. Error Type: Form.Item() (0x80070257) index key is not valid /business/staff/projects/prjdoc/prjinsertaddproc.asp, line 172 ln 171 var strType = ""; ln 172 strType = form.Item("strType").Value; ln 173 strType = new String(strType); Clearly, I am doing something wrong, but so far my attempts to resolve it have failed. Any suggestions? Thanks for posting this application.. Great application, and this clearly falls under the stupid user category.. Thanks inadvance. Doug Cranston Sign In·View Thread·PermaLink 5.00/5 (1 vote) Convert JScript example to VBScript bbutler 8:14 18 Aug '05   I have a project that was written in VBScript. I want to use this code, but it written in JScript and I am hung up on this section: var form = Server.CreateObject("MyRequest.Form"); form.Init(); var file = form.Item("file1").Item(1); var FileName = file.FileName; HOW does this look in VBScript? I have... Dim form Dim FileName Dim file Set form = Server.CreateObject("MyRequest.Form") This works form.Init() This works file = form.Item("file").Item(1) This works FileName = file.FileName this causes a error... Microsoft VBScript runtime error '800a01a8' Object required: '???????????' Also, I am using ADODB.Stream to upload the file to a server. Is this the correct VBScript? objStream.SaveToFile "Server.MapPath("\files\") & FileName", 2 ' adSaveCreateOverWrite Thanks, Bob Sign In·View Thread·PermaLink 2.00/5 (2 votes) Re: Convert JScript example to VBScript bbutler 9:32 18 Aug '05   I read further in the forum and found my answers... I needed "set" before file = form.Item.... etc. I am now trying to use the IsFile function to make sure there is an uploaded file. I need the VBScript to do this. This is what I have & it is not working... 'see if there is a file uploaded ' use IsFile if(file.IsFile()) Then Dim FileName FileName = file.FileName stream stuff here... end if Thanks, Bob Sign In·View Thread·PermaLink Re: Convert JScript example to VBScript bbutler 11:22 18 Aug '05   OK... I solved my IsFile there issue... Now I need the code to send my file to a remote server... This sends the file to my staging server... but I need it sent to another server. fileStream.SaveToFile Server.MapPath("files") & "\" &_ strFilename, 2 ' adSaveCreateOverWrite I am using a Win 2000 server. Example, my share is \\servername\clientfiles fileStream.SaveToFile ?????? &_ strFilename, 2 ' adSaveCreateOverWrite Thanks, Bob Sign In·View Thread·PermaLink Re: Convert JScript example to VBScript bbutler 11:57 18 Aug '05   I found what I needed... Dim RemoteServer RemoteServer = ("\\IPAddress\Files") fileStream.SaveToFile RemoteServer & "\" &_ strFilename, 2 ' adSaveCreateOverWrite Sign In·View Thread·PermaLink Error while creating object of MyRequest.DLL Tejal Metha 0:35 16 Jun '05   HI, I get the following error while i try to use the Myrequest.DLL Error Type:Server Object "The Call to server.createobjecy while checking permissions. Access is denied to this object" Is DLL provided required some kind of lincesing. Please help me how to solve that. Regards, Sign In·View Thread·PermaLink 3.00/5 (2 votes) Re: Error while creating object of MyRequest.DLL pawandhir 6:52 24 Jun '09   Looks like you don't have proper rights to run DLL on to server. Sign In·View Thread·PermaLink How to open file from database? knight_zhuge 17:15 5 Aug '04   help!!! Sign In·View Thread·PermaLink 'adTypeBinary' is undefined Vexez 18:12 14 Jun '04   Microsoft JScript runtime error '800a1391' 'adTypeBinary' is undefined /send.asp, line 10 ---------------- <%@ LANGUAGE=JScript%> <% var form = Server.CreateObject("MyRequest.Form"); form.Init(); var file = form.Item("filename").Item(1); // ** To save into a file use Write method of the ADO Stream Object var fileStream = Server.CreateObject("ADODB.Stream"); fileStream.Open(); fileStream.Type = adTypeBinary; fileStream.Write(file.Value); fileStream.SaveToFile(Server.MapPath("Uploaded Files") + "\\" + file.FileName, adSaveCreateOverWrite); fileStream.Close(); %> Sign In·View Thread·PermaLink error : Det virker ikke en skid madspaaskesen 8:18 25 Jan '04   The page cannot be displayed There is a problem with the page you are trying to reach and it cannot be displayed. -------------------------------------------------------------------------------- Please try the following: Click the Refresh button, or try again later. Open the server home page, and then look for links to the information you want. HTTP 500.100 - Internal Server Error - ASP error Internet Information Services -------------------------------------------------------------------------------- Technical Information (for support personnel) Error Type: Form.Init() (0x80040200) Input type was not expected /tec-learning2/admin/send_materiale.asp, line 21 Browser Type: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322) Page: POST 5100 bytes to /xxx/xxx/xxxxxxx.asp POST Data: . . . Time: Sunday, January 25, 2004, 6:14:01 PM More information: Microsoft Support Sign In·View Thread·PermaLink Re: error : Det virker ikke en skid sketch 5:22 18 Nov '04   Hi all. I'm getting this same error in Windows 2003 Server. It doesn't happen when uploading small files (<200kb), and for what I've seen, it doesn't happen at all in Windows 2000 (pro or server). I've tried changing the application pool settings, directory security, etc. But the error keeps coming out. In advance, thank you for any reply. Sign In·View Thread·PermaLink Problem solved Sketch 9:17 24 Nov '04   Hi! I've found an answer in some other site. Read the following to know the solution: http://dmxzone.com/ShowDetail.asp?NewsId=5424[^] Best regards. Sign In·View Thread·PermaLink File upload error Popeye Doyle Murray 8:47 14 Aug '03   I also get the error: "ADODB.Stream error '800a0bbc' Write to file failed. ASPUploader Samples/sample2.asp, line 48" A assume it has to do with permissions on the Uploaded Files folder. What do I need to change for that? Sign In·View Thread·PermaLink 1.33/5 (3 votes) Re: File upload error repressedRadar 6:09 15 Aug '07   Does it work in IE? Are you using Mozilla? I am having this issue with Mozilla, but don't know the answer. repressed radar Sign In·View Thread·PermaLink 2.00/5 (1 vote) writing data to client; filenames.extensions are LOST AdyRocker 8:56 13 Jul '03   Response.ContentType = "" + rs.Fields("FileType"); Response.BinaryWrite(rs.Fields("file")); above two lines seem to be very clear, but when i upload a WAV file in DB, and try downloading it, IE opens it up in RAW CRAP data.. i dont know why.. Sometimes when I upload some TXT file, it downloads as Show.ASP(page thats reddirecting the links), it loses its own unnique name and extension... can anybody tell me, huw to get the file downloaded properly with filenames and extension preserved.. I even looked up in DB after uploading the file, there i saw the content type was 100% correct i.e (audio/wav) .. even then it doesnt work? why!! PLZ help Ady Rocker Sign In·View Thread·PermaLink 2.00/5 (1 vote) Error when show large files > 65Kb Nicolay Ch 0:46 29 Jun '03   When I download large files by using your component I get ASP error when BinaryWrite method are used. Can somebody get me some comments? Sign In·View Thread·PermaLink 1.67/5 (3 votes) Clear Text File JForck 6:05 23 Oct '02   I want to be able to take a clear text file, and have it be uploaded to this ASP page.   Instead of saving the file to the HD, I would like to take the stream of data, encrypt it then save it to the file system.   This way it would never be on the file system in an unencrypted form.   So, my question is how would you take the posted information and process it, like a string? I am very new to the programing world, so please excuse me if this is an obvious question. Thanks Sign In·View Thread·PermaLink

Last Visit: 8:56 4 Jul '09     Last Update: 8:56 4 Jul '09 1234 Next »