Сайт создан по материалам книги Г. Бучека "Учебный курс по ASP.NET".
Москва: BHV, 2002.
Создатель сайта-выпускник курсов web-дизайнеров Сафоновского Колледжа Информационных Технологий Максим Котликов
Создатель сайта-выпускник курсов web-дизайнеров Сафоновского Колледжа Информационных Технологий Максим Котликов
Проект Конструктор
Проект Поиск решения
Проект Бронирование номеров
а затем используются в инструкции Insert SQL-запроса, который фиксирует выбор посетителя в таблице OrderChoices:
-
DBInsert.CommandText = "Insert Into OrderChoices " _
& "(ObjectOrderlD, ChoicelD, ChoiceText, ChoiceCost) " _
& "values (" _
& Session("ObjectOrderlD") & ", " _
& ddlResponses.Selectedltem.Value &",'"_
& DSQuestion.Tables("Choicelnfo").Rows(0).Item("ChoiceText") _
&"',"_
& DSQuestion.Tables("Choicelnfo").Rows(O).Item("ChoiceCost") _
& ") "
-
DBCommand = New OleDbDataAdapter _
("Select ObjectQuestionID, " _
& "ObjectQuestfionText, PicPath, " _
& "PicAltText from ObjectQuestions " _
& "Where Sequence = " _
& Session("CurrentSequenceNumber"),DBConn)
-
DBCommand.Fill(DSQuestion, _
"CurrentQuestion")
-
If DSQuestion.Tables("CurrentQuestion").Rows.Count = 0 Then
-
Response.Redirect("./summary.aspx")
-
DBCommand = New OleDbDataAdapter _
("Select ChoicelD, ChoiceText " _
& "From QuestionChoices " _
& "Where ObjectQuestionID = " _
& DSQuestion.Tables("CurrentQuestion").Rows(O).Item _
("ObjectQuestionID") ,DBConn)
DBCommand.Fill(DSQuestion, _
"CurrentResponses")
-
imgStepPicture.AlternateText = _
DSQuestion.Tables("CurrentQuestion").Rows(0).Item("PicAltText")
imgStepPicture.ImageUrl = _
DSQuestion.Tables("CurrentQuestion").Rows(0).Item("PicPath")
-
IblQuestion.Text = _
DSQuestion.Tables("CurrentQuestion").Rows(0)_
.Item("ObjectQuestionText")
-
ddlResponses.DataSource = _
DSQuestion.Tables("CurrentResponses").Defaultview
ddlResponses.DataBindO
Страница Спецификация содержит список всех составных объектов, выбранных посетителем. В нижней ее части указывается общая стоимость заказа. На ней предусмотрены средства перехода на страницу Изменение комплектующей (ссылки, находящиеся во второй колонке таблицы) для замены выбранных объектов.
Рассмотрим элементы управления, используемые в теле страницы. Элемент Label предназначен для отображения заголовка:-
<asp:Label
id="lblTitle"
runat="server"
/>
-
<ASP:DataGrid
id="dgSummaryInfo"
AutoGenerateColumns="false"
Width="90%"
BackColor="fccccff"
BorderColor="black"
ShowFooter="false"
CellPadding=3
CellSpacing="0"
Font-Name="Verdana"
Font-Size="8pt"
HeaderStyle=BackColor="#aaaadd"
OnItemCommand="Click_Grid"
runat="server">
<Columns> <asp:BoundColumn
HeaderText="Выбранный объект"
DataField="ChoiceText"
/>
<asp:BoundColumn
HeaderText="Щeлкнитe здесь для замены объекта"
DataField="OrderChoiceID"
Visible="False"
/>
<asp:ButtonColumn
HeaderText=''Замена объекта"
ButtonType="LinkButton"
Text="Изменить"
CommandName="cmdModifyItem"
/>
</Columns>
</asp:DataGrid>
-
id="dgSummaryInfo"
 |
 |
|
