That feature is included with v5 Option pack.
When the customer is done and the payment method was one of the approved methods, then a link is generated to download from the receipt page. Check this out:
The modification I made was to the secure download seciton of the option pack because some of the things VPASP did in the code did not make sense to me and seemed to just be wasting time and server resources and created some security issues.
I have had a chance to clean up the download function a bit more:
Sub DownloadFile (realfile, stagingfile, filename)
dim fso, f, sizeof
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(realfile)
SizeOf = f.Size
Set f = nothing
set fso = nothing
Set oStr = server.CreateObject("ADODB.Stream")
Response.ContentType = "application/octet-stream"
Response.AddHeader "content-disposition", "filename=" & filename
Response.AddHeader "Content-Length", SizeOf
Buff = oStr.ReadText(1024)
Loop Until IsNull(buff) or buff = ""
Edited by - gabriel on September 03 2003 15:43:04
Edited by - gabriel on September 04 2003 09:48:29