Лекция: Создание бизнес-объектов
Использование методов вашего объекта
I: <%8 Page Language=«VB» %>
2: <%? Import Namespace=«System.Data» %>
3: <%H Import Namespace=«System.Data.OleDb» %>
4:
5: <script runat=«server»>
5: sub Page_Load(obj as object, e as eventargs)
7: dim objDatabase as new TYASPNET.Database
3:
Э: objDatabase.ConnectionString = «Provider=» &
10: «Microsoft.Jet.OLEDB.4.0;» & _
11: «Data Source=C:\ASPNET\data\banking.mdb»
12:
13: dim objReader as OleDbDataReader
H: objReader = objDatabase.SelectSQL _
15: («Select * from tblUsers11}
16:
17: if not objReader is nothing then
18: DataGridl.DataSource = objReader
19: DataGridl.DataBind()
20: objReader.Close
21: end if
22: end sub
23:
24: </script>
25:
26: <html><body>
27: <asp:Label id=4blMessage» runat=«server» />
to:
29: <asp:DataGrid id=«DataGridl»
30: runat=«serverH BorderColor=»black"
31:: GridLines=«Vertical» cellpadding=«4»
32: cellspacing=«0» width=«100%»
33: Font-Name=«Arialfl Font-Size3»8pt"
34:: HeaderStyle-BackColor=«fcccc99»
35: ItemStyle-BackColor=«lffffff»
36: AlternatingItemStyle-BackColor="#cccccc" />
37: </bodyx/html>
B строке 7 происходит объявление объекта базы данных, а в строке 9 — задание свойства ConnectionString. В строке 14 выполняется метод SelectSQL. Затем результаты выполнения этого метода берутся и размещаются в OleDbDataReader.
В случае ошибки функция SelectSQL передает назад значение nothing. Перед тем как что-то делать с объектом для чтения данных (data reader) в строке 17 проверяется, содержатся ли в нем какие-то результаты. Если содержатся, то эти данные связываются в строке 19 с объектом DataGrid, а в строке 20 объект для чтения закрывается.
Если приложение будет сложнее, то и бизнес-объект может существенно усложниться. тогда может получиться большая экономия времени.
получать данные с помощью этого объекта можно теперь в любой станице ASP.NET. Для соединения с другой базой данных можно задать другую строку соединения.