Cambiar nombre de un archivo

02/03/2004 - 18:00 por Alejandro Giardino | Informe spam
hola a todos, tengo un formulario que le permite al cliente publicar un
archivo en el servidor mediante un campo de tipo "file", para capturarlo
desde el servidor uso es siguente código ASP:

<%
ruta= server.mappath(".") & "\"
Set Upload = Server.CreateObject("Persits.Upload.1")
Count= Upload.Save(ruta)
%>


Lo que necesito a hora es poder renombrar el archivo que acaban de publicar
y no sé ni cómo reconocerlo ni cómo renombrarlo.

Gracias
Alejandro

Preguntas similare

Leer las respuestas

#1 Jhonny Vargas P.
02/03/2004 - 19:26 | Informe spam
Puedes utilizar el FileSystemObject

Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

objFSO.MoveFile(Archivo, Archivo2)

Set objFSO = Nothing

Saludos,
Jhonny Vargas P. [MS-MVP]
Santiago de Chile
http://www.mvp.cl

Todos saben que Alejandro Giardino []
escribió el siguiente mensaje :#
hola a todos, tengo un formulario que le permite al cliente publicar
un archivo en el servidor mediante un campo de tipo "file", para
capturarlo desde el servidor uso es siguente código ASP:

<%
ruta= server.mappath(".") & "\"
Set Upload = Server.CreateObject("Persits.Upload.1")
Count= Upload.Save(ruta)
%>


Lo que necesito a hora es poder renombrar el archivo que acaban de
publicar y no sé ni cómo reconocerlo ni cómo renombrarlo.

Gracias
Alejandro
Respuesta Responder a este mensaje
#2 Alejandro Giardino
02/03/2004 - 19:31 | Informe spam
Excelente!, con eso soluciono cómo renombrarlo, lo que me faltaría es cómo
reconocer al archivo que el cliente acaba de publicar para poder hacer el
MoveFile

Alejandro
"Jhonny Vargas P." escribió en el mensaje
news:
Puedes utilizar el FileSystemObject

Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

objFSO.MoveFile(Archivo, Archivo2)

Set objFSO = Nothing

Saludos,
Jhonny Vargas P. [MS-MVP]
Santiago de Chile
http://www.mvp.cl

Todos saben que Alejandro Giardino []
escribió el siguiente mensaje :#
> hola a todos, tengo un formulario que le permite al cliente publicar
> un archivo en el servidor mediante un campo de tipo "file", para
> capturarlo desde el servidor uso es siguente código ASP:
>
> <%
> ruta= server.mappath(".") & "\"
> Set Upload = Server.CreateObject("Persits.Upload.1")
> Count= Upload.Save(ruta)
> %>
>
>
> Lo que necesito a hora es poder renombrar el archivo que acaban de
> publicar y no sé ni cómo reconocerlo ni cómo renombrarlo.
>
> Gracias
> Alejandro


Respuesta Responder a este mensaje
#3 Giox
02/03/2004 - 21:00 | Informe spam
yo algunas ve los hice y lo solucione asi
grabé los archivos con el ID de la Sesion (Session.SessionID) para
diferenciarlos y en una tablita guardaba el nombre del archivo real (el que
subio el usuario), nombre de archivo fisico (El de Session) y un id que me
identifique el usuario, otra cosa yo utilice el componente ABCUpload que te
da la opcion de ponerle el nombre que quieras al archivo al momento de
subirlo.

Saludos
Giox

"Alejandro Giardino"
escribió en el mensaje news:
Respuesta Responder a este mensaje
#4 Juan C. Barreiro
03/03/2004 - 12:38 | Informe spam
Buenas, nuevamente me estoy metiendo en las conversas del foro, con el
componente ASPUpload se puede hacer todo (o casi todo lo que se necesita),
en mi empresa lo utilizamos, al igual que casi todos los componentes de
Persits (los cuales son muy buenos y los recomiendo), bueno sin extenderme
mucho mas paso un ejemplo que me acabo de inventar para lo que este amigo
necesita (tranquilos que esta probado y funciona 100%), bueno por ahora nada
mas, un saludo a todos.

<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
'' defino la ruta donde se guarda
Path = Server.MapPath("/images") & "/"
'' creo el objeto de upload
Set Upload = Server.CreateObject("Persits.Upload")
'' defino el maximo peso del archivo que se puede guardar
Upload.SetMaxSize 150000, True
'' salvo los archivos
Upload.Save
'' creo el direcorio si este no existe
Upload.CreateDirectory Path, True
'' voy guardando todos los archivos que se han subido
For Each File in Upload.Files
'' averiguo el archivo que ha subido el cliente incluyendo su nombre
original
Archivo = Split(File.OriginalFileName,".")
'' reconozco la extension del archivo que ha subido el cliente
Extension = Archivo(1)
'' creo el objeto UploadProgress
Set UploadProgress = Server.CreateObject("Persits.UploadProgress")
'' asigno un nombre unico al archivo que se ha creado
Key = UploadProgress.CreateProgressID()
'' libero el objeto UploadProgress
Set UploadProgress = Nothing
'' salvo el archivo con un unico e irrepetible nombre
File.SaveAs Path & Key &"."&Extension
Next
'' libero el objeto Upload
Set Upload = Nothing
Else
'' defino el numero de campos que se muestran en el formulario
MaximoCampos = 5
'' creo el formulario de uploads
Response.Write "<form name=""MyForm"" method=""post""
enctype=""multipart/form-data"" action=""upload1.asp"">"
Response.Write "<table cellspacing=0 cellpadding=3 border=0>"
Response.Write "<tr>"
Response.Write "<td align=center>"
For i=1 To MaximoCampos
Response.Write "<input type=file size@ name=""file"&i&"""><br>"
Next
Response.Write "<input type=submit value=""upload"">"
Response.Write "</td>"
Response.Write "</tr>"
Response.Write "</table>"
Response.Write "</form>"
End If
%>

Juan C. Barreiro
Depto. Desarrollo
www.barnamarketing.com

"Alejandro Giardino" escribió en el mensaje
news:%
hola a todos, tengo un formulario que le permite al cliente publicar un
archivo en el servidor mediante un campo de tipo "file", para capturarlo
desde el servidor uso es siguente código ASP:

<%
ruta= server.mappath(".") & "\"
Set Upload = Server.CreateObject("Persits.Upload.1")
Count= Upload.Save(ruta)
%>


Lo que necesito a hora es poder renombrar el archivo que acaban de


publicar
y no sé ni cómo reconocerlo ni cómo renombrarlo.

Gracias
Alejandro


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida