Der Titel ist etwas verwirrend. Diese Frage wird heute in der Gruppe diskutiert. Freunde, die sie benötigen, können sich auf die folgende Frage beziehen: Ich möchte den Namen ändern, wenn ich eine Datei hochlade Namen beim Herunterladen zurückgeben.
Beispiel: Ich habe ein Foto von mir selbst hochgeladen. Nach dem Hochladen wurde es in den Systemnamen 20040302001.jpg geändert. Beim Herunterladen wurde es wieder in mein Foto.jpg geändert.
Die Datenbank dient zum Speichern des alten und neuen Dateinamens (bereits erledigt)
Es ist nur so, dass ich den Namen beim Herunterladen nicht ändern kann.
Code:
Kopieren Sie den Codecode wie folgt:
<%
Funktion dl(f,n)
Bei Fehler als nächstes fortfahren
Setze S=CreateObject(Adodb.Stream)
S.Mode=3
S.Typ=1
S.Offen
S.LoadFromFile(f)
wenn Err.Number> 0 dann
Response.Status= 404
anders
Response.ContentType= application/octet-stream
Response.AddHeader Content-Disposition: , attachment; filename= & n
Range=Mid(Request.ServerVariables( HTTP_RANGE ),7)
wenn Range= dann
Response.BinaryWrite(S.Read)
anders
S.position=Clng(Split(Range, - )(0))
Response.BinaryWrite(S.Read)
Ende wenn
Ende wenn
Antwort.Ende
Endfunktion
%>
Beispiel für die Funktionsverwendung:
Kopieren Sie den Codecode wie folgt:
call dl(Server.MapPath( download/20040302001.jpg ), my photos.jpg )