listlinks.aspx

asp.net技术内幕的书配源码

<%@ Page Inherits="System.Web.UI.MobileControls.MobilePage" %>

<Script runat="Server">

Sub List_ItemCommand( s As object, e As ListCommandEventArgs )
  lblMovie.Text = e.ListItem.Text
  ActiveForm = form2    
End Sub

</Script>

<Mobile:Form runat="server" id="form1">
<b>Select Movie:</b><br/>
<Mobile:List 
  OnItemCommand="List_ItemCommand" 
  Runat="Server">
<Item text="Star Wars"/>
<Item text="Gone with the Wind"/>
<Item text="Citizen Kane"/>
</Mobile:List>
</Mobile:Form>

<Mobile:Form runat="server" id="form2">
<b>You selected:</b>
<br/>
<Mobile:Label 
 ID="lblMovie"
 Runat="Server"/>
</Mobile:Form>