아래 파일을 Download.asp로 저장한 다음 필요에 따라 다운로드할 파일을 전송하면 됩니다. 형식: Download.asp?FileName=다운로드할 파일 이름
다음과 같이 코드 코드를 복사합니다.
딤 스트림
희미한 내용
희미한 파일 이름
희미한 파일 확장
상수 adTypeBinary = 1
파일 이름 = Request.QueryString(파일 이름)
FileName = 그렇다면
Response.Write 파일 이름이 잘못되었습니다.
응답.종료
다음과 같은 경우 종료
'다음은 다운로드하고 싶지 않은 파일입니다
FileExt = Mid(파일 이름, InStrRev(파일 이름, .) + 1)
케이스 선택 Ucase(FileExt)
사례 ASP, ASA, ASPX, ASAX, MDB
Response.Write는 보호된 파일이므로 다운로드할 수 없습니다.
응답.종료
선택 종료
'이 파일을 다운로드하세요.
응답.지우기
Response.ContentType = 애플리케이션/옥텟 스트림
Response.AddHeader 내용 처리, 파일 이름= & 파일 이름;
스트림 설정 = server.CreateObject(ADODB.Stream)
Stream.Type = adTypeBinary
스트림.오픈
Stream.LoadFromFile 서버.MapPath(파일 이름)
스트리밍되지 않는 동안.EOS
응답.BinaryWrite Stream.Read(1024 * 64)
향하게 하다
스트림.닫기
스트림 설정 = 없음
응답.플러시
응답.종료