|
<%@ Page Language="vb" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
<script runat="server">
Sub Page_Load(sender as Object, e as EventArgs)
If Not Page.IsPostBack then
BindData()
End If
End Sub
Sub BindData()
Const strConnString as String = "server=localhost;uid=sa;pwd=;database=pubs"
Dim objConn as New SqlConnection(strConnString)
Const strSQL as String = "SELECT * FROM titles"
Dim objCmd as New SqlCommand(strSQL, objConn)
objConn.Open() 'Open the connection
rptTitles.DataSource = objCmd.ExecuteReader(CommandBehavior.CloseConnection)
rptTitles.DataBind()
objConn.Close() 'Close the connection
End Sub
Sub rptTitles_ItemCommand(sender As Object, e As RepeaterCommandEventArgs)
If e.CommandName = "Details" then
Dim lc as Label = e.Item.FindControl("lblTitleID")
Dim strTitleID as String = lc.Text
End If
End Sub
</script>
<form runat="server">
<asp:Repeater runat="server" id="rptTitles"
OnItemCommand="rptTitles_ItemCommand">
<ItemTemplate>
<b>Title:</b> <%# DataBinder.Eval(Container.DataItem, "title") %>
<br />
[<asp:LinkButton runat="server" id="btnDetails"
Text="View Book Details" CommandName="Details" />]
<asp:label id="lblTitleID" Visible="False" runat="Server"
Text='<%# DataBinder.Eval(Container.DataItem, "title_id") %>' />
</ItemTemplate>
<SeparatorTemplate>
<hr>
</SeparatorTemplate>
</asp:Repeater>
</form>
|