saber si ya se envio un archivo

[mafz20]

como se puede saber si ya se envio un archivo estoy usando este codigo:
*************** ******
Dim strPhysicalPath As String
Dim objFileInfo As System.IO.FileI nfo

Response.Buffer = True

strPhysicalPath = Server.MapPath( "adjuntos2\ " &
PathVirtual)
'exit if file does not exist
If Not System.IO.File. Exists(strPhysi calPath) _
Then Exit Sub
objFileInfo = New System.IO.FileI nfo(strPhysical Path)
Response.Clear( )
'Add Headers to enable dialog display
Response.AddHea der("Content-Disposition", "attachment ;
filename=" & objFileInfo.Nam e)
Response.AddHea der("Content-Length",
objFileInfo.Len gth.ToString())

Response.Conten tType = "applicatio n/octet-stream"
Response.WriteF ile(objFileInfo .FullName)
*************** ************
lo que quiero hacer es cuando se termine de enviar el archivo mandar a
otra paguina con:
Response.Redire ct("cristal.asp x"). gracias