Знакомство с ASP.NET

Что еще нужно знать об ASP.NET

Взаимодействие с клиентом

Создание интерактивных приложений для intranet-сетей

Расширение функциональных возможностей intarnet

Создание спортивного Web-узла

Управление содержимым Web-узла

Отслеживание действий посетителейa

Виртуальный университет

 Использование специализированных приложений на узлах компаний

Виртуальная риэлтерская контора

Персонализация узла для посетителей

Интерактивные возможности узла

Увеличение посещаемости узла

Создание интерактивного магазина

Создание интерактивного аукциона

Web-службы

Справочник по языку ASP.NET/VB.

Сайт создан по материалам книги Г. Бучека "Учебный курс по ASP.NET". Москва: BHV, 2002.

Создатель сайта-выпускник курсов web-дизайнеров Сафоновского Колледжа Информационных Технологий Максим Котликов
Когда страница загружается, вызывается содержащийся на ней код.

    Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    Dim DBConn as OleDbConnection
    Dim DBCpmmand As OleDbDataAdapter
    Dim DSPageData as New DataSet
    DBConn = New OleDbConnection("Provider=sqloledb;" _
    & "server=localhost;" _
    & "Initial Catalog=INETC15;" _
    & "User Id=sa;"
    & "Password=yourpassword;")
    DBCommand = New OleDbDataAdapter _
    ("Select ProductID, ProductName, BriefDescription, " _
    & "Price From Products Where CurrentSpecial = 1 " _
    & "Order By ProductName", DBConn)
    DBCommand.Fill(DSPageData, _
    "Products")
    dgSpecials.DataSource = _
    DSPageData.Tables("Products").DefaultView
    dgSpecials.DataBind
    End Sub

Текст SQL-запроса, который извлечет из базы данных все записи, относящиеся к товарам, которые помечены как особые, помещается в объект DataAdapter:

    DBCommand = New OleDbDataAdapter _
    ("Select ProductID, ProductName, BriefDescription, " _
    & "Price From Products Where CurrentSpecial = 1 " _
    & "Order By ProductName", DBConn)

Результаты работы данного запроса помещаются в таблицу под названием Products, находящуюся в объекте DataSet:

    DBCommand.Fill(DSPageData, _
    "Products")

Затем производится связывание элемента управления DataGrid с таблицей из объекта DataSet:

    dgSpecials.DataSource = _
    DSPageData.Tables("Products").Defaultview
    dgSpe cials.DataBind

Страница Поиск

Страница Поисй позволяет посетителю ввести текст, который будет использован при поиске товаров в базе данных.

В теле страницы определяется элемент управления Labe 1, содержащий заголовок страницы. Следующий элемент управления на странице — это Textbox, пред- назначенный для ввода искомого текста:

    <asp:TextBox
    id="txtSearchText"
    Columns="25"
    MaxLength="30"
    runat=server
    />

После него следует элемент управления Button. С его помощью создается кнопка, которую посетитель нажимает при необходимости подтвердить запрос:

    <asp:button
    id="butOK"
    text=" OK "
    Type='' Submit"
    OnClick="SubmitBtn_Click"
    runat="server"
    />

На странице имеется также элемент управления DataGrid, предназначенный для демонстрации перечня товаров, соответствующих запросу посетителя:

    <ASP:DataGrid
    id="dgProducts"
    AutoGenerateColumns="false"
    Width="90%"
    BackColor="beige"
    AlternatingItemStyle-BackColor="cornsilk"
    BorderColor="black"
    ShowFooter="false"
    CellPadding=3
    Cellspacing-"0"
    Font-Name="Arial"
    Font-Size="8pt"
    ForeColor="Black"
    HeaderStyle-BackColor="burlywood"
    HeaderStyle-Font-Bold="True"
    runat="server">
    <Columns>
    <asp:HyperLinkColumn
    HeaderText="Tosap (Щелкните для получения подробной
    информации)"
    DataNavigateUrlField="ProductID"
    DataNavigateUrlFormatString="./product.aspx?ProductID={0}"
    DataTextField="ProductName"
    Target="_self"
    />
    <asp:BoundColumn
    HeaderText="Описание"
    DataField="BriefDescription"
    /> <asp:BoundColumn
    HeaderText="Цена"
    DataField=f "Price"
    DataFormatSt'ring=" (0 :C)"
    />
    </Columns>
    </asp:DataGrid>

Hosted by uCoz