<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<html>
<script language="VB" runat="server">
Sub PopulateList()
Dim DS As DataSet
Dim MyConnection As SqlConnection
Dim MyCommand As SqlDataAdapter
MyConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("Pubs").ConnectionString)
MyCommand = New SqlDataAdapter("select * from Titles where type = 'business'", MyConnection)
DS = New DataSet()
MyCommand.Fill(DS, "Titles")
MyDataList.DataSource = DS.Tables("Titles").DefaultView
MyDataList.DataBind()
End Sub
Sub Page_Load(Sender As Object, E As EventArgs)
If Not (Page.IsPostBack)
PopulateList()
End If
End Sub
Sub MyDataList_Edit(Sender As Object, E As DataListCommandEventArgs)
MyDataList.EditItemIndex = CInt(e.Item.ItemIndex)
PopulateList()
End Sub
Sub MyDataList_Update(Sender As Object, E As DataListCommandEventArgs)
' database update left out for simplicity's sake...
Dim EditText As HtmlInputText
EditText = E.Item.FindControl("edit_price")
Message.InnerHtml = "Price Updated: " & EditText.Value
MyDataList.EditItemIndex = -1
PopulateList()
End Sub
Sub MyDataList_Cancel(Sender As Object, E As DataListCommandEventArgs)
MyDataList.EditItemIndex = -1
PopulateList()
End Sub
</script>
<body topmargin="0" leftmargin="0" marginwidth="0" marginheight="0">
<form runat="server">
<!-- #include virtual="header.inc" -->
<ASP:DataList id="MyDataList" RepeatColumns="2" OnEditCommand="MyDataList_Edit" OnUpdateCommand="MyDataList_Update" OnCancelCommand="MyDataList_Cancel" runat="server">
<ItemTemplate>
<table cellpadding=10 style="font: 10pt verdana">
<tr>
<td width=1 bgcolor="BD8672"/>
<td valign="top">
<img alt="book image" align="top" src='<%# DataBinder.Eval(Container.DataItem, "title_id", "images/{0}.gif") %>' >
</td>
<td valign="top">
<b>Title: </b><%# DataBinder.Eval(Container.DataItem, "title") %><br>
<b>Category: </b><%# DataBinder.Eval(Container.DataItem, "type") %><br>
<b>Publisher ID: </b><%# DataBinder.Eval(Container.DataItem, "pub_id") %><br>
<b>Price: </b><%# DataBinder.Eval(Container.DataItem, "price", "$ {0}") %>
<p>
<asp:linkbutton CommandName="Edit" runat="server">
<img alt="edit book" border="0" src="images/edit_book.gif" >
</asp:linkbutton>
</td>
</tr>
</table>
</ItemTemplate>
<EditItemTemplate>
<table cellpadding=10 style="font: 10pt verdana">
<tr>
<td width=1 bgcolor="BD8672"/>
<td valign="top">
<img alt="book image" align="top" src='<%# DataBinder.Eval(Container.DataItem, "title_id", "images/{0}.gif") %>' >
</td>
<td valign="top">
<b>Title: </b><%# DataBinder.Eval(Container.DataItem, "title") %><br>
<b>Category: </b><%# DataBinder.Eval(Container.DataItem, "type") %><br>
<b>Publisher ID: </b><%# DataBinder.Eval(Container.DataItem, "pub_id") %><br>
<b>Price: </b><input id="edit_price" type="text" value='<%# DataBinder.Eval(Container.DataItem, "price", "$ {0}") %>' runat="server"/>
<p>
<asp:linkbutton CommandName="Update" runat="server"><img alt="update" border="0" src="images/update_book.gif" ></asp:linkbutton>
<asp:linkbutton CommandName="Cancel" runat="server"><img alt="cancel" border="0" src="images/cancel_book.gif" ></asp:linkbutton>
</td>
</tr>
</table>
</EditItemTemplate>
</ASP:DataList>
<!-- #include virtual="footer.inc" -->
</form>
<div style="font: 10pt verdana;padding:0,15,15,15" id="Message" runat="server"/>
</body>
</html>
|