|
El siguiente documento describe el uso de ASP Upload.
NOTA: Esta función está solo disponible en planes Windows 2000.
¿Qué navegadores son compatibles con los archivos .asp?
Usted puede usar los siguientes navegadores (RFC 1867 compatibles) para transferir los archivos:
- Netscape 3.0 o superior
- Microsoft INternet Explorer 4.0 y superior
¿Cómo transfiero a un directorio de datos?
Usted podrá transferir hasta tres archivos y el correspondiente script asp a un directorio de datos creando el siguiente formulario HTML:
- upload.html
<HTML>
<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>
- upload.asp
<% Set Upload = Server.CreateObject ("Persits.Upload.1")
Count = Upload.SaveVirtual ("/data") %>
<% = Count %> file(s) uploaded
¿Cómo transfiero a una base de datos?
Usted podrá transferir tres archivos a una base de datos creando el siguiente formulario HTML:
- dataupload.htm
<HTML>
<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>
- dataupload.asp
Transferir archivos a una base de datos requiere un poco más de código:
<% Set Upload = Server.CreateObject ("Persits.Upload.1")
' Upload files
Upload.OverwriteFiles = False ' Generate unique names
Upload.SetMaxSize 1048576 ' Truncate files above 1MB
Upload.SaveVirtual "/data" ' Save to data directory
' Process all files received
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 UploadTalble (id, FilePath, image)values (12, '" & File.Path & '",?)"
Next
' Display description field
Response.Write Upload.Form ("Description") & "<BR>"
' Display all selected categories
For Each Item in Upload.Form
If Item.Name = "Category" Then
Response.Write Item.Value & "<BR>"
End If
Next
%>
¿Cómo transfiero una imagen de mi base de datos a una página web?
Para incluir una imagen transferida de su base de datos en una página web, usted puede usar los tags <IMG> en su página HTML con el atributo SRC apuntando al script asp. Fijarse en los siguientes ejemplos:
- getimage.asp
<% Set Upload = Server.CreateObject ("Persits.Upload.1")
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")
%>
|
