<%@ Register Assembly="AsyncControls" Namespace="DelvingWare.AsyncControls" TagPrefix="dw" %>

<dw:AsyncModalLayer runat="server" ID="mdlMain" 
Visible="false" 
CssClass="modalLayer">    
    <dw:AsyncPanel runat="server" ID="pnlMain">
        <div class="modalInstruct">Please complete the form before continuing (or just click "No Thanks").</div>
        <p style="text-align:center">
        <table>
            <tr>
            <td>Name:</td>
                <td>
                <dw:AsyncTextBox runat="server" ID="txtName" 
                EnableValidation="Enabled"
                ErrorMessage="Enter a name."
                ErrorMessageCssClass="errorMsg" />
                </td>
            </tr>
            <tr> 
            <td>Nickname:</td>
                <td>
                <dw:AsyncTextBox runat="server" ID="txtNickName" 
                EnableValidation="Enabled"
                ErrorMessage="Enter a nickname."
                ErrorMessageCssClass="errorMsg" />
                </td>
            </tr>
            </table>
        </p>
        <div class="innerLayer" align="center">                    
            <dw:AsyncButton runat="server" ID="btOne" 
            CausesValidation="true"
            OnClick="btOne_Click"
            CssClass="greyButton">OK</dw:AsyncButton>
            
            <dw:AsyncButton runat="server" ID="bttwo" 
            CausesValidation="true" 
            OnClick="btTwo_Click"
            CssClass="greyButton">Reset Fields</dw:AsyncButton>            
        </div>
        <br/>
        <div align="center">
            <dw:AsyncLinkButton runat="server" ID="lnkOne" 
            OnClick="lnkOne_Click" 
            CssClass="linkButton">No Thanks</dw:AsyncLinkButton>
        </div>
    
    </dw:AsyncPanel>

</dw:AsyncModalLayer>

<dw:AsyncLabel runat="server" ID="lblMain" 
RenderMode="Paragraph">Please show the modal layer.</dw:AsyncLabel>

<dw:AsyncButton runat="server" ID="btMain" 
Text="Show the AsyncModalLayer" 
OnClick="btMain_Click"
CssClass="greyButton"/>

using System;
using DelvingWare.AsyncControls;
...
protected void Page_Load( object sender, EventArgs ea )
{
    // enable AsyncModalLayer usage
    AsyncPage.Invocation.EnableAsyncModalLayer = true;
}

protected void btOne_Click( object sender, AsyncEventArgs ae )
{
    if ( AsyncPage.IsValid )
    {    
        lblMain.Text = " You are: "+ txtName.Text +" ("+ txtNickName.Text +")";
        mdlMain.Hide();
    } 
    else
    {
        Message = "<font color=\"red\">You have invalid field data.</font>";
    }
}

protected void btTwo_Click( object sender, AsyncEventArgs ae )
{
    // clear the text fields
    AsyncHelpers.ClearTextOfControls(
        txtName, txtNickName);

    // update the AsyncLabel
    lblMain.Text = "You reset the fields.";
}

protected void lnkOne_Click( object sender, AsyncEventArgs ae )
{
    // update the AsyncLabel
    lblMain.Text = "No thanks, well that's ok.";

    // hide the AsyncModalLayer
    mdlMain.Hide();
}

protected void btMain_Click( object sender, AsyncEventArgs ae )
{
    // hide the AsyncModalLayer
    mdlMain.Show();

    lblMain.Text = "AsyncModalLayer shown.";
}

Imports System
Imports DelvingWare.AsyncControls
...

Protected Sub Page_Load(ByVal sender As Object, ByVal ea As EventArgs)
    ' enable AsyncModalLayer usage
    AsyncPage.Invocation.EnableAsyncModalLayer = true
End Sub

Protected Sub btOne_Click(ByVal sender As Object, ByVal ae As AsyncEventArgs)
    If AsyncPage.IsValid Then
        lblMain.Text = (" You are: "  _
                    + (txtName.Text + (" ("  _
                    + (txtNickName.Text + ")"))))
        mdlMain.Hide
    Else
        Message = "<font color=\""red\"">You have invalid field data.</font>"
    End If
End Sub

Protected Sub btTwo_Click(ByVal sender As Object, ByVal ae As AsyncEventArgs)
    ' clear the text fields
    AsyncHelpers.ClearTextOfControls(txtName, txtNickName)
    ' update the AsyncLabel
    lblMain.Text = "You reset the fields."
End Sub

Protected Sub lnkOne_Click(ByVal sender As Object, ByVal ae As AsyncEventArgs)
    ' update the AsyncLabel
    lblMain.Text = "No thanks, well that's ok."
    ' hide the AsyncModalLayer
    mdlMain.Hide
End Sub

Protected Sub btMain_Click(ByVal sender As Object, ByVal ae As AsyncEventArgs)
    ' hide the AsyncModalLayer
    mdlMain.Show
    lblMain.Text = "AsyncModalLayer shown."
End Sub

.modalLayer 

{
    padding: 1em;
    border: 3px outset #777;
    background-color: White;
}
.modalInstruct

{
    font-style: italic;
}
.modalText 

{
    padding: .5em;
    font-size: 10pt;
    width: 90%;
}
.modalLayer .linkButton 

{
    color: #777;
}
.modalLayer .linkButton:hover 

{
    color: Blue;
    text-decoration: none;
}