<%@ Page Inherits="System.Web.UI.MobileControls.MobilePage" Language="VB" %>
<%@ Register TagPrefix="Mobile" Namespace="System.Web.UI.MobileControls" Assembly="System.Web.Mobile" %>
<script runat="server">
sub btnAction(Sender as Object, e as EventArgs)
lblMessage.Text = "Transaction:"
lblNumber.Text = tbNumber.Text
lblAmount.Text = tbAmount.Text
ActiveForm = frmThanks
end sub
</script>
<Mobile:Form runat="server">
<Mobile:Label runat="server" StyleReference="title"
Text="Pay Bill" />
<Mobile:Label runat="server" Text="CC #" />
<Mobile:TextBox runat="server" id="tbNumber" />
<Mobile:Label runat="server" Text="Amount $" />
<Mobile:TextBox runat="server" id="tbAmount" />
<Mobile:Command runat="server" id="btSubmit"
OnClick="btnAction"
Text="Pay Bill!" />
</Mobile:Form>
<Mobile:Form runat="server" id="frmThanks">
<Mobile:Label runat="server" id="lblMessage" />
<Mobile:Label runat="server" id="lblNumber" />
<Mobile:Label runat="server" id="lblAmount" />
</Mobile:Form>
|