Блог

Привет, на моем веб-сайте есть процедура экспорта таблицы данных в xlsx с библиотекой closedxml, и я хочу показать всплывающее окно после завершения экспорта, но всплывающее окно не отображается. Кто-нибудь может сказать мне, как показать всплывающее окно? Это мой код

 Protected Sub ExportExcel(dt, strTable)
        Using wb As New XLWorkbook()
            Dim ws = wb.Worksheets.Add(dt, "foglio1")
            ws.Columns("I").Style.NumberFormat.Format = "#,##0.00"
            Response.Clear()
            Response.Buffer = True
            Response.Charset = "UTF-8"
            Response.ContentEncoding = System.Text.Encoding.Unicode
            Response.ContentType = "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet"
            Response.AddHeader("content-disposition", "attachment;filename=" amp; strTable amp; ".xlsx" )
            try             
                Using MyMemoryStream As New MemoryStream()
                    wb.SaveAs(MyMemoryStream)
                    MyMemoryStream.WriteTo(Response.OutputStream)
                    Response.Flush()
                    Response.Close()
                End Using
            catch
            finally
                Dim scriptString as String = "<script language=JavaScript>"
                scriptString  = "alert('Export completed !" amp; strUser amp; "!');"
                scriptString  = "window.location.href='http://localhost/default.aspx';<"
                scriptString  = "/"
                scriptString  = "script>"
                If(Not ClientScript.IsClientScriptBlockRegistered(Me.GetType(), "clientScript"))
                    ClientScript.RegisterClientScriptBlock(Me.GetType(), "clientScript",scriptString)
                end If
            end try
        End Using
  

Завершение подзаголовка