Problema con xelupload

[Joseph]

Tengo un problema, yo quiero que los usuarios suban algunas fotos a un album, pero tambien deseo que no exista la posibilidad de que se suban fotos con el mismo nombre, para esto le estoy colocando la hora con minutos y segundos al archivo funciona pero sube el nombre sin la extension.jpg o gif... como hago? gracias

les dejo el codigo para que lo vean



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



<!--#include file="xelupload.asp"-->
<%
Dim up, fich
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>Nombre: <b>" & fich.Nombre & "</b></li>")
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/imagenes")
nombrefichero = Hour(Time) & Minute(Time) & Second(Time)
' Con otro nombre:
fich.GuardarComo nombrefichero Server.MapPath("../fotos/imagenes")
'----------------------------------------------------------------
Next

'Limpiamos objeto
set up = nothing
%>
Powered by <b>xelUpload</b>

[Joseph]

Ahh se me olvidaba quiero agregarle al tiempo el nombre del archivo. ejemplo 100125invierno.jpg, siendo 100125 la hora, minutos y segundo e invierno el nombre del archivodel usuario.


Gracias de antemano

[Joseph]

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
%>