<%@ Import Namespace="System.Data.OleDb" %>
<%@ Page Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
sub Page_Load
Dim conn, sql, comm, dbread
conn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;data source=" &
server.mappath("/info/florist.mdb"))
conn.Open()
sql="SELECT * FROM items"
comm=New OleDbCommand(sql,conn)
dbread=comm.ExecuteReader()
items.DataSource=dbread
items.DataBind()
dbread.Close()
conn.Close()
end sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head id="Head1" runat="server">
<title>Catalogue In ASP .NET</title>
</head>
<body>
<form id="Form1" runat="server">
<asp:Repeater id="items" runat="server">
<HeaderTemplate>
<table border="1">
<tr>
<th>Name</th>
<th>Description</th>
<th>Cost</th>
</tr>
</HeaderTemplate>
<ItemTemplate>
<tr>
<td><%#Container.DataItem("itemname")%> </td>
<td><%#Container.DataItem("itemdescription")%> </td>
<td><%#Container.DataItem("itemcost")%> </td>
</tr>
</ItemTemplate>
<FooterTemplate>
</table>
</FooterTemplate>
</asp:Repeater>
</form>
</body>
</html>