problemas al renombrar imagen

[popi]

Buenas a todos !!!

Estoy creando una base de datos de noticias en asp con tres campos: idnoticia, descripcion, foto.

A través de un formulario entro los registros y subo las imagenes al servidor dentro de una carpeta.

Estoy intentando crear un sistema de renombrar los archivos de las imagenes poniendo un nombre generico tipo "nombre+(el campo idnoticia que es autonumerico) " de forma que el registro 1 tendria como imagen la foto1.

Supongo que es sencillo pero soy un poco novato, y no me acaba de salir.

Aki va mi codigo a ver si alguien me puede echar una mano:

Código HTML:

            NombreAnterior =("foto")   
             
            NombreNuevo = (".\upload\"foto"&idnoticia&".jpg") 
            
            Set FSO = Server.CreateObject("Scripting.FileSystemObject") 
   
            Set Fich = FSO.GetFile(Server.MapPath("\" & NombreAnterior)) 
   
            Call Fich.Copy(Server.MapPath("\" & NombreNuevo)) 
  
            Call Fich.Delete() 
    
           Set Fich = Nothing 

           Set FSO = Nothing

Tampoco no se si este es el mejor script para realizar esto, despues de mirar muchos este a sido el que me parecia mejor para lo que queria realizar.

Para subir las imagenes al servidor he utilizado freeaspupload

[popi]

Bueno,

Vuelvo a plantearlo,

quiero renombrar y cambiar de sitio unos archivos de imagen

que se suben al servidor.

Para renombrarlo queria hacer ponerle un nombre

tipo "foto" seguido de un numero, en este caso poner el mismo numero del

campo idnoticia que es autonumerico, de forma que nunca se me duplicarian los

nombres de las imagenes.

Es decir si el campo idnoticia tiene el valor "1"

entonces el campo imagen cambiarlo a una carpeta "/upload" con el nombre "foto

1" .

GRacias por escucharme !!! un saludo

[Shiryu_Libra]

haz procedimiento separados
sube tus imagenes, haces tu procedimietno normal; una ves que finaliza guarda el nombre de ese archivo en una variable temporal,

seguido de esto realiza una consulta para que obtengas el idnoticia que relacionaras con esa imagen

por ultimo, toma el nombre de la imagen(que se encuentra en la variable) y mediante FSO verifica que exista, algo similar a esto:

If (fs.FileExists("imagen.jpg"))=true Then
Response.Write("existe")
funcion copia("imagen.jpg",variable&"imagen.jpg")
Else
Response.Write("No existe")
End If

ahora en la funcion copia(nombre), tendriamos algo similar a esto:

<%
function(original,nuevo)
dim fs
set fs=Server.CreateObject("Scripting.FileSystemObject ")
'realizamos la copia del archivo
fs.CopyFile server.mappath(original),server.mappath(nuevo)
'una ves lista la copia, borramos el archivo original
fs.delete server.mappath(original)
set fs=nothing
end function
%>

imagino que con eso seria suficiente

... no andare tomado de mas....

[popi]

Gracias por la respuesta voy a probarlo

[popi]

Me salen errores !!! Creo que fallo en la sintaxis.Lo siento soy un poco novato

A ver si lo he entendido:

donde pone :

Código HTML:

fs.CopyFile server.mappath(original),server.mappath(nuevo)

en original pondria la variable de tipo file del formulario que recoge la ruta

y archivo de la imagen.

en nuevo pondria la nueva ruta que seria algo asi

("./upload/foto"&numero) es decir una ruta que seria siempre la misma (./upload/)

con un nombre que empezaria por foto+ numero (variable que guarda el numero idnoticia)

Creo que la sintaxis del mi codigo esta mal:

Código HTML:

fs.CopyFile server.mappath(original),server.mappath("./upload/foto"&numero)

Alguien tiene alguna sugerencia

[popi]

tema solucionado !!!!


Gracias a todos !!!