Ver Mensaje Individual
  #6 (permalink)  
Antiguo 18/01/2006, 04:51
tammander
 
Fecha de Ingreso: enero-2006
Ubicación: Torroles (Costa der Só)
Mensajes: 1.017
Antigüedad: 19 años, 4 meses
Puntos: 7
Me gustaria ver como has implementado el codigo por que aun no lo tengo claro. Veamos si estoy en lo cierto:

- Tienes un documento asp (llamado p. ej. formenvio.asp) donde esta el formulrio de envio con sus campos de texto y sus campos de archivos y el formulario tiene el tipo de encriptacion 'multipart/form-data') Este formulario tiene una accion de envio a otra página.

- Esta otra página (p. ej. 'formenviado.asp') contiene el codigo asp de recepcion del formulario multipart/form-data al inicio de la página (recuerda que si usas multipart/form-data tienes que gestionar los datos enviados antes que nada ya que si no es asi se pierden. Esto es asi en ASP, PHP, Perl, CGI, etc) Algo asi:

Código:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="xelupload.asp"-->
<%

' Creamos instancia y se llama al metodo Upload para que lo asocie a lo enviado por el formulario desde la otra pagina
Dim objUpload
objUpload.Upload()

' Recogemos la info de los campos de texto
Dim nombre, apellidos
nombre = objUpload.Form("nombre")
apellidos = objUpload.Form("apellidos")

' Ahora vamos a por los archivos
' Si solo tenemos uno, creamos una instancia y la asociamos al objeto:
Dim objFicero
set objFichero = objUpload.Ficheros("imagen")

' Ahora hacemos lo que queramos con el ya que tenemos una serie de metodos y propiedades

' Por ejemplo
Dim correcto
correcto = instr(objFichero.TipoContenido,"gif") or instr(objFichero.TipoContenido,"jp")

' o
Dim nombrarchivo
nombrearchivo = objFichero.Nombre

' Tambien podemos usar sus metodos, p. ej. para guardar en una ruta especifica:
objFichero.Guardar (Server.MapPath("\upload"))



' Ahora bien. Si en el formulario habia más de un campo tipo 'File' tendremos que recorrerlos de la siguiente forma, cada vez que la sentencia For asigna a objFichero un archivo podemos hacer con el lo mismo que hemos hecho antes con uno, o sea:

for each objFichero in objUpload.Ficheros.Items
	' Por ej. solo queremos usar el metodo Guardar
        objFichero.Guardar (Server.MapPath("\upload"))
next
%>
Espero que esto te ayude.

Un saludo