ASP upload renombrar archivo

Cuestiones y dudas acerca de lenguajes de programación diversos.

Moderador: Moderadores

Alexash
Novat@
Mensajes: 2
Registrado: Mié Nov 24, 2004 2:42 pm

ASP upload renombrar archivo

Mensaje por Alexash » Jue Mar 03, 2005 2:27 pm

Bueno, ya estoy otra vez con el lio.

Tengo dos paginas (funcionan perfectamente) para que los usuarios suban los archivos al servidor.
Una con formulario:

form name="form1" method="post" ENCTYPE="multipart/form-data" ACTION="Upload.asp">
<p>
<INPUT TYPE=FILE SIZE=60 NAME="FILE1">
</p>
<p>&nbsp; </p>
<p><BR>
<INPUT TYPE=SUBMIT VALUE="Upload!">

</p>
</FORM>

Y otra Upload.asp:

<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Count= Upload.Save("d:\xvrt\interestop.com\html\datos")
%>
<% = Count %> ficheros subidos.

Tambien tengo un ejemplo de script para renombrar el archivo subido:

<%
Dim FSO, Fich , NombreAnterior, NombreNuevo
NombreAnterior ="Anterior.txt"
NombreNuevo ="Nuevo.txt"
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
%>

La pregunta es ¿Como saco el nombre de archivo "Anterior.txt" para renombrarlo?