티스토리 뷰

Web Development/Asp

asp 파일 다운로드

dev ms 2015. 1. 10. 13:20
반응형
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
<%
' 파일 경로를 설정한다.
FileName = request("fileName")
FileType = request("type")


IF FileType="s" Then
FilePath="\sound\lecture\"
End IF

IF FileType="d" Then
FilePath="\doc\"
End IF 


strFilePath = Server.MapPath("../")&FilePath&FileName

Response.Expires = 0
Response.Buffer = True
Response.Clear

Set fs = Server.CreateObject("Scripting.FileSystemObject")

if(fs.FileExists(strFilePath)) Then
' 파일이 있을때
 Response.ContentType ="application/octet-stream"
 Response.CacheControl = "public"
 Response.AddHeader "Content-Disposition","attachment;filename="&FileName
 
 Set Stream = Server.CreateObject("ADODB.Stream")
 Stream.Open
 Stream.Type=1
 Stream.LoadFromFile strFilePath
 Response.BinaryWrite Stream.Read
 Stream.close
 Set Stream = nothing
Else
' 파일이 없을때
 Response.Write strFilePath
 Response.Write "<script type='text/javascript'> alert('파일을 찾을 수 없습니다.') </script>"
End If
 Response.End
 
 Set fs = Nothing

%>


 

요기저기서 퍼와서 만들어봤습니다.

window.open 이나 link 시에 fileName하고 뭐 타입은 생략해도 되고,

받아서 찍어주는겁니다.

대신 이렇게 하면 서버쪽 메모리 버퍼?에 담아서 하기때문에

대용량을 다중 다운로드하게되면 서버가 죽는다고 합니다.

 

///////// 2012.11.13 ///////////

태요 사이트도 참조 하시면 좋을 것 같다.

 

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

반응형
저작자표시

'Web Development > Asp' 카테고리의 다른 글

asp 에서 json 사용방법  (0) 2015.01.10
asp 개발시 에러 코드도 안보인다면?  (0) 2015.01.10
현재 url 저장 방법.  (0) 2015.01.10
ASP 페이징 안될 때  (0) 2015.01.10
asp 로그 아웃 부분  (0) 2015.01.10