mobile:PhoneCall (VB.net)
<%@ Register TagPrefix="mobile" Namespace="System.Web.UI.MobileControls" Assembly="System.Web.Mobile" %> <%@ Page Inherits="System.Web.UI.MobileControls.MobilePage" Language="vb" %> <HEAD> <title>Mobile Control Example</title> <script runat="server"> Protected Sub List1_Click(source As Object, e As ListCommandEventArgs) Select Case e.ListItem.Value Case 2 ActiveForm = Form2 Case 3 ActiveForm = Form3 Case 4 ActiveForm = Form4 End Select End Sub Protected Sub Command1_Click(source As Object, e As EventArgs) If Not SelectionList1.Selection.Value = "4" Then Label1.Text = "You run as Admin too often!" Else Label1.Text = "Excellent!" End If End Sub </script> </HEAD> <body xmlns:mobile="http://schemas.microsoft.com/Mobile/WebForm"> <h1>Mobile Control Example</h1> <mobile:Form id="Form1" Runat="server"> <mobile:Label id="Label2" runat="server">Choose a sample:</mobile:Label> <mobile:List id="List1" OnItemCommand="List1_Click" runat="server" Decoration="Numbered"> <Item Value="2" Text="SelectionList Sample"></Item> <Item Value="3" Text="PhoneCall Sample"></Item> <Item Value="4" Text="TextView Sample"></Item> </mobile:List> </mobile:Form> <mobile:Form id="Form2" runat="server"> <mobile:Label id="Label1" runat="server">How often do you run Windows as Admin?</mobile:Label> <mobile:SelectionList id="SelectionList1" runat="server"> <Item Value="0" Text="Always"></Item> <Item Value="1" Text="Often"></Item> <Item Value="2" Text="Sometimes"></Item> <Item Value="3" Text="Rarely"></Item> <Item Value="4" Text="Never"></Item> </mobile:SelectionList> <mobile:Command id="Command1" OnClick="Command1_Click" runat="server">Submit</mobile:Command> </mobile:Form> <mobile:Form id="Form3" runat="server"> <mobile:PhoneCall id="PhoneCall1" runat="server" PhoneNumber="(000)555-1234" AlternateUrl="http://www.java2s.com">Call Mom</mobile:PhoneCall> </mobile:Form> <mobile:Form id="Form4" runat="server"> <mobile:TextView id="TextView1" runat="server" Wrapping="Wrap">mobile text view</mobile:TextView> </mobile:Form> </body>
1. | Mobile phone call (VB.net) | ||
2. | Set phone number for mobile phone (VB.net) |