Foros del Web » Programando para Internet » ASP Clásico »

aspupload aspjpg

Estas en el tema de aspupload aspjpg en el foro de ASP Clásico en Foros del Web. Hola a todos, necesito ayuda con este codigo: Código PHP:     Set Upload  =  Server . CreateObject ( "Persits.Upload" )      ' Use AspJpeg to resize image     Set Jpeg = Server.CreateObject("Persits.Jpeg")     '  Capture  and  save uploaded image to the same directory  ...
  #1 (permalink)  
Antiguo 22/07/2009, 09:52
 
Fecha de Ingreso: enero-2002
Mensajes: 1.438
Antigüedad: 23 años, 3 meses
Puntos: 0
aspupload aspjpg

Hola a todos, necesito ayuda con este codigo:

Código PHP:
    Set Upload Server.CreateObject("Persits.Upload")

    
' Use AspJpeg to resize image
    Set Jpeg = Server.CreateObject("Persits.Jpeg")

    ' 
Capture and save uploaded image to the same directory as script
    Upload
.Save("c:\upload\")

    Set File = Upload.Files(1)

    Jpeg.Open File.Path

    Jpeg.Width = 200
    Jpeg.Height = 100
    
    Jpeg.Save ("
c:upload") & File.FileName
    response.write("
Imagen subida correctamente") 

Como pueden ver, subo una imagen,
llamada la_foto_de_mi_prima.jpg

y luego la redimensiono y la piso. (o eso creo q hago)

el tema es poner un poco de orden y renombrar las imágenes tipo FOT0102.jpg

como lo puedo hacer?


ya que estoy, el aspjpg me sirve para cargar un GIF y pasaro a jpg?

opr supuesto para no dejar barura, tb tendria q ir borrando los gifs
  #2 (permalink)  
Antiguo 22/07/2009, 15:47
 
Fecha de Ingreso: abril-2006
Mensajes: 69
Antigüedad: 19 años
Puntos: 0
Respuesta: aspupload aspjpg

Para el tema de los nombres, yo utilizo el siguiente sistema:

<%

//////////Se crea una variable para el nombre de la foto con la fecha y hora actuales//////////

fecha = now()

ano = year(fecha)
mes = month(fecha)

If mes < 10 Then
mes = "0" & mes
End If

dia = day(fecha)

If dia < 10 Then
dia = "0" & dia
End If

horas = hour(fecha)

If horas < 10 Then
horas = "0" & horas
End If

minutos = minute(fecha)

If minutos < 10 Then
minutos = "0" & minutos
End If

segundos = second(fecha)

If segundos < 10 Then
segundos = "0" & segundos
End If

xnombre_archivo = ano & mes & dia & horas & minutos & segundos & (".jpg")

' Se guarda la nueva imagen en la ruta indicada con el nombre deseado
Jpeg.Save Server.MapPath("imagenes") & "\" & xnombre_archivo

'Se borra el archivo original, que ya no es necesario
File.Delete

%>

De este modo, es imposible que dos imágenes tengan el mismo nombre, y que una pueda borrar a la otra sin querer, ya que siempre cogen la hora exacta del servidor en ese momento, y ésta no se puede repetir.

Para la pregunta de los archivos .gif no sé la respuesta. De momento sólo me ha tocado usar este componente con .jpg.

AHORA UNA PREGUNTA DE COSECHA PROPIA

Yo utilizo este componente en formularios que también tienen que enviar más información en campos de tipo texto. Así que recojo la información de esos input con Upload.Form("variable"). Pero he comprobado que estos Upload.Form sólo funcionan si se envía una imagen. Es decir, que si tú no envías una foto, tampoco se recibe ningún otro dato.

Imaginemos una web donde el usuario introduce sus datos en una ficha, y, SI LO DESEA, su foto también. Pues bien, el Request.Form no se puede usar, porque estamos con un formulario del tipo ENCTYPE="multipart/form-data". Pero el Upload.Form tampoco lo podemos usar, porque el usuario no ha querido adjuntar una foto. ¿Cómo solucionamos este problema? ¿A alguien le ha pasado antes y me puede dar una pista?

Muchas gracias y un saludo.
  #3 (permalink)  
Antiguo 23/07/2009, 03:50
 
Fecha de Ingreso: enero-2002
Mensajes: 1.438
Antigüedad: 23 años, 3 meses
Puntos: 0
Respuesta: aspupload aspjpg

la solucion será utilizar dos forms separados
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 11:43.