Ver Mensaje Individual
  #3 (permalink)  
Antiguo 25/11/2007, 10:48
Joseph
 
Fecha de Ingreso: febrero-2003
Mensajes: 233
Antigüedad: 22 años, 2 meses
Puntos: 4
Re: Problema con xelupload

Bueh... ya lo resolví... les dejo el código por si acaso le hace falta a alguna otra persona....

Les comento un poco lo que hice...

Para la extención .jpg declare una constante y se lo anexe a la cadeda del nombre del archivo, y para que no se repita el nombre, puse como nombre del archivo dia,mes,año,hora,minutos,segundo. jajaja casi imposible de que se repita

bueno si pero muy dificil

aqui les dejo el codigo

--------------------------------------------------------------------------------

<!--#include file="xelupload.asp"-->
<%
Dim up, fich
Const ext = ".jpg"
set up = new xelUpload
up.Upload()

Response.Write("Número de ficheros subidos: " & up.Ficheros.Count & "<br>")
Response.Flush
For each fich in up.Ficheros.Items
Response.Write("<ul>")
Response.Write("<li>Tamaño: <b>" & fich.Tamano & "</b> bytes (" & FormatNumber(fich.Tamano / (1024*1024)) & " Mb)</li>")
Response.Write("<li>Tipo MIME: <b>" & fich.TipoContenido & "</b></li>")
Response.Write("</ul>")

'Para guardarlo
' Con el nombre de fichero original:
' fich.Guardar Server.MapPath("../fotos/images")
nombrefichero = day(Date) & month(Date) & Year(Date) & hour(Time) & minute(Time) & second(Time) & ext
' Con otro nombre:
fich.GuardarComo nombrefichero, Server.MapPath("../fotos/imagenes")
'----------------------------------------------------------------
Next

'Limpiamos objeto
set up = nothing
%>