Upload v/s yo...

[GaboMaKano]

amigos alguien tiene un manual de ayuda para hacer uploading de ficheros, tengo un form con 5 campos uno de texto y los otros cuatro de tipo file, la idea es subir los arvchivos al servidor y poder guardar en la base de datos el campo texto 1 y el path de los archivos subidos en cada uno de los 4 campos restantes.

Use freeasoupload, pero no consigo fucionar mis necesidades, si alguien me puede ayudar a hacerlo se los agradecería mucho, probe tb, xelupload...

[tammander]

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

FreeASPUpload: http://www.freeaspupload.net/freeasp...umentation.asp

San Google

[GaboMaKano]

master, si llegue aqui es porque estoy al borde del sucidio..... y ya vi esas alternativas pero no logro la fusión..

[Myakire]

pues no tiene problemas con xelupload, quizá si vieramos algo del código que ta tienes o si nos dijeras que problema específico tienes, sería más fácil

saludos

[GaboMaKano]

maestro, he logrado integrar el codigo del xelupload, puedo subir mis campos de textos más un archivo.

Código:

set objFich = objUpload.Ficheros("file1") <--- recupera desde uno de los campos File ese archivo, lo sube y listo, queda guardado, pero como comentaba anteriormente, necesito más de un fichero que se suba.
if objFich.Tamano <= maxtam and objFich.TipoContenido = "image/gif" then
objFich.Guardar Server.MapPath(".")
........

Dentro de la documentación de xelupload sale lo siguiente dependiento del caso que se quiera implementar:1 archivo o varios.

Código:

Dim objUpload, objFichero
objUpload.Upload()

'si teníamos <input type="file" name="imagen">
set objFichero = objUpload.Ficheros("imagen")

'recorremos todos:
for each objFichero in objUpload.Ficheros.Items
	...
next

Si te fijas en la documentación http://www.aspfacil.com/articulos/07092001.asp

Código:

'recorremos todos:
for each objFichero in objUpload.Ficheros.Items
	...
next

da esta opción para recorrer todo el arreglo y poder rescatarla info desde el formulario, pero mis escasos conocimientos en asp, me impiden integrar esto en el script original que sale en la documentación.
Espero haber sido claro y ojala me puedan ayudar.
Gracias por su tiempo.

[tammander]

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

[zacktagnan]

Hola GaboMaKano:

Yo estoy programando una web y en el sistema de gestión de ésta también estoy poniendo formularios con campos de texto y para subir imágenes al servidor.
A la tabla específica de la base de datos llegan los datos tanto los de texto como el nombre de las imágenes subidas.

Y he utlizado los scripts de freeaspupload.net, adaptándolos también para que los archivos de imagen subidos se renombren según ciertos datos insertados en el formulario.

Si quieres, pincha en el siguiente vínculo para descargarte un .zip con los archivos, te lo pones en la carpeta raíz (wwwroot) de tu Inetpub y lo descomprimes y pruebas. Te debería funcionar sin cambiar nada más.
http://free.7host06.com/webzk/henday...uebaUpload.zip

Al probar,si no cambias nada, los archivos quedarán en esta ruta:
C:\Inetpub\wwwroot\pruebaUpload\pruebas\new-upload

Los datos se guardan en la tabla promos00 de la base de datos

Echa un vistazo a todo si quieres. Cualquier duda...

Si el enlace no funciona, y te interesa, te podría mandar el .zip por correo teniendo tu email.

PD: tenía un problema con este código de subida a la hora de renombrar los archivos, cosa que planteé en este foro (título del tema: Controlar código en un Upload) pero nadie respondió.

Saludos,

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

[GaboMaKano]

gracias por la ayuda maestros, me pondre en camapaña para tratar de solucionar esto.
Master zacktagnan, hay alguna forma de cambiar la ruta donde se guarda el archivo por una ruta virtual ??

Código:

C:\Inetpub\wwwroot\pruebaUpload\pruebas\new-upload

[zacktagnan]

¿Has descargado el .zip?

En el sitio gratuito donde lo subo, dónde tengo alojadas unas páginas web, no sé porque después de un tiempo desaparece. No sé si es porque no llega a admitir totalmente los .zip, ó por el tamaño (pero si no recuerdo mal son solo alrededor de 250 kb, ¿eso es mucho?).

Si no lo has descargado aún y te termina interesando, mándame un email a:
[email protected]

Respecto a tu pregunta, no lo he probado, pero supongo que lo más normal es que si funcione.

Es decir, si te bajas los archivos y entras a ver el código (concretamente, el que lleva el formulario es el llamado adm_insProm.asp, dentro de la carpeta 'admin'), verás que la ruta que ahora está programada como destino de los archivos está dentro de una variable (ahora no me acuerdo exactamente de su nombre pero es algo como 'subidaArchivos' ó algo parecido), casi al principio del código.
Entonces, si quieres cambiar de ruta sólo tienes que cambiar su valor
subidaArchivos = "la_Ruta_Que_Quieras"

ó asignarle otra variable que venga, yo que sé, de una base de datos, digo yo...

De igual manera, si cambias esta ruta, tendrás que adaptar las líneas dónde se renombra el archivo subido para que apunten a la nueva ruta igualmente.

Por último, la parte de Upload y la de Renombrar no están relacionadas en el sentido de que para que suban los archivos, se tengan que renombrar. Eso es algo que he puesto para la web que yo estoy programando, y que me sirve para rconocer mejor las imágenes y saber a que pertenecen.

Si tu sólo quieres que te funcione el Upload, sin Renombrar, basta con que quites las líneas referentes al renombramiento, y la subida seguirá funcionando.

Nada más, si terminas usándolo y subiéndolo a un servidor de Internet, me gustaría saberlo. Por ahora, lo he probado localmente pues todavía no tengo el sitio preparado dónde subirlo a Internet.

Saludos,

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

[zacktagnan]

PD.: Mañana, a mediodía, pondré de nuevo el archivo [pruebaUpload.zip] en el mismo sitio aunque no sé cuanto permanecerá.

Saludos,

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

[GaboMaKano]

lo descargue y lo tengo en mi poder... toy pensando seriamente volver a mi php querido jajaja.
Gracias zacktagnan por tu ayuda..

[bitshoot]

prueba con esto...
set objUpload = new xelUpload
objUpload.Upload()

'recives tus variables del formulario

var_id_en = objUpload.Form("id")
titulo = objUpload.form("titulo")
footer = objUpload.Form("footer")
alinear = objUpload.Form("radiobutton")

set objFich = objUpload.Ficheros("archivo") 'nombre de la caja del formulario
objFich.Guardar Server.MapPath("up_componeMail") 'carpeta donde guardaras
Aux_imagen=objFich.Nombre
set oFich = nothing

sql4 = "INSERT INTO tutabla (id_encta, titulo, archivo, footer, alinear" & _
" ) VALUES (" & _
" "& var_id_encuesta &"," & _ " '"& titulo &"'," & _
" '"& Aux_imagen &"'," & _
" '" & footer & "'," & _
" '" & alinear & "' " & _
")"
conexion.EXECUTE sql4


toy trabajando para subir archivos de texto, podrias ayudar con el codigo...

[zacktagnan]

Bueno, GaboMakano, si ya lo tienes, no hace falta que lo cuelgue de nuevo. A no ser que otro le interese. Lo mismo puede mandarme un email como dije al correo arriba mencionado, indicando el asunto al que se refiere.

Pues eso, GaboMakano, tu decides si terminas usándolo ó eliges otra opción

Saludos,

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