codice:
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="b.aspx.vb" Inherits="corso_apogeo.b2"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>b</title>
<meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.1">
<meta name="CODE_LANGUAGE" content="Visual Basic .NET 7.1">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="FlowLayout">
<form id="Form1" method="post" runat="server">
<INPUT type="button" value="Button" id="Button1" name="Button1" runat="server"></P>
<asp:Label id="Label1" runat="server"></asp:Label></P>
</form>
</body>
</HTML>
codice:
Private Sub Button1_ServerClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ServerClick
MetodoLento()
Me.Label1.Text = "Operazione conclusa"
End Sub
Private Sub Button1_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Init
Dim btn As HtmlInputButton = DirectCast(sender, HtmlInputButton)
btn.Attributes.Add("onclick", "this.disabled=true;document.getElementById('Label1').innerHTML = 'Operazione in corso, prego attendere...';")
End Sub
Private Sub MetodoLento()
'simulo una operazione che dura 10 secondi
System.Threading.Thread.Sleep(10 * 1000)
End Sub