ho un problema
allora da un bottone eseguo:
codice:
  Protected Sub ImageButton1_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click
        If IO.File.Exists(Me.Server.MapPath("~/2/Ferie2.pdf")) Then
            IO.File.Delete(Me.Server.MapPath("~/2/Ferie2.pdf"))
        End If


  mioreport.Load(Me.Server.MapPath("Reports/Ferie.rpt"))
faccio quello che devo fare 
.....
.....
e poi:
        mioreport.ExportToDisk(ExportFormatType.PortableDocFormat, Me.Server.MapPath("~/2/Ferie2.pdf"))

        Dim popupScript As String = "<script language='javascript'>" & _
       "window.open(miapagina.aspx', 'CustomPopUp', " & _
         "'width=640, height=840, menubar=yes, resizable=yes')</script>"
        Me.RegisterStartupScript("PopupScript", popupScript)
la miapagina è:
codice:
  Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Response.ClearContent()
        Response.ClearHeaders()
        Response.ContentType = "Application/pdf"
        Response.WriteFile(Me.Server.MapPath("~/2/Ferie2.pdf"))
        Response.Flush()
        Response.Close()

    End Sub
ma quando da internet eseguo il codice questo mi lancia il popup, ma mice che probabilmente è presente un errore di digitazione, ma non è così.
come proceder

se invece scrivo:

codice:
mioreport.Load(Me.Server.MapPath("Reports/Ferie.rpt"))
faccio quello che devo fare 
.....
.....
e poi:
        mioreport.ExportToDisk(ExportFormatType.PortableDocFormat, Me.Server.MapPath("~/2/Ferie2.pdf"))

           Response.Expires = -1
           Dim strPath As String
           strPath = Me.Server.MapPath("~/2/Ferie2.pdf")
           Dim File = New IO.FileInfo(strPath)
           If File.Exists Then
               Response.Clear()
               Response.AddHeader("Content-Disposition", "attachment; filename=""" & "Protocollo " & File.Name & """")
               Response.AddHeader("Content-Length", File.Length.ToString())
               Response.ContentType = "Application/pdf"
               Response.TransmitFile(strPath)
                Response.End()
            End If
questo mi viene inviato senza problemi