ASP.Net/Components/Toolbar

Материал из .Net Framework эксперт
Версия от 11:51, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Adding a ToolbarButton Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, ByVal E as EventArgs)
    lblMessage.Text = "You clicked the button named: " _
        & Sender.ToString()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarButton Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    orientation="Horizontal"
    autopostback="true"
    onbuttonclick="ToolBarClick"
    >
    <IEControls:ToolBarButton 
        id="Filter"
        runat="server"
        Tooltip="Filter Records"
        ImageUrl="filter.ico"
        Text="Filter"
    />
    <IEControls:ToolBarButton 
        id="Print"
        runat="server"
        Tooltip="Print Record"
        ImageUrl="printer.ico"
        Text="Print"
    />
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</form>
</BODY>
</HTML>



Adding a ToolbarCheckButton Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, ByVal E as EventArgs)
    If MyTB.Orientation = 1 Then
        MyTB.Orientation = 0
    Else
        MyTB.Orientation = 1
    End If
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarCheckButton Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    orientation="Vertical"
    autopostback="true"
    onbuttonclick="ToolBarClick"
    >
    <IEControls:toolbarcheckbutton 
        id="OrientationMode"
        runat="server"
        Tooltip="Toggle Toolbar Orientation"
        Text="Orientation"
    />
    <IEControls:toolbarcheckbutton 
        id="OrientationMode2"
        runat="server"
        Tooltip="Toggle Toolbar Orientation"
        Text="Orientation"
    />
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</form>
</BODY>
</HTML>



Adding a ToolbarCheckGroup Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, ByVal E as EventArgs)
    lblMessage.Text = "You clicked button: " _
        & Group1.SelectedCheckButton.ID
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarCheckGroup Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    autopostback="true"
    onbuttonclick="ToolBarClick"
    >
    <IEControls:ToolBarCheckGroup
        id="Group1"
        runat="server"
        ForceSelection="True"
    >
        <IEControls:ToolBarCheckButton 
            id="TBCB1"
            runat="server"
            Text="Button 1"
        />
        <IEControls:ToolBarCheckButton 
            id="TBCB2"
            runat="server"
            Text="Button 2"
            Selected
        />
        <IEControls:ToolBarCheckButton 
            id="TBCB3"
            runat="server"
            Text="Button 3"
        />
    </IEControls:ToolBarCheckGroup>
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</form>
</BODY>
</HTML>



Adding a ToolbarDropDownList Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ddl1_Changed(ByVal Sender as Object, ByVal E as EventArgs)
    lblMessage.Text = "You selected item: " _
        & ddlSiteSection.SelectedItem.Text
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarDropDownList Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    autopostback="true"
    >
    <IEControls:ToolBarDropDownList
        id="ddlSiteSection"
        runat="server"
        onselectedindexchanged="ddl1_Changed"
    >
        <asp:ListItem>Home</asp:ListItem>
        <asp:ListItem>News</asp:ListItem>
        <asp:ListItem>Employees</asp:ListItem>
        <asp:ListItem>Contact Information</asp:ListItem>
    </IEControls:ToolBarDropDownList>
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    font-bold="True"
/>
</form>
</BODY>
</HTML>



Adding a ToolbarLabel Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    tblDate.Text = Today()
    tblTime.Text = TimeOfDay()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarLabel Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    >
    <IEControls:toolbarlabel
        id="tblDate"
        runat="server"
        tooltip="Current Date"
        ImageUrl="clock1.ico"
    />
    <IEControls:toolbarlabel
        id="tblTime"
        runat="server"
        tooltip="Current Time"
        imageurl="clock2.ico"
    />
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    font-bold="True"
/>
</form>
</BODY>
</HTML>



Adding a ToolbarSeparator Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarSeparator Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    >
    <IEControls:toolbartextbox 
        id="txtSearchTerm"
        runat="server"
    />
    <IEControls:ToolBarSeparator
        id="Sep1"
        runat="server"
    />
    <IEControls:toolbartextbox 
        id="txtSearchTerm2"
        runat="server"
    />
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    font-bold="True"
/>
</form>
</BODY>
</HTML>



Adding a ToolbarTextBox Control to a Toolbar Control (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
End Sub
Sub Search_Changed(Sender As Object, E As EventArgs)
    lblMessage.Text = "Searching for: " & txtSearchTerm.Text
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding a ToolbarTextBox Control to a Toolbar Control</TITLE>
</HEAD>
<BODY LEFTMARGIN="10">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    autopostback="True"
    >
    <IEControls:toolbartextbox 
        id="txtSearchTerm"
        runat="server"
        text="Enter Search Term"
        columns=20
        maxlength="30"
        textmode="SingleLine"
        ontextchanged="Search_Changed"
    />
</IEControls:toolbar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    font-bold="True"
/>
</form>
</BODY>
</HTML>



Adding Controls to a Toolbar Control through Code (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    If (WeekDay(Today())) = 2 Then
        Dim MyTBL = New ToolBarLabel
        MyTBL.Text = "2:00 PM Metting Today!"
        MyTBL.ToolTip = "The weekly meeting is on for today."
        MyTB.Items.Add(MyTBL)
    End If
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Adding Controls to a Toolbar Control through Code</TITLE>
</HEAD>
<BODY LEFTMARGIN="40">
<form runat="server">
<IEControls:toolbar 
    id="MyTB" 
    runat="server" 
    >
</IEControls:toolbar>
</form>
</BODY>
</HTML>



IE control toolbar with button images (C#)

<%@ Register TagPrefix="iewc" Namespace="Microsoft.Web.UI.WebControls" Assembly="Microsoft.Web.UI.WebControls" %>
<%@ Page language="c#" src="ToolbarTest.aspx.cs" AutoEventWireup="false" Inherits="ToolbarTest" %>
<HTML>
  <body>
    <form id="Form1" method="post" runat="server">
      <iewc:Toolbar id="Toolbar1" style="Z-INDEX: 101; LEFT: 8px; POSITION: absolute; TOP: 12px" runat="server" Orientation="Vertical" Font-Names="Verdana" Font-Size="X-Small" Height="440px" Width="114px">
        <iewc:ToolbarButton Text="Get Help" ImageUrl="CHM.gif"></iewc:ToolbarButton>
        <iewc:ToolbarSeparator></iewc:ToolbarSeparator>
        <iewc:ToolbarButton Text="&amp;nbsp;Page 1" ImageUrl="folder.gif"></iewc:ToolbarButton>
        <iewc:ToolbarButton Text="&amp;nbsp;Page 2" ImageUrl="folder.gif"></iewc:ToolbarButton>
        <iewc:ToolbarButton Text="&amp;nbsp;Page 3" ImageUrl="folder.gif"></iewc:ToolbarButton>
      </iewc:Toolbar>
      <DIV id="DIV1" style="BORDER-RIGHT: 2px groove; BORDER-TOP: 2px groove; Z-INDEX: 102; LEFT: 120px; BORDER-LEFT: 2px groove; WIDTH: 528px; BORDER-BOTTOM: 2px groove; POSITION: absolute; TOP: 13px; HEIGHT: 440px" ms_positioning="GridLayout">
        <asp:Label id="lblInfo" style="Z-INDEX: 101; LEFT: 24px; POSITION: absolute; TOP: 20px" runat="server" Width="464px" Height="208px" Font-Names="Verdana" Font-Size="Large" Font-Bold="True"></asp:Label></DIV>
    </form>
  </body>
</HTML>

<%--
using System;
using System.Collections;
using System.ruponentModel;
using System.Data;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;
using Microsoft.Web.UI.WebControls;
  public class ToolbarTest : System.Web.UI.Page
  {
    protected Microsoft.Web.UI.WebControls.Toolbar Toolbar1;
    protected System.Web.UI.WebControls.Label lblInfo;
  
    private void Page_Load(object sender, System.EventArgs e)
    {
      // Put user code to initialize the page here
    }
    #region Web Form Designer generated code
    override protected void OnInit(EventArgs e)
    {
      //
      // CODEGEN: This call is required by the ASP.NET Web Form Designer.
      //
      InitializeComponent();
      base.OnInit(e);
    }
    
    /// <summary>
    /// Required method for Designer support - do not modify
    /// the contents of this method with the code editor.
    /// </summary>
    private void InitializeComponent()
    {    
      this.Toolbar1.ButtonClick += new System.EventHandler(this.Toolbar1_ButtonClick);
      this.Load += new System.EventHandler(this.Page_Load);
    }
    #endregion
    private void Toolbar1_ButtonClick(object sender, System.EventArgs e)
    {
      ToolbarButton clickedButton = (ToolbarButton)sender;
      if (clickedButton.ID == "Help")
      {
        lblInfo.Text = "You clicked the Help button.";
      }
      else
      {
        lblInfo.Text = "You clicked: " + clickedButton.Text;
      }
    }
  }
--%>



Toggle button on Toolbar (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, _
    ByVal E as EventArgs)
    If PrinterMode.Selected = True Then
        lblMessage.Text = "Printer mode is on.<BR>"
    Else    
        lblMessage.Text = "Printer mode is off.<BR>"
    End If
    If ModeA.Selected = True Then
        lblMessage.Text = lblMessage.Text _
            & "Mode A is on.<BR>"
    ElseIf ModeB.Selected = True Then
        lblMessage.Text = lblMessage.Text _
            & "Mode B is on.<BR>"
    Else
        lblMessage.Text = lblMessage.Text _
            & "Mode C is on.<BR>"
    End If
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>ToolBar 2 Control Sample Page</TITLE>
</HEAD>
<BODY>
<form runat="server">
<Font Face="Tahoma">
<IEControls:ToolBar 
    id="MyTB" 
    runat="server" 
    AutoPostBack="true"
    Font-Size="10"
    Orientation="Horizontal"
    OnButtonClick="ToolBarClick"
    >
    <IEControls:ToolBarCheckButton 
        id="PrinterMode"
        runat="server"
        ImageURL="printer.ico"
        Tooltip="Toggle Printer Mode"
        Text="Printer Mode"
    />
    <IEControls:ToolBarSeparator
        id="Sep1"
        runat="server"
    />
    <IEControls:ToolBarCheckGroup
        id="Group1"
        runat="server"
        ForceSelection="True"
    >
        <IEControls:ToolBarCheckButton 
            id="ModeA"
            runat="server"
            Text="Mode A"
        />
        <IEControls:ToolBarCheckButton 
            id="ModeB"
            runat="server"
            Text="Mode B"
            Selected
        />
        <IEControls:ToolBarCheckButton 
            id="ModeC"
            runat="server"
            Text="Mode C"
        />
    </IEControls:ToolBarCheckGroup>
</IEControls:ToolBar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</Font>
</Form>
</BODY>
</HTML>



Toolbar with comboBox (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, _
    ByVal E as EventArgs)
    lblMessage.Text = "You selected the " _
        & ddlSiteSection.SelectedItem.Text _
        & " section of the site.<BR>" _
        & "You entered this search term: " _
        & txtSearchTerm.Text & "."
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>ToolBar 3 Control Sample Page</TITLE>
</HEAD>
<BODY>
<form runat="server">
<Font Face="Tahoma">
<IEControls:ToolBar 
    id="MyTB" 
    runat="server" 
    AutoPostBack="true"
    Font-Size="10"
    Orientation="Horizontal"
    OnButtonClick="ToolBarClick"
    >
    <IEControls:ToolBarLabel 
        id="Label1"
        runat="server"
        Text="Select Site Section: "
    />
    <IEControls:ToolBarDropDownList
        id="ddlSiteSection"
        runat="server"
    >
        <asp:ListItem>Home</asp:ListItem>
        <asp:ListItem>News</asp:ListItem>
        <asp:ListItem>Employees</asp:ListItem>
        <asp:ListItem>Contact Information</asp:ListItem>
    </IEControls:ToolBarDropDownList>
    <IEControls:ToolBarSeparator
        id="Sep1"
        runat="server"
    />
    <IEControls:ToolBarSeparator
        id="Sep2"
        runat="server"
    />
    <IEControls:ToolBarLabel 
        id="Label2"
        runat="server"
        Text="Search Our Site: "
    />
    <IEControls:ToolBarTextBox 
        id="txtSearchTerm"
        runat="server"
    />
    <IEControls:ToolBarButton 
        id="Go"
        runat="server"
        Text="Go"
    />
</IEControls:ToolBar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</Font>
</Form>
</BODY>
</HTML>



Toolbar with hyperlink button (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, _
    ByVal E as EventArgs)
    lblMessage.Text = "You selected the " _
        & ddlSiteSection.SelectedItem.Text _
        & " section of the site.<BR>" _
        & "You entered this search term: " _
        & txtSearchTerm.Text & "."
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>ToolBar 3 Control Sample Page</TITLE>
</HEAD>
<BODY>
<form runat="server">
<Font Face="Tahoma">
<IEControls:ToolBar 
    id="MyTB" 
    runat="server" 
    AutoPostBack="true"
    Font-Size="10"
    Orientation="Horizontal"
    OnButtonClick="ToolBarClick"
    >
    <IEControls:ToolBarLabel 
        id="Label1"
        runat="server"
        Text="Select Site Section: "
    />
    <IEControls:ToolBarDropDownList
        id="ddlSiteSection"
        runat="server"
    >
        <asp:ListItem>Home</asp:ListItem>
        <asp:ListItem>News</asp:ListItem>
        <asp:ListItem>Employees</asp:ListItem>
        <asp:ListItem>Contact Information</asp:ListItem>
    </IEControls:ToolBarDropDownList>
    <IEControls:ToolBarSeparator
        id="Sep1"
        runat="server"
    />
    <IEControls:ToolBarSeparator
        id="Sep2"
        runat="server"
    />
    <IEControls:ToolBarLabel 
        id="Label2"
        runat="server"
        Text="Search Our Site: "
    />
    <IEControls:ToolBarTextBox 
        id="txtSearchTerm"
        runat="server"
    />
    <IEControls:ToolBarButton 
        id="Go"
        runat="server"
        Text="Go"
    />
</IEControls:ToolBar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</Font>
</Form>
</BODY>
</HTML>



Toolbar with icon (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    TBLabel1.Text = Today()
    TBLabel2.Text = TimeOfDay()
End Sub
Sub ToolBarClick(ByVal Sender as Object, ByVal E as EventArgs)
    lblMessage.Text = "You clicked the button named: " _
        & Sender.ToString()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>ToolBar 1 Control Sample Page</TITLE>
</HEAD>
<BODY >
<form runat="server">
<Font Face="Tahoma">
<IEControls:ToolBar 
    id="MyTB" 
    runat="server" 
    AutoPostBack="true"
    Font-Size="10"
    Orientation="Horizontal"
    OnButtonClick="ToolBarClick"
    >
    <IEControls:ToolBarButton 
        id="Filter"
        runat="server"
        Tooltip="Filter Records"
        ImageUrl="filter2.ico"
        Text="Filter&nbsp"
    />
    <IEControls:ToolBarButton 
        id="Print"
        runat="server"
        Tooltip="Print Record"
        ImageUrl="printer.ico"
        Text="Print&nbsp"
    />
    <IEControls:ToolBarSeparator
        id="Sep1"
        runat="server"
    />
    <IEControls:ToolBarLabel
        id="TBLabel1"
        runat="server"
        Tooltip="Current Date"
        ImageUrl="clock1.ico"
    />
    <IEControls:ToolBarSeparator
        id="Sep2"
        runat="server"
    />
    <IEControls:ToolBarLabel
        id="TBLabel2"
        runat="server"
        Tooltip="Current Time"
        ImageUrl="clock2.ico"
    />
</IEControls:ToolBar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</Font>
</Form>
</BODY>
</HTML>



Toolbar with textbox (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="Microsoft.Web.UI.WebControls" %>
<%@ Register TagPrefix="IEControls" 
    Namespace="Microsoft.Web.UI.WebControls" 
    Assembly ="Microsoft.Web.UI.WebControls"
%>
<script runat=server>
Sub ToolBarClick(ByVal Sender as Object, _
    ByVal E as EventArgs)
    lblMessage.Text = "You selected the " _
        & ddlSiteSection.SelectedItem.Text _
        & " section of the site.<BR>" _
        & "You entered this search term: " _
        & txtSearchTerm.Text & "."
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>ToolBar 3 Control Sample Page</TITLE>
</HEAD>
<BODY>
<form runat="server">
<Font Face="Tahoma">
<IEControls:ToolBar 
    id="MyTB" 
    runat="server" 
    AutoPostBack="true"
    Font-Size="10"
    Orientation="Horizontal"
    OnButtonClick="ToolBarClick"
    >
    <IEControls:ToolBarLabel 
        id="Label1"
        runat="server"
        Text="Select Site Section: "
    />
    <IEControls:ToolBarDropDownList
        id="ddlSiteSection"
        runat="server"
    >
        <asp:ListItem>Home</asp:ListItem>
        <asp:ListItem>News</asp:ListItem>
        <asp:ListItem>Employees</asp:ListItem>
        <asp:ListItem>Contact Information</asp:ListItem>
    </IEControls:ToolBarDropDownList>
    <IEControls:ToolBarSeparator
        id="Sep1"
        runat="server"
    />
    <IEControls:ToolBarSeparator
        id="Sep2"
        runat="server"
    />
    <IEControls:ToolBarLabel 
        id="Label2"
        runat="server"
        Text="Search Our Site: "
    />
    <IEControls:ToolBarTextBox 
        id="txtSearchTerm"
        runat="server"
    />
    <IEControls:ToolBarButton 
        id="Go"
        runat="server"
        Text="Go"
    />
</IEControls:ToolBar>
<BR>
<asp:Label
    id="lblMessage"
    runat="server"
    FOnt-Bold="True"
/>
</Font>
</Form>
</BODY>
</HTML>