需求说明：当用户点击按钮时使当前按钮为不可用，并打开新页面，关闭新页面时，按钮变为可用。并且如果不关闭新页面，当前按钮过10秒钟自动变为可用。

包含3个页面：

一、按钮页

前台代码：当刷新后采用js进行disable后，点击的时候也可以用JS使其为disable，让整个过程都disable。（如果采用的是后台button.Enable=false,则不行，因为服务器端状态始终为false，导致按钮只能用一次。）

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default2.aspx.vb" Inherits="Default2" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head runat="server">

    <title></title>

</head>

<body>

<script  type="text/javascript" language="javascript">

    function disableButton(button) {

        var btn = document.getElementById(button);

        setTimeout(function () {disable_in(btn); },);

    }

    function disable_in(button)

    {

    button.disabled=false;

}

function Enablebutton(buttonID) {

    var button = document.getElementById(buttonID);

    button.disabled = false;

}

    function NotEnablebutton(buttonID) {

        var button = document.getElementById(buttonID);

        button.disabled = true;

    }

    function disable_out(button) {

        button.disabled = true;

    }

//    function disableButton_Out(button) {

//        setTimeout(function () { disable_out(button); }, 50);

//    }

</script>

    <form id="form1" runat="server">

    <div>

        <asp:Button ID="Button1" runat="server" Text="Button" UseSubmitBehavior="false" OnClientClick="disable_out(this);"/>

        <asp:Button ID="Button2" runat="server" Text="Button2" UseSubmitBehavior="false" OnClientClick="disable_out(this);"/>

    </div>

    </form>

</body>

</html>

后台代码：

这里用服务器端 Button1.Enabled = False代码， 当用JS还原为可用时，服务器端状态不会改变，因此多个按钮点击时会出现bug（点击第二个按钮时，第一个按钮会一起变为不可用）。所以这里将用js设置为不可用状态。

 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        Session("ImagePath") = "\\129.223.229.102\Dis_project\Temp\test.pdf"

        'Session("ImagePath") = "\\129.223.229.102\Dis_project\Temp\test1.zip"

        Session("CurrentButtonID") = Button1.ClientID

        Session("IsPDF") = True

        System.Threading.Thread.Sleep()

        ClientScript.RegisterStartupScript(ClientScript.GetType(), "myscript1", String.Format("<script>disableButton('" & Button1.ClientID & "')</script>"))
　　　　ClientScript.RegisterStartupScript(ClientScript.GetType(), "myscript2", String.Format("<script>NotEnablebutton('" & Button1.ClientID & "');</script>"))

        ClientScript.RegisterStartupScript(ClientScript.GetType(), "myscript", String.Format("<script>window.open('ShowPDF.aspx')</script>"))

        'Button1.Attributes.Add("OnClientClick", String.Format("javascript:disableButton_Out(this);"))

        'Button1.Enabled = False

    End Sub

二、下载（显示）页面

前台代码：

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="ShowPDF.aspx.vb" Inherits="ShowPDF" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head runat="server">

    <title>ShowPDF</title>

</head>

<body>

    <form id="form1" runat="server">

   <%--<script  type="text/javascript" language="javascript">

            window.onbeforeunload = closingCode;

            function closingCode() {

                opener.Enablebutton();

            }

</script>--%>

        <%--<% GetPDF1()%>--%>

        <iframe  src="Default3.aspx" width="100%" height="100%">

        </iframe>

    </form>

</body>

</html>

后台代码：

Imports System.Net

Partial Class ShowPDF

    Inherits System.Web.UI.Page

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim js As String = ""

        Dim buttonid As String = ""

        If Not Session("ImagePath") Is Nothing AndAlso Not Session("CurrentButtonID") Is Nothing Then

            buttonid = Session("CurrentButtonID").ToString()

            js = "<script>window.onbeforeunload = closingCode;function closingCode() {opener.Enablebutton('" + buttonid + "');}</script>"

            'js = String.Format("<script>window.onbeforeunload = closingCode;function closingCode() {opener.Enablebutton('{0}');}</script>", "Button1")

            Response.Write(js) 'write the enable parent button'js

        End If

    End Sub

    Public Sub ShowPDFfile()

        Dim str As String = ""

        If Not Session("ImagePath") Is Nothing Then

            str = String.Format("<object data=""\\129.223.229.102\Dis_project\Temp\test.pdf"" type=""application/pdf"" width=""100%"" height=""100%""><p>It appears you don't have a PDF plugin for this browser.No biggie... you can <a href=""em.pdf"">click here todownload the PDF file.</a></p></object>")

        End If

        Response.Write(str)

    End Sub

    Public Sub GetPDF(ByVal path As String)

        'Dim path As String = Server.MapPath(Spath)

        Dim client As New WebClient()

        Dim buffer As [Byte]() = client.DownloadData(path)

        If buffer IsNot Nothing Then

            Response.ContentType = "application/pdf"

            Response.AddHeader("content-length", buffer.Length.ToString())

            Response.BinaryWrite(buffer)

            Response.Flush()

            Response.End()

        End If

    End Sub

    Protected Sub DownloadFile(ByVal fileName As String)

        '20110905 Test Export with SSL using IE 7

        Dim s_path As String = fileName 'HttpContext.Current.Server.MapPath("~/") +

        Dim file As System.IO.FileInfo = New System.IO.FileInfo(s_path)

        Response.ClearHeaders()

        HttpContext.Current.Response.ContentType = "application/ms-download"

        HttpContext.Current.Response.Charset = "utf-8"

        Response.AddHeader("Content-Disposition", "inline; filename=" + HttpUtility.UrlEncode(fileName, System.Text.Encoding.UTF8)) 'inline

        HttpContext.Current.Response.AddHeader("Content-Length", file.Length.ToString())

        Response.AddHeader("Pragma", "public")

        Response.AddHeader("Cache-Control", "max-age=0")

        Response.Flush()

        HttpContext.Current.Response.WriteFile(file.FullName)

        HttpContext.Current.Response.Flush()

        'HttpContext.Current.Response.Clear()

        HttpContext.Current.Response.End()

    End Sub

    Public Sub GetPDF1()

        Dim fileName As String = "\\129.223.229.102\Dis_project\Temp\test1.pdf"

        Response.ContentType = "application/pdf"

        Response.Clear()

        Response.TransmitFile(fileName)

        Response.End()

    End Sub

End Class

三、框架中的真正的下载（显示页面），显示在框架中

前台代码：

后台代码：

 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim fileName As String = ""

        If Not IsPostBack Then

            If Not Session("ImagePath") Is Nothing AndAlso Not Session("CurrentButtonID") Is Nothing Then

                fileName = Session("ImagePath").ToString()

                GetPDF1(fileName)

            End If

        End If

    End Sub

    Public Sub GetPDF1(ByVal fileName As String)

        'Dim fileName As String = "\\129.223.229.102\Dis_project\Temp\test1.pdf"

        If Session("IsPDF") = False Then

            Response.ContentType = "application/zip"

            Response.AddHeader("Content-Disposition", "attachment; filename=" + HttpUtility.UrlEncode(fileName, System.Text.Encoding.UTF8))

        Else

            Response.ContentType = "application/pdf"

        End If

        Response.Clear()

        Response.TransmitFile(fileName)

        Response.End()

    End Sub

ASP.NET 下载文件并继续执行JS解决方法的更多相关文章

  1. Asp.Net 下载文件的几种方式

    asp.net下载文件几种方式 protected void Button1_Click(object sender, EventArgs e) { /* 微软为Response对象提供了一个新的方法 ...

  2. 自动化测试中执行JS脚本方法封装

    执行JS脚本方法封装: class JavaScript(Base): def execute_javascript(self, js): """执行 JavaScrip ...

  3. XCode编译文件过多导致内存吃紧解决方法

    XCode编译文件过多导致内存吃紧解决方法 /Users/~~/Library/Developer/Xcode/DerivedData 1) 然后 找到编译文件 删除 就好了哦 快去试试看吧

  4. PowerShell因为在此系统中禁止执行脚本解决方法

    PowerShell因为在此系统中禁止执行脚本解决方法   在Powershell直接脚本时会出现: 无法加载文件 ******.ps1,因为在此系统中禁止执行脚本.有关详细信息,请参阅 " ...

  5. （转）调用System.gc没有立即执行的解决方法

    调用System.gc没有立即执行的解决方法 查看源码 当我们调用System.gc()的时候,其实并不会马上进行垃圾回收,甚至不一定会执行垃圾回收,查看系统源码可以看到 /** * Indicate ...

  6. SQL Server作业没有执行的解决方法

    SQL Server作业没有执行的解决方法  确保SQL Agent服务启动,并设置为自动启动,否则你的作业不会被执行    设置方法:  我的电脑--控制面板--管理工具--服务--右键 SQLSE ...

  7. WebBrowser 的 DocumentCompleted事件不执行的解决方法

    原文:WebBrowser 的 DocumentCompleted事件不执行的解决方法 WebBrowser 的 DocumentCompleted事件不执行的解决方法: 使用WebBrowser的P ...

  8. asp.net下载文件几种方式

    测试时我以字符流的形式下载文件,可行,前几个仅作参考 protected void Button1_Click(object sender, EventArgs e)  {  /*  微软为Respo ...

  9. Asp.net下载文件

    网站上的文件是临时文件, 浏览器下载完成, 网站需要将其删除. 下面的写法, 文件读写后没关闭, 经常删除失败. /// <summary> /// 下载服务器文件,参数一物理文件路径(含 ...

随机推荐

  1. 分解大质数模板（复杂度小于sqrt(n))

    //POJ 1811 #include <cstdio> #include <cstring> #include <algorithm> #include < ...

  2. 【PHP面向对象(OOP)编程入门教程】10.__set()，__get()，__isset()，__unset()四个方法的应用

    一般来说,总是把类的属性定义为private,这更符合现实的逻辑.但是, 对属性的读取和赋值操作是非常频繁的,因此在PHP5中,预定义了两个函数”__get()”和”__set()”来获取和赋值其属性 ...

  3. Apache常用2种工作模式prefork和worker比较

    Apache两种常用工作模式:prefork和worker. prefork MPM prefork是一个非线程型的.预派生的MPM,使用多个进程,每个进程在某个确定的时间只单独处理一个连接,效率高, ...

  4. VMware 关闭虚拟机 Ubuntu 12 的 3D 效果，提高性能

    Ubuntu 2012,有 2D 和 3D 的渲染效果,但是 在虚拟机中,开启 3D 效果后,特别卡.好在 VMware 中有个“关闭3D”的开关,如下图所示: 去掉勾选“加速 3D 图形”

  5. 一颗躁动的心---下决心从SLAM开始，不钻研嵌入式底层了

    在写这个随笔时,北京的外面正在下2016的第一场雪.夜深人尽之时总会考虑一下自己的未来在何方. 长这么大了,我发现我这人始终不能坚定不移的朝着一个方向努力,总是朝三暮四,对学习更是朝令夕改,这造成了我 ...

  6. INI文件的读取(C语言:GetPrivateProfileString/GetPrivateProfileInt)

    INI文件格式说明 /********************************************* ini文件说明 ini文件是文本文件,由节点(Section)和键值对(key=val ...

  7. meteor 为基础，联合 Apollo + React + React-Router

    Graphql with Apollo, Meteor and React: https://janikvonrotz.ch/2016/10/09/graphql-with-apollo-meteor ...

  8. winserver2008 Oracle 11g 安装

    .在Windows Server2008R2上安装Oracle Database 11g Release 2,下载64位的安装程序,地址: 文件1:http://download.oracle.com ...

  9. android SDK manager 无法获取更新版本列表

    打开SDK Manager---Tools---Options,填入如下代理和端口,勾选选项也如下. 网址:mirrors.neusoft.edu.cn 端口:80 99%是成功的 参考:http:/ ...

  10. Nginx如何设置拒绝或允许指定ip访问

    location ~ /druid/ { #deny 192.168.1.1; allow 192.168.1.1; deny all; proxy_pass http://127.0.0.1:808 ...