O título é um pouco confuso. Essa questão está sendo discutida no grupo hoje tem a resposta em anexo, amigos que precisarem podem consultar a seguinte pergunta: Quero alterar o nome ao enviar um arquivo, e depois alterar o. nome de volta durante o download.
Por exemplo: carreguei uma foto minha.jpg Após o upload, ela foi alterada para o nome do sistema 20040302001.jpg. Quando baixada, ela foi alterada novamente para minha foto.jpg.
O banco de dados é usado para salvar os nomes dos arquivos antigos e novos (já feito)
Só que não consigo alterar o nome durante o download.
Código:
Copie o código do código da seguinte forma:
<%
função dl(f,n)
em caso de erro, retome a seguir
Definir S=CreateObject(Adodb.Stream)
Modo S.=3
S.Tipo=1
S.Aberto
S.LoadFromFile(f)
se Err.Number> 0 então
Resposta.Status= 404
outro
Response.ContentType=aplicativo/fluxo de octetos
Response.AddHeader Content-Disposition: , anexo;
Faixa = Médio (Request.ServerVariables (HTTP_RANGE), 7)
se intervalo = então
Resposta.BinaryWrite(S.Read)
outro
S.posição=Clng(Dividir(Intervalo, - )(0))
Resposta.BinaryWrite(S.Read)
Terminar se
terminar se
Resposta.Fim
função final
%>
Exemplo de uso de função:
Copie o código do código da seguinte forma:
ligue para dl (Server.MapPath (download/20040302001.jpg), minhas fotos.jpg)