То есть он напрямую побуждает пользователя загружать, а не открывать определенные файлы браузером. Обратите внимание, что после копирования следующего кода в файл ASP не добавляйте некоторый код без ASP на страницу: например, HTML и клиент-код JavaScript.
Кода -копия выглядит следующим образом:
<%
'--------------------------------------------
Response.buffer = true
DimStrfilePath, Strfilesize, Strfilename
Constadtypebinary = 1
strfilepath = "filepath"
strfilesize = ... размер файла, необязательно
strfilename = "Имя файла"
Response.clear
8 ***********************************************
Требуется установка MDAC2.6 или MDAC2.7 на вашем сервере
8 ***********************************************
SetObjStream = server.createObject ("adodb.stream")
objstream.open
objstream.type = adtypebinary
objstream.loadfromfileStrfilePath
strfiletype = lcase (right (strfilename, 4)) 'station extension file.long. станция
'Судья контент-типы по расширению файлов
Выберите
Дело ".asf"
ContentType = "video/x-ms-asf"
Дело ".avi"
ContentType = "видео/avi"
Дело ".doc"
ContentType = "Application/Msword"
Дело ".zip"
ContentType = "Приложение/Zip"
Case ".xls"
ContentType = "Application/Vnd.ms-Excel"
Дело ".gif"
ContentType = "Image/Gif"
Case ".jpg", "jpeg"
ContentType = "Image/jpeg"
Дело ".wav"
ContentType = "audio/wav"
Дело ".mp3"
ContentType = "audio/mpeg3"
Case ".mpg", "Mpeg"
ContentType = "видео/mpeg"
Дело ".rtf"
ContentType = "Приложение/RTF"
Case ".htm", "html"
ContentType = "text/html"
Дело ".asp"
ContentType = "text/asp"
Caseelse
'HandLealLotherfiles
ContentType = "Приложение/октябрь"
Endselect
Ответ
Response.addheader "длиной содержимого", strfilesize
Response.charset = "UTF-8" '' Набор символов браузера клиента UTF-8 UTF-8
Response.contentType = contentType
Response.binaryWriteObjStream.read
Response.flush
objstream.close
Setobjstream = ничего
%>