본문 바로가기

IT/Web Programming

[ASP] 파일 다운로드 받아서 실행

Response.ContentType = "application/octect-stream name=OST Bolt Dummy.dwg"
    Response.AddHeader "Content-disposition","attachment;filename=OST Bolt Dummy.dwg"
   
    Dim objStream, buff
    set objStream= Server.CreateObject("ADODB.Stream")
    objStream.Open
    objStream.LoadFromFile( server.mappath("..") & "/Data/01. 2D/OST Bolt Dummy.dwg")
    buff = objStream.ReadText(-1)
    Response.BinaryWrite buff

    set buff = nothing
    set objstream=nothing