HTML form for uploading up to 3 files, which also contains a text description field, and a multiple select control:
<HTML>
<BODY BGCOLOR="#FFFFFF">
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="Upload.asp">
<INPUT TYPE=FILE NAME="FILE1"><BR>
<INPUT TYPE=FILE NAME="FILE2"><BR>
<INPUT TYPE=FILE NAME="FILE3"><BR>
<INPUT TYPE=TEXT NAME="DESCRIPTION"><BR>
<SELECT NAME="CATEGORY" MULTIPLE>
<OPTION>Image
<OPTION>Text
<OPTION>Source Code
<OPTION>Archive
</SELECT><BR>
<INPUT TYPE=SUBMIT VALUE="Upload!">
</FORM>
</BODY>
</HTML>
Corresponding Upload Script (Upload.asp):
' Display description field ' Display all selected categories<%
Set Upload =
Server.CreateObject("Persits.Upload.1")
' Upload
files
Upload.OverwriteFiles = False ' Generate unique
names
Upload.SetMaxSize 1048576 ' Truncate files above
1MB
Upload.Save "c:\upload"
' Process all files
received
For Each File in Upload.Files
'
Save in the database as blob
File.ToDatabase
"DSN=data;UID=sa;PWD=zzz;", _
"insert into
mytable(blob) values(?)"
' Move to a your WebSpace, the path can be found using
the findpath code
File.Copy "d:\webspace\host\user-name\domain-name.co.uk\www\upload"
& File.ExtractFileName
File.Delete
Next
Response.Write
Upload.Form("Description") & "<BR>"
For Each Item in
Upload.Form
If Item.Name = "Category"
Then
Response.Write Item.Value &
"<BR>"
End If
Next
%>