ASP 자료 다운로드 소스

<a href="download.asp?b_filename=<%=rs("b_filename1")%>"><*%=rs("b_filename1") %>


download.asp
<%
file = Request("b_filename")     '파일 이름
file = replace(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://blog.naver.com/levelup5/100005916687