ASP.NET

public class BasePage : Page
{
    protected override void OnPreInit(EventArgs e)
    {
        Response.Write("<div id='divWait'> Please wait while the page is loading ...</div>");
        Response.Flush();
                 
        base.OnPreInit(e);
    }
              
    protected override void OnPreRenderComplete(EventArgs e)
    {
        Response.Write("<script>divWait.innerText='';</script>");
        Response.Flush();
                  
        base.OnPreRenderComplete(e);
    }    
}

 Public Class BasePage
    Inherits Page
              
    Protected Overrides Sub OnPreInit(ByVal e As System.EventArgs)
        Response.Write("<div id='divWait'> Please wait while the page is loading ...</div>")
        Response.Flush()
                    
        MyBase.OnPreInit(e)
    End Sub
                
    Protected Overrides Sub OnPreRender(ByVal e As System.EventArgs)
        Response.Write("<script>divWait.innerText='';</script>")
        Response.Flush()
               
        MyBase.OnPreRender(e)
    End Sub
End Class

'Thread.Sleep(3000)
Response.Write("
Please wait while the page is loading 2 
")
Response.Flush()
Thread.Sleep(3000)
                     
MyBase.OnInit(e)

Kartik Rathi wrote:

How can i place these buttons in inside button

 <br />
<br />
Private sSort As String<br />
<br />
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load<br />
<br />
        If Not IsPostBack Then<br />
            sSort = "ClientCode"<br />
        End If<br />
    End Sub<br />
<br />
    Protected Sub Page_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRender<br />
        Call DisplayList()<br />
    End Sub<br />
<br />
    Private Sub DisplayList()<br />
        gvListBindData()<br />
    End Sub<br />
<br />
    Private Sub gvListBindData()<br />
        Dim table As DataTable<br />
        table = New DataTable("List")<br />
        Dim row1, row2, row3, row4, row5 As DataRow<br />
        Try<br />
            Dim ClientCode As DataColumn = New DataColumn("ClientCode")<br />
            ClientCode.DataType = System.Type.GetType("System.String")<br />
            table.Columns.Add(ClientCode)<br />
            Dim ClientName As DataColumn = New DataColumn("ClientName")<br />
            ClientName.DataType = System.Type.GetType("System.String")<br />
            table.Columns.Add(ClientName)<br />
            Dim ClientType As DataColumn = New DataColumn("ClientType")<br />
            ClientType.DataType = System.Type.GetType("System.String")<br />
            table.Columns.Add(ClientType)<br />
<br />
            row1 = table.NewRow()<br />
            row1.Item("ClientCode") = "ClientCode 1"<br />
            row1.Item("ClientName") = "ClientName 1"<br />
            row1.Item("ClientType") = "ClientType 1"<br />
            table.Rows.Add(row1)<br />
            row2 = table.NewRow()<br />
            row2.Item("ClientCode") = "ClientCode 2"<br />
            row2.Item("ClientName") = "ClientName 2"<br />
            row2.Item("ClientType") = "ClientType 2"<br />
            table.Rows.Add(row2)<br />
            row3 = table.NewRow()<br />
            row3.Item("ClientCode") = "ClientCode 3"<br />
            row3.Item("ClientName") = "ClientName 3"<br />
            row3.Item("ClientType") = "ClientType 3"<br />
            table.Rows.Add(row3)<br />
            row4 = table.NewRow()<br />
            row4.Item("ClientCode") = "ClientCode 4"<br />
            row4.Item("ClientName") = "ClientName 4"<br />
            row4.Item("ClientType") = "ClientType 4"<br />
            table.Rows.Add(row4)<br />
            row5 = table.NewRow()<br />
            row5.Item("ClientCode") = "ClientCode 5"<br />
            row5.Item("ClientName") = "ClientName 5"<br />
            row5.Item("ClientType") = "ClientType 5"<br />
            table.Rows.Add(row5)<br />
<br />
        Catch<br />
        End Try<br />
<br />
        Dim oDataView As DataView<br />
        Dim dset As New DataSet<br />
        dset = New DataSet<br />
        dset.Tables.Add(table)<br />
<br />
<br />
        oDataView = New DataView(dset.Tables(0))<br />
        oDataView.Sort = sSort<br />
<br />
        gvList.DataSource = oDataView<br />
        gvList.DataBind()<br />
<br />
    End Sub<br />
<br />
    Protected Sub gvList_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles gvList.PageIndexChanging<br />
        gvList.PageIndex = e.NewPageIndex<br />
        gvListBindData()<br />
    End Sub<br />
<br />
    Protected Sub gvList_Sorting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewSortEventArgs) Handles gvList.Sorting<br />
        If e.SortExpression = "ClientName" Then<br />
            sSort = "ClientName"<br />
        ElseIf e.SortExpression = "ClientType" Then<br />
            sSort = "ClientType"<br />
        Else<br />
            sSort = e.SortExpression<br />
        End If<br />
        gvListBindData()<br />
    End Sub<br />
<br />