Le titre est un peu déroutant. Cette question est discutée dans le groupe aujourd'hui. CSDN a la réponse en pièce jointe, les amis qui en ont besoin peuvent se référer à la question suivante : Je souhaite changer le nom lors du téléchargement d'un fichier, puis changer le nom. renommer lors du téléchargement.
Par exemple : j'ai téléchargé une photo de moi-même.jpg Après le téléchargement, elle a été remplacée par le nom du système 20040302001.jpg. Une fois téléchargée, elle est redevenue ma photo.jpg.
La base de données est utilisée pour sauvegarder les anciens et nouveaux noms de fichiers (déjà fait)
C'est juste que je ne peux pas changer le nom lors du téléchargement.
Code:
Copiez le code comme suit :
<%
fonction dl(f,n)
en cas d'erreur, reprendre ensuite
Définir S = CreateObject (Adodb.Stream)
Mode S=3
S.Type=1
S.Ouvert
S.LoadFromFile(f)
si Err.Number> 0 alors
Réponse.Status= 404
autre
Response.ContentType = application/octet-stream
Response.AddHeader Content-Disposition : , pièce jointe = & n
Range=Mid(Request.ServerVariables( HTTP_RANGE),7)
si Plage = alors
Réponse.BinaryWrite(S.Read)
autre
S.position=Clng(Split(Plage, - )(0))
Réponse.BinaryWrite(S.Read)
Terminer si
finir si
Réponse.Fin
fonction de fin
%>
Exemple d'utilisation de fonction :
Copiez le code comme suit :
appelez dl (Server.MapPath (download/20040302001.jpg), mes photos.jpg)