xelupload

[Blashak]

Buenas estoy haciendo un formulario que guarda 6 imagenes en la carpeta y el nombre de la imagen en la bd pero el problema llega cuando guarda el nombre de la imagen porque si le ponen el mismo nombre se sobre escriben. queria saber como puedo hacer para guardarlas automaticamente con nombre diferentes.Tener en cuenta que ya puede aver guardadas otras imagenes.
mi codigo:
sextofichero = ?(que tendria q poner aca para q me la guarde difente al resto)
objFich6.GuardarComo sextofichero, Server.MapPath("..\web\imagenes")
saludos

[Shiryu_Libra]

si ya sabes que solamente son 6 por subida

Dim objUpload, objFichero, Nombres(5)
objUpload.Upload()

'si teníamos <input type="file" name="imagen">
set objFichero = objUpload.Ficheros("imagen")
i=0
'recorremos todos:
for each objFichero in objUpload.Ficheros.Items
Nombres(i)=objFichero.Nombre
...
...
i=i+1
next

ya solo despues recorres el arreglo y guardas los datos en la base de datos; en caso de que sean mas de 6 las imagenes que puede subir al servidor el usuario

modifica el numero 5 en la definicion por 0

Nombres(0)

y dentro del for, anexale

REDIM PRESERVE Nombres(i)
Nombres(i)=objFichero.Nombre

espero te sirva de guia



anexo: Referencia de los comandos de XELUPLOAD

[Blashak]

Shiryu_Libra ta bien asi como me decis lo q pasa esk si lo guardo asi como vos decis se me sobreescriben las imagenes porq?
mira envio el formulario entonces las iamgenes la primeraves se me giuarda como.
1, 2, 3, 4, 5 y si envio otro formulario de nuevo con otras imagenes diferentes se guardaran con 1, 2 ,3... entonces se me borraran las anteriores.
tengo que hacerlo de tal forma q al grabar las imagenes me las guarde de una forma que si depsues envio otro formulario no me las vuelva a grabar asi.
ya se que es un poko lio pero bueno si me puede ayudar se los agradeceria.
Saludos

[Shiryu_Libra]

si puedes muestra la forma en que haces el insert en la tabla, a lo mejor se esta escapando algo por ahi, y como ya has de tener tiempo con el detalle, la mente no lo encuentra tan rapido.

algo mas, cuando terminas el procedimiento, hay que liberar el arreglo

redim Nombres(0)
set nombre=nothing

puede ser que se mantengan los nombres, ya que estamos usando la sentencia PRESERVE, entonces le estamos diciendo que siempre mantenga los nombre, y le anexe mas datos al arreglo

ahora no tiene que haber tanto lio, por que puedes lidiar con los nombres de otra manera. puedes agregarle, la fecha, o incluso el nombre de la persona que lo esta subiendo al servidor

2007/12/15-image1.jpg

o si lo que deseas es que se mantenga la numeracion 1,2,3,4,.....
al insertar datos
si lo hace en Batch

RS.Addnew
rs.campo1=dato1
rs.campo2=dato2
.
.
RS.UpdateBatch

si lo deseas realizar por sentencia SQL directa

SQL="INSERT INTO tabla VALUES(dato1,dato2)"

o en campos especificos

SQL="INSERT INTO tabla(campo1,campo2) VALUES(dato1,dato2)"