Ver Mensaje Individual
  #2 (permalink)  
Antiguo 27/06/2008, 05:54
portillo18
 
Fecha de Ingreso: abril-2008
Mensajes: 51
Antigüedad: 17 años
Puntos: 1
Respuesta: Envio de Fotos

yo he hecho algo parecido, creo:

En primer lugar debes de guardar la imagen que subes en el servidor, en mi caso lo hago con el objeto upload, te copio el codigo haber si te puedes aclarar:

Cita:
ruta = server.mappath("\") & "\administracion\reportajes"

Set Upload = Server.CreateObject("Persits.Upload")
'Guardo la imagen en memoria
Upload.Save

Set imagenGrande = Upload.Files("Archivo")
imagenGrande.SaveAs ruta & "\pdf\" & imagenGrande.OriginalFileName

For Each archivo In Upload.Files
'Obtengo el nombre del fichero subido
nombreArchivo = archivo.OriginalFileName


Next

SQL ="Update reportajes set archivo = '"&nombreArchivo&"' where id = '"&idrep&"'"
Reservas.Execute(SQL)
end if
Esto es lo que hago, es decir en primer lugar guardo la imagen en el servidor, en este caso la carpeta pdf y posteriormente guardo el nombre del archivo en la base de datos.


Espero que te sirba!!

Comenta resultados:)

Un saludo
__________________
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Publicado por: portillo18
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-