All pastes #394794 Raw Edit

Something

public text v1 · immutable
·published 2007-03-14 16:04 UTC
rendered paste body

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here
        PopulateCartDisplay()
    End Sub

    Private Sub PopulateCartDisplay()
        Dim myDS As New System.Data.DataTable
        'Create three columns with string as their type
        myDS.Columns.Add("itemID", String.Empty.GetType())
        myDS.Columns.Add("itemName", String.Empty.GetType())
        myDS.Columns.Add("itemPrice", String.Empty.GetType())
        myDS.Columns.Add("itemColor", String.Empty.GetType())
        myDS.Columns.Add("itemQuantity", String.Empty.GetType())
        myDS.Columns.Add("itemCode", String.Empty.GetType())
        myDS.Columns.Add("itemCartID", String.Empty.GetType())



        'Adding some data in the rows of this DataTable

        myDS.Rows.Add(New String() {"1", "product a", "1.00", "Blue", "100", "Z100", "1"})
        myDS.Rows.Add(New String() {"2", "product b", "1.33", "Green", "100", "Z150", "2"})
        myDS.Rows.Add(New String() {"3", "product c", "1.00", "Red", "100", "Z200", "3"})
        Me.myCartGrid.DataSource = myDS
        Me.myCartGrid.DataBind()

    End Sub


    Public Sub myGrid_DeleteCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles myCartGrid.DeleteCommand
        Response.Write("doDelete")
    End Sub


    Public Sub myGrid_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles myCartGrid.ItemCommand
        Response.Write("itemCommand")
    End Sub












<asp:DataGrid
	id="myCartGrid" 
	DataKeyField="itemCartID"
	GridLines="None" 
	OnDeleteCommand="myGrid_DeleteCommand"
	OnItemCommand="myGrid_ItemCommand"
	AutoGenerateColumns="False"
	runat="server">
	<Columns>
		<asp:ButtonColumn CommandName="Delete" Text="X" ItemStyle-Width="43" ButtonType="PushButton" />
		<asp:TemplateColumn  ItemStyle-Width="227">
			<ItemTemplate>
				<strong><%# DataBinder.Eval(Container.DataItem, "itemName") %></strong>
				<br/><%# DataBinder.Eval(Container.DataItem, "itemCode") %>
			</ItemTemplate>
		</asp:TemplateColumn>
		<asp:BoundColumn ItemStyle-Width="99" DataField="itemColor"></asp:BoundColumn>
		<asp:TemplateColumn ItemStyle-width="120">
			<ItemTemplate>
			<asp:TextBox ID="txtQuantity" Runat="server" style="width:40px;"
				 text='<%# DataBinder.Eval(Container.DataItem, "itemQuantity") %>'/>
			</ItemTemplate>
		</asp:TemplateColumn>
		<asp:BoundColumn ItemStyle-Width="86" DataField="itemPrice" DataFormatString="{0:c}" />
		<asp:TemplateColumn ItemStyle-width="107">
			<ItemTemplate>
			<strong><%# formatcurrency(DataBinder.Eval(Container.DataItem, "itemPrice") * DataBinder.Eval(Container.DataItem, "itemQuantity"),2) %></strong>
			</ItemTemplate>
		</asp:TemplateColumn>
		
	</Columns>	
</asp:DataGrid>