Сайт создан по материалам книги Г. Бучека "Учебный курс по ASP.NET".
Москва: BHV, 2002.
Создатель сайта-выпускник курсов web-дизайнеров Сафоновского Колледжа Информационных Технологий Максим Котликов
Создатель сайта-выпускник курсов web-дизайнеров Сафоновского Колледжа Информационных Технологий Максим Котликов
Элемент управления Repeater позволяет отображать однотипную информацию в формате, который определен заданными в этом элементе шаблонами. В этом случае записи помещаются в таблицу HTML.
Шаблон HeaderTemplate используется до вывода записей на экран.-
<HeaderTemplate>
-
<Table width="100%" style="font: 8pt verdana">
-
<TR style="Background-Color:DFECD8">
<ТО><В>Номер</В></ТВ>
<ТО><В>Цена</В></ТО>
<ТО><В>Спальни/Ванные</В></ТО>
<ТО><В>Район</В></ТО>
<ТО><В>Контакт</В></ТО>
</TR>
</HeaderTemplate>
Шаблон ItemTemplate предназначен для отображения записей, а каждая запись помещается в отдельную строку таблицы.
В начале записи указывается код HLCN, представляющий собой ссылку на страницу Дом:-
<TD>
<%t "<A HREF=""./listing.aspx?HLCN="
& DataBinder.Eval(Container.Dataltem, "HLCN") & """>" _
& DataBinder.Eval(Container.Dataltem, "HLCN") & "</A>" %>
</TD>
-
<TD>
<%f FormatCurrency(DataBinder. _
Eval(Container.Dataltem, "HousePrice")) %>
</TD>
-
<TD>
<%# DataBinder.Eval(Container.Dataltem, "BedBath") %>
</TD>
-
<TD>
<%# DataBinder.Eval(Container.Dataltem, "HomeLocation") %>
</TD>
-
<TD>
<%# DataBinder.Eval(Container.Dataltem, "Contactlnfo") %>
</TD>
-
</TR>
</ItemTemplate>
В элементе управления Repeater можно задать различные шаблоны для четных и нечетных строк. При выполнении такой установки шаблон itemTemplate назначался бы первой, третьей, пятой и следующим нечетным строкам, а шаблон Alternating ItemTemplate — второй, четвертой, шестой и следующим четным строкам.
В этом шаблоне используется другой цвет фона:-
<TR style="Background-Color:FFECA8">
-
<TR style="Background-Color:DFECD8">
<TD><B>HOMep</B></TD>
<ТО><В>Цена</В></ТО>
<ТО><В>Спальни/Ванные</В></ТО>
<ТО><В>Район</В></ТО>
<ТО><В>Контакт</В></ТО>
</TR>
</ТаЫе>
</footertemplate>
-
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
Dim DBConn as OleDbConnection
Dim DBCommand As OleDbDataAdapter
Dim DSHomeData as New DataSet
DBConn = New OleDbConnection("Provider=sqloledb;" _
& "server=localhost;" _
& "Initial Catalog-INETCll;" _
& "User Id=sa;"
& "Password=yourpassword;")
DBCommand = New OleDbDataAdapter _
(Session("SearchSQL"),DBConn)
DBCommand,Fill(DSHomeData, _
"SearchResults")
repSearchResults.DataSource = _
DSHomeData.Tables("SearchResults").Defaultview
repSearchResults.DataBind()
If DSHomeData.Tables("SearchResults").Rows.Count = 1 Then
IblCount.Text = "Найдена 1" _
4 " запись."
Else
IblCount.Text = "Найдено " _
& DSHomeData.Tables("SearchResults").Rows.Count _
& " записи(ей)."
End If
End Sub
 |
 |
|
