How To Display Download success Page

[rajiv07]

set f=fso.getfile(strpath)
strFileSize = f.size
set f=nothing
set fso=nothing
adTypeBinary = 1
Response.Clear
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strPath
strFileType = "audio/x-ms-wma"
Response.AddHeader "Content-Disposition", "attachment; filename=" & strDownloadPath
Response.AddHeader "Content-Length", strFileSize
Response.Charset = "UTF-8"
Response.ContentType = strFileType
Response.BinaryWrite objStream.Read
Response.Flush
objStream.Close
Set objStream = Nothing


Here only after 100% download is completed i have to display

the success page.how do i do that.

please anybody help me immediately

Thanks in advance