Название немного сбивает с толку. Этот вопрос обсуждается сегодня в группе CSDN. Ответ прилагается, друзья, которым он нужен, могут обратиться к следующему вопросу: Я хочу изменить имя при загрузке файла, а затем изменить его. имя обратно при загрузке.
Например: я загрузил свою фотографию.jpg. После загрузки ее системное имя было изменено на 20040302001.jpg. При загрузке оно снова изменилось на мое фото.jpg.
База данных используется для сохранения старых и новых имен файлов (уже сделано)
Просто у меня не получается сменить имя при загрузке.
Код:
Скопируйте код кода следующим образом:
<%
функция dl(f,n)
при ошибке продолжить дальше
Установите S=CreateObject(Adodb.Stream)
S.Режим=3
S.Тип=1
С.Открыть
S.LoadFromFile(f)
если Номер ошибки> 0, то
Ответ.Статус= 404
еще
Response.ContentType= приложение/поток октетов
Response.AddHeader Content-Disposition: , Attachment = & n;
Диапазон = Mid (Request.ServerVariables (HTTP_RANGE), 7)
если Диапазон = тогда
Response.BinaryWrite(S.Read)
еще
S.position=Clng(Split(Диапазон, -)(0))
Response.BinaryWrite(S.Read)
Конец, если
конец, если
Ответ.Конец
конечная функция
%>
Пример использования функции:
Скопируйте код кода следующим образом:
вызовите dl(Server.MapPath(download/20040302001.jpg), мои фотографии.jpg)