tengo un problema en un upload que hago en asp, para subir archivos, yo quiero que me los renombre al subir y estoy trabajando con esto y pasare a mostrarles el problema que me surge:
formulario.aspx
Código:
upload.asp<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <%@ Page Language="C#" %> <html dir="ltr" xmlns="http://www.w3.org/1999/xhtml"> <head runat="server"> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Sin título 1</title> </head> <body> <form name="form1" method="post" ENCTYPE="multipart/form-data" ACTION="Upload.asp"> <p> <INPUT TYPE=FILE SIZE=60 NAME="FILE1"> </p> <p> </p> <p><BR> <INPUT TYPE=SUBMIT VALUE="Upload!"> </p> </FORM> </body> </html>
Código:
Al trata de subir el archivo, el explorer me visualiza este error:<html>
<head>
<title>Upload</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
.style1 {
color: #FFFFFF;
}
</style>
</head>
<body style="background-color: #605148">
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Count= Upload.Save("AGREGO CARPETA DEL FTP DEL SITIO CON SUS RESPECTIVOS PERMISOS")
%>
<% = Count %> ficheros subidos.
<%
Dim FSO, Fich , NombreAnterior, NombreNuevo
'Inicialización
NombreAnterior = imagen
NombreNuevo ="Nuevo.jpg"
' Instanciamos el objeto
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
' Asignamos el fichero a renombrar a la variable fich
Set Fich = FSO.GetFile(Server.MapPath("EN ESTE PASO TENGO DUDAS, PONGO LA MISMA CARPETA DEL SITIO DEL UPLOAD.SAVE" & NombreAnterior))
' llamamos a la funcion copiar,
'y duplicamos el archivo pero con otro nombre
Call Fich.Copy(Server.MapPath("LA MISMA CARPETA" & NombreNuevo))
' finalmente borramos el fichero origi nal
Call Fich.Delete()
Set Fich = Nothing
Set FSO = Nothing
%>
<%
Set Upload = Nothing
%>
<a href="index.html"><span class="style1">Continuar
</span></a>
</body>
</html>
1 ficheros subidos.
Server.MapPath() error 'ASP 0172 : 80004005'
Invalid Path
/without_flash/Upload_new.asp, line 27
The Path parameter for the MapPath method must be a virtual path. A physical path was used.
la line 27 que especifica, es:
Set Fich = FSO.GetFile(Server.MapPath("EN ESTE PASO TENGO DUDAS, PONGO LA MISMA CARPETA DEL SITIO DEL UPLOAD.SAVE" & NombreAnterior)).
Si alguien me podria ayudar en esto, se lo agradeceria.
Saludos.
)
Respuesta: Error en Upload ASP 
