|
Line # |
HTML |
|
|
| 1 |
<% |
| 2 |
Option Explicit |
| 3 |
|
| 4 |
Dim upl, NewFileName |
| 5 |
|
| 6 |
Set upl =
Server.CreateObject("ASPSimpleUpload.Upload") |
| 7 |
|
| 8 |
If Len(upl.Form("File1")) > 0 Then |
| 9 |
NewFileName = "/Uploads/" &
upl.ExtractFileName(upl.Form("File1")) |
| 10 |
If upl.SaveToWeb("File1", NewFileName) Then |
| 11 |
Response.Write("File successfully written
to disk.") |
| 12 |
Else |
| 13 |
Response.Write("There was an error saving
the file to disk.") |
| 14 |
End If |
| 15 |
End If |
| 16 |
%> |
| 17 |
|
| 18 |
<html><head><title>ASP Simple Upload Example
#1</title></head></title> |
| 19 |
<body> |
| 20 |
<form method="POST" action="Example1.Asp"
enctype="multipart/form-data"> |
| 21 |
Select a file to upload: <input type="file"
name="File1" size="30"> |
| 22 |
<input type="submit" name="submit" value="Upload
Now"> |
| 23 |
</form> |
| 24 |
</body> |
| 25 |
</html> |
|
Line # |
Descripción |
|
|
| 1 |
Arranca el código ASP del archivo. |
| 2 |
Nos Obliga a declarar todas las variables. |
| 4 |
Declara las variables que vamos a usar en
el código. |
| 6 |
Crea un evento del componente Upload que
podemos usar a través del código. |
| 8 |
Revise si el usuario subió un archivo. Si
sucedió, entonces podrá ver el nombre del archivo en su disco duro. También
nótese que usamos el componente para tener los campos del formulario, y no
el (Request object). Usted debe usar el componente para leer las variables
del formulario en todas las formas de "upload". |
| 9 |
Establezca una variable NewFileName
(nuevonombredearchivo) al directorio /Uploads/ en la raíz del
servidor de Web y pegué solamente el nombre del archivo que ha sido
descargado. |
| 10 |
Grabe el archivo a el servidor Web. Este
método automáticamente llama al Server.MapPath (ruta de descarga) de
manera que no tiene que descubrir donde esta físicamente localizada su Web.
El primer parámetro SaveToWeb es el nombre del campo (File1) y el segundo
parámetro es la ruta (localización) y nombre de archivo al que usted quiere
grabar. |
| 11 |
Si la grabación fue exitosa le informamos
al usuario. |
| 13 |
De otra forma Informe que la grabación
fallo. |
| 16 |
Finaliza la parte ASP de la página. |
| 20 |
Inicie el formulario asegurándose que
establezca el método a POST y el enctype a multipart/form-data. |
| 21 |
Añada un Tag de entrada de archivo al
formulario con el tipo de archivo y el nombre de campo de formulario del
"File1" y la longitud del campo (en la pantalla se ve de 30) |
| 22 |
Añada un botón de "submit" enviar, al
formulario de manera que después que el usuario seleccione un archivo lo
puedan enviar al formulario para su procesamiento. |
| 23 |
Fin del formulario. |