|
<%@ Page
Inherits="System.Web.UI.MobileControls.MobilePage"
Language="VB"
%>
<%@ Register
TagPrefix="mobile"
Namespace="System.Web.UI.MobileControls"
Assembly="System.Web.Mobile"
%>
<script runat="server" language="VB">
Sub OK_OnSubmit(Sender As Object, E As EventArgs)
ActiveForm = WelcomeForm
lbl2.Text = "Welcome " & txtName.Text
End Sub
</script>
<mobile:form
id="StartForm"
runat="server">
<mobile:label
runat="server"
id="lbl1"
Text="Enter your name:"
/>
<mobile:textbox
runat="server"
id="txtName"
/>
<mobile:Command
runat="server"
id="cmdOK"
OnClick="OK_OnSubmit"
Text="OK"
/>
</mobile:form>
<mobile:form
id="WelcomeForm"
runat="server">
<mobile:label
runat="server"
id="lbl2"
/>
</mobile:form>
|