Transmitir Archivos TransmiteFile

[frader]

buen dia, el problema que se me presenta.

necesito que al entrar al LOAD de la pagina descargue un archivo, si lo hace. pero el problema que tengo, esque no termina de cargar la pagina, en mi pagina cuento con un boton de "REGRESAR" pero descargan el achivo y se muestra la pagina en blanco.
este es el codigo de mi LOAD

GRACIAS anticipadas.




Dim sPDF As String = "c:\guarderia.pdf"

Dim ret As String

ret = Right(sPDF, Len(sPDF) - InStrRev(sPDF, "."))

Select Case ret.ToUpper.Trim

Case "doc"
Response.ContentType = "application/word"

Case "pdf"
Response.ContentType = "application/pdf"

Case Else
Response.ContentType = "application/octet-stream"

End Select


Response.AppendHeader("Content-Disposition", "filename=Guarderia")
Response.TransmitFile(sPDF)
Response.End()