웹마짱구's 블로그

파일다운로드

Windows/ASP : 2006/12/26 16:46


<%
Response.Expires = 0
f_path = Server.MapPath("/") & "\data\" & Request("f_name")

Response.ContentType = "application/unknown"
Response.Buffer = TRUE
Response.AddHeader "Content-Disposition","attachment;filename=" & Request("f_name")

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 1
objStream.LoadFromFile f_path
download = objStream.Read
Response.BinaryWrite download
Set objstream = nothing
%>

top

TAG
Windows/ASP : 2006/12/26 16:46 Trackback. : Comment. : view 867

Trackback Address :: http://jjangu.pe.kr/blog/trackback/89

Write a comment.




: 1 : ... 462 : 463 : 464 : 465 : 466 : 467 : 468 : 469 : 470 : ... 548 :