listvalue.aspx

来自「asp.net技术内幕的书配源码」· ASPX 代码 · 共 38 行

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

<Script runat="Server">

Sub List_ItemCommand( s As object, e As ListCommandEventArgs )
  lblMovie.Text = e.ListItem.Text
  lblMovieCategory.Text = e.ListItem.Value
  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" value="scifi"/>
<Item text="Gone with the Wind" value="romance"/>
<Item text="Citizen Kane" value="drama"/>
</Mobile:List>
</Mobile:Form>

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