간단한 다운로드 소스

전 페이지 download.asp?file=파일명


download.asp 파일

<%
    file = request("file")
    '파일 이름

    Response.ContentType = "application/unknown"
    'ContentType 를 선언합니다.

    Response.AddHeader "Content-Disposition","attachment; filename=" & file 
    '헤더값이 첨부파일을 선언합니다.

    Set objStream = Server.CreateObject("ADODB.Stream")
    'Stream 을 이용합니다.

    objStream.Open
    '무엇이든 Set 으로 정의했으면 열어야 겠지요^^

    objStream.Type = 1

    objStream.LoadFromFile Server.MapPath("./upload/")&"\"& file
    '절대경로 입니다.

    download = objStream.Read
    Response.BinaryWrite download 
    '이게 보통 Response.Redirect 로 파일로 연결시켜주는 부분을 대신하여 사용된 것입니다.

    Set objstream = nothing 
    '초기화시키구요.

%>

출처 : http://www.taeyo.pe.kr/Lecture/20_TIps/Danny03.asp