El título es un poco confuso. El grupo que habla hoy tiene la respuesta en CSDN. Los amigos que la necesiten pueden consultarla.
Pregunta: Quiero cambiar el nombre de un archivo al cargarlo y luego volver a cambiar el nombre al descargarlo.
Por ejemplo: cargué "Mi foto.jpg" y lo cambié al nombre del sistema "20040302001.jpg" después de cargarlo y luego lo cambié nuevamente a "Mi foto.jpg" al descargarlo.
La base de datos se utiliza para guardar los nombres de archivos nuevos y antiguos (ya hecho)
Es solo que no puedo cambiar el nombre al descargar.
Código:
Copie el código de código de la siguiente manera:
<%
función dl(f,n)
en caso de error reanudar siguiente
Establecer S=CreateObject( "Adodb.Stream ")
Modo S=3
Tipo S=1
S.abierto
S.LoadFromFile(f)
si Err.Number> 0 entonces
Respuesta.Estado= "404 "
demás
Response.ContentType= "aplicación/flujo de octeto"
Response.AddHeader "Disposición de contenido:", "adjunto; nombre de archivo = " & n
Rango = Medio (Request.ServerVariables ("HTTP_RANGE"), 7)
si Rango = " " entonces
Respuesta.BinaryWrite(S.Read)
demás
Posición S=Clng(Dividir(Rango, "- ")(0))
Respuesta.BinaryWrite(S.Read)
terminar si
terminar si
Respuesta.Fin
función final
%>
Ejemplo de uso de función:
Copie el código de código de la siguiente manera:
llame a dl(Server.MapPath( "descargar/20040302001.jpg "), "Mis fotos.jpg ")