| Oekosoft | | | Inhalt |
What browsers are compatible with .asp files? You may use the following browsers (RFC 1867-compliant) to upload files:
How do I upload to a data directory? You may upload up to three files and the corresponding asp script to a data
directory by creating the following HTML form:
<HTML> <% Set Upload = Server.CreateObject ("Persits.Upload.1") How do I upload to a database? You may upload three files to a database by creating the following HTML form:
<HTML> Uploading files to a to a database requires a few more lines of code than
that of a data directory as follows:
<% Set Upload = Server.CreateObject ("Persits.Upload.1")
' Process all files received ' Display description field ' Display all selected categories How do I upload an image from my database to a web page? To include an uploaded image from your database in a web page you can use a
regular <IMG> tag in your HTML page with the SRC attribute pointing to the
asp script. Please see the following examples:
<HTML> <% Set Upload = Server.CreateObject ("Persits.Upload.1")
<BODY BGCOLOR="#FFFFFF">
<FORM METHOD="POST"
ENCTYPE="multipart/form-data" ACTION="upload.asp">
<INPUT TYPE= FILE
SIZE= 60 NAME="FILE1"> <BR>
<INPUT TYPE= FILE SIZE= 60
NAME="FILE2"> <BR>
<INPUT TYPE= FILE SIZE= 60 NAME="FILE3">
<BR>
<INPUT TYPE="SUBMIT" VALUE="Upload!">
</FORM>
</BODY>
</HTML>
Count = Upload.SaveVirtual ("/data") %>
<% = Count
%> file(s) uploaded.
<BODY BGCOLOR="#FFFFFF">
<FORM METHOD="POST"
ENCTYPE="multipart/form-data" ACTION="DataUpload.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>
' Upload files
%>
Upload.OverwriteFiles = False ' Generate unique names
Upload.SetMaxSize 1048576
' Truncate files above 1MB
Upload.SaveVirtual
"/data" ' Save to data directory
For Each File in Upload.Files
File.ToDatabase ' Save in the database as blob
"DSN=userid.dsn_name;UID=user_id;PWD=account_Password;",_"insert
into UploadTable (id, FilePath, image)values (12, '" & File.Path &
'",?)"
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
<BODY<br> <IMGSRC="getimage.asp?id=12">
</BODY>
</HTML>
Set db = Server.CreateObject("ADODB.Connection")
%>
db.Open
"userid.dsn"
Set rs =db.Execute("SELECT image FROM uploadTable where id
= " & Request("id" )
Response.ContentType =
"image/gif" (or "image/jpeg")
Response.BinaryWrite rs("image")