¿Como subir un archivo a servidor?

A_girl · #1 (**permalink**) 09/03/2006, 08:11

Hola.
Quisiera ver el script de como subir un archivo al servidor.
Este es mi caso:
el usuario llena un formulario en el cual tiene la opcion de adjuntar un archivo.
y no se como se hace.

Tambien quiero saber como mostrar despues los archivos relacionados a ese formulario.Pero eso despues.

primero como se sube?.

Gracias.

gorka_arai · #2 (**permalink**) 09/03/2006, 08:26

Quizá te ayude el componente xelupload.asp. En este foro se ha hablado mucho sobre el mismo, seguro que encuentras la respuesta entre los hilos...
AAAA BUSCAAAR...

A_girl · #3 (**permalink**) 09/03/2006, 08:32

oka.
Pero ke es eso?--> "Xelupload.asp"

gorka_arai · #4 (**permalink**) 09/03/2006, 08:57

xelUpload es el nombre de una clase de VBScript que presenta propiedades y métodos para manejar el envío de ficheros al servidor. Su único requerimiento es disponer de la versión 5 o superior del motor de script. Para ver qué versión tienes disponible, puedes escribir:

Código:

Response.Write ScriptEngineMajorVersion

Si ves un 5, todo es correcto. Si no, puedes descargar gratis la última versión desde el sitio de Microsoft sobre script, o instalar Internet Explorer 5 o superior, que la incluye entre sus ficheros.

Por si no lo sabíais, para que el fichero llegue correctamente al servidor, tenemos que añadir un atributo más a la marca FORM, el que especifica la codificación del formulario al enviarlo, y nos permite subir datos binarios, así:

Código:

<form action="pagina.asp" method="post" enctype="multipart/form-data">

Encontrarás mucha más información sobre cómo usarlo en la página güeb de donde he sacado toda esta txapa (o me creiais capaz de escribir todo esto?

): http://www.aspfacil.com/articulos/07092001.asp

Muxus!!

A_girl · #5 (**permalink**) 09/03/2006, 09:12

Sip es mayor que 5.
y sip,tambien sabia del "enctype".
en action estoy llamando al mismo formulario.
y quiero agregar el script de upload en el formulario.

Ya se del type=file,
me falta como subirlo.(cual script es?).
y bueno despues mostrarlo :P
nada mas...xD

trasgukabi · #6 (**permalink**) 09/03/2006, 10:48

Cita:

Iniciado por gorka_arai

http://www.aspfacil.com/articulos/07092001.asp

Muxus!!

A_girl · #7 (**permalink**) 09/03/2006, 12:39

no hay otro?

ElAprendiz · #8 (**permalink**) 09/03/2006, 13:18

si pero la mayoria de pago, tienes que ver si tu servidor tiene alguno instalado

El_Metallick · #9 (**permalink**) 09/03/2006, 13:57

Cita:

Iniciado por gorka_arai

Quizá te ayude el componente xelupload.asp. En este foro se ha hablado mucho sobre el mismo, seguro que encuentras la respuesta entre los hilos...
AAAA BUSCAAAR...

Amigo gorka... hasta donde se xelupload no es un componenete... solo es una clase hecha en VBScript que permite subir archivos al servidor, de hecho lei por ahi que los copia y los pega... pero no es un componente.. de hecho esa es una de sus mejores gracias... bueno solo eso una pequeña corrección... saludos

gorka_arai · #10 (**permalink**) 09/03/2006, 16:10

No se te escapa una eh Metallick?
Tendré que andar por el foro con pies de plomo

... Es lo que tiene la cafeína...

Saludetes pa ti tbien!!

trasgukabi · #11 (**permalink**) 09/03/2006, 23:06

Buen apunte, METALLICK. La cuestión es que a A_GIRL se le han propuesto todas las opciones disponibles para manejarse en este tema y está pidiendo soluciones más difíciles (ahora mismo, que yo sepa, no hay nada más fácil para la subida de ficheros que xelupoad). Resumiendo: un 10 para Gorka y otro 10 para el colega Metallick.

Off-topic: por cierto, cada vez me gustan más los jueves para salir de juerga....jejeje

zacktagnan · #12 (**permalink**) 10/03/2006, 06:22

Otra opción para subir archivos mediante código:

http://www.freeaspupload.net/

(bueno la página es en inglés)

Yo uso esto y por ahora va bien.

Saludos,

zacktagnan.
========================================0

A_girl · #13 (**permalink**) 10/03/2006, 09:35

eso ya lo habia visto.
pero no lo entiendo T.T
ademas lo trate de probar pero me tira el siguiente error:
ADODB.Stream error '800a0bbc'

Error al escribir en el archivo.

/freeaspupload.asp, line 63
.......
esta es la linea 63 : streamFile.SaveToFile path & fileItem.FileName, 2

Mickel · #14 (**permalink**) 10/03/2006, 09:43

eso es debido a que no tienes permisos de lectura/escritura para esa carpeta

A_girl · #15 (**permalink**) 10/03/2006, 10:53

no entendi tu pagina-->sinceramente-->ignorantemente?

zacktagnan · #16 (**permalink**) 13/03/2006, 07:12

Respecto a la subida de archivos haciendolo con los códigos de los dos archivos del freeaspupload:

- Mirar las instrucciones en la web original ó en los comentarios de los archivos en su parte de ventana de código

- Hay que tener permisos de lectura/escritura/borrado en la carpeta elegida para guardar los archivos que se suban

- La ruta a la carpeta elegida se establece como valor de una variable que aparece al principio del código del documento "upload.asp"

Más ó menos esto es lo básico...

Saludos,

zacktagnan.
=========================================

A_girl · #17 (**permalink**) 13/03/2006, 08:59

si tengo derechos de escritura/lectura/borrado en la carpeta.
en realidad la misma carpeta que uso para guardar los formularios,
la usaria para guardar los archivos adjuntos.

zacktagnan · #18 (**permalink**) 13/03/2006, 12:55

En principio, el archivo "freeaspupload.asp" que es el que lleva el código principal de funciones para realizar la transferencia de archivos, no hace falta modificarlo.

Lo único que habría que modificar es la ruta a la carpeta destino (con todos los permisos necesarios) que se encuentra como valor de una variable, probablemente llamada originariamente "uploadsDirVar"

Y no sé que más decirte...

Respecto a lo de stream...En la sección Requisitos de la página en inglés de dónde se descargan los archivos hace una pequeña mención,... que igual si es necesario hay que actualizar algún objeto ADO...

Saludos,

zacktagnan.
=================================

A_girl · #19 (**permalink**) 13/03/2006, 13:22

Muchas gracias por la ayuda.
aunque no me funciono.
saludos.
bye

bye

zacktagnan · #20 (**permalink**) 15/03/2006, 04:53

Si quieres A_Girl, si my pasas tu email te puedo mandar una carpeta con una prueba configurada que funciona, hecha con lo del freeaspupload...
Luego, tendrías que adaptarla a tus necesidades, pero de primeras la subida de archivos va bien siempre que cumplas los requisitos mínimos que te dije.

Saludos,

zacktagnan.
============================================

lubega · #21 (**permalink**) 25/06/2006, 18:07

Hola, he empezado a usar el freeaspupload y no me funciona, me da un error en el iss 5.1 diciendo:
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01FA)
Clase no definida: 'FreeASPUpload'
La verdad es que no se por qué dice eso, pq yo tengo el include del archivo freeaspupload.asp puesto. puesto. ¿Podría alguien ayudarme?

mi otra opcion es usar el xelupload pero por lo que me han comentado no es muy bueno para archivos de más de un mega, y un mi caso los necesito de más de ese tamaño.
muchas gracias de antemano

El_Metallick · #22 (**permalink**) 25/06/2006, 18:42

quiza no instalaste el componenete en tu ordenador... pues freeaspupload es un componente (si me equivoco que me corrijan), verifica si lo tienes instalado... si es asi pon algo de codigo para ver en que fallas... saludos

lubega · #23 (**permalink**) 26/06/2006, 05:43

Y como se instala? es que yo sólo tengo 2 ficheros: Uno que es freeaspupload.asp y otro que es pruebaupload.asp

El_Metallick · #24 (**permalink**) 26/06/2006, 11:45

ahi tendrias que leer la documentacion del sitio... por lo menos yo nunca lo he usado.. saludos

JosePF · #25 (**permalink**) 23/03/2007, 05:39

hola a todos. Estoy intentando subir archivos al servidor (iis,asp) y no encuentro el fichero "xelUpload.asp" así que no puedo hacer el include. ¿en que lugar del sistema devería estar?

hugorei · #26 (**permalink**) 28/07/2007, 08:35

pregunta en el ejemplo :

ublic Sub Guardar(ruta)
Dim oFSO, oFich
Dim i

if ruta = "" or Nombre = "" then Exit Sub
if Mid(ruta, Len(ruta)) <> "\" then '"
'añado la ultima barra a la ruta
ruta = ruta & "\" '"
end if

set oFSO = Server.CreateObject("Scripting.FileSystemObject")
if not oFSO.FolderExists(ruta) then Exit Sub
set oFich = oFSO.CreateTextFile(ruta & Nombre, true)

for i = 1 to LenB(Datos)
oFich.Write Chr(AscB(MidB(Datos, i, 1)))
next

oFich.Close
set oFSO = nothing
End Sub
'------------------------------------------------------------------------
Public Sub GuardarComo(nombrefichero, ruta)
Dim oFSO, oFich, i

if ruta = "" or nombrefichero = "" then Exit Sub
if Mid(ruta, Len(ruta)) <> "\" then '"
'añado la ultima barra a la ruta
ruta = ruta & "\" '"
end if

set oFSO = Server.CreateObject("Scripting.FileSystemObject")
if not oFSO.FolderExists(ruta) then Exit Sub
set oFich = oFSO.CreateTextFile(ruta & nombrefichero, true)

for i = 1 to LenB(Datos)
oFich.Write Chr(AscB(MidB(Datos, i, 1)))
next

oFich.Close
set oFSO = nothing

End Sub

cuando dice : 'añado la ultima barra a la ruta
ruta = ruta & "\"

ahi hay que poner la ruta donde lo va a subir ? y como seria añadir la barra a la ruta ? digamos como se escribiria ?

GRACIAS