470,593 Members | 1,953 Online
Bytes | Developer Community
New Post

Home Posts Topics Members FAQ

Post your question to a community of 470,593 developers. It's quick & easy.

Problem with CheckBox in a datagrid

Hi there:

I've read an excellent "how to"-article by Microsoft (no. 306227) - partly
cited cited at the end of this email).

I have implemented the code related to the part "How to Add a CheckBox
Programmatically" in my code. I have changed it to use a OLDDB.DBReader to
populate the datagrid and for the databinding. It works perfectly - also
when using the edit-mode in the datagrid.

However, the problem is: in "edit-Mode" in the Datagrid using some
update-coding of mine I cannot read the "value" of the CheckBox which was
added pogrammatically in case the user changed it. I tried using
"e.Item.FindControl("CheckBox1")" but it won't work, hoping that the ID of
the CheckBox was simply CheckBox1 (see code below) . I have also been trying
to read the value by using e.Item.Cells(whatever).Controls(whatever) but how
on earth can I now the correct position - that would involve guessing.

************my code snippet*********************
Private Sub DataGrid1_UpdateCommand(ByVal source As Object, ByVal e As
System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles

Dim ContactId As Integer, ContactPerson, email, phone, remarks As String
Dim tb As TextBox, cb As CheckBox, bolValue As Boolean

ContactId = e.Item.Cells(1).Text


cb = CType(e.Item.FindControl("CheckBox1"), CheckBox)
bolValue = cb.Checked, Boolean

tb = CType(e.Item.Cells(4).Controls(0), TextBox)
ContactPerson = tb.Text
tb = CType(e.Item.Cells(5).Controls(0), TextBox)
email = tb.Text
tb = CType(e.Item.Cells(6).Controls(0), TextBox)
phone = tb.Text
tb = CType(e.Item.Cells(7).Controls(0), TextBox)
remarks = tb.Text

Dim str1 As String = _
"UPDATE tblContacts " & _
"SET ContactPerson='" & ContactPerson & "', ContactPerson_email='" & email &
"', " & _
"ContactPerson_phone='" & phone & "', Remarks='" & remarks & "' WHERE
ContactID=" & ContactId

DataGrid1.EditItemIndex = -1
************end of my code snippet***************

I still believe that "e.Item.FindControl("CheckBox1")" is the right way to
go. But how do I know the ID (name) of the CheckBox-control which is added
by your code ? Is it possible to assign the ID somewhere in your code ?

I'd appreciate your help and assistance if you do not mind. Thank-you.


************************************************** *****
How to Add a CheckBox Programmatically
The following sample code adds the TemplateColumn and CheckBox controls to
the grid and binds the data programmatically. First, the sample code adds a
TemplateColumn control and then adds the check boxes to the Template column.
Finally, the code adds an event handler to bind the CheckBox control to the
Type or paste the following code sample in the Page_Load event. The code
creates a TemplateColumn object and sets its header text.

'Create a new TemplateColumn object.
Dim tcol As New TemplateColumn()
With tcol
.HeaderText = "CheckBox Column"
' Call DynamicItemTemplate to add the child controls to the Template
' Column and bind them to the Data source.
.ItemTemplate = New DynamicItemTemplate()
End With

If Not IsPostBack Then
End If

Type or paste the following code after the Public Class WebForm1, End class.
Public Class DynamicItemTemplate
' ITemplate - When implemented by a class, defines the Control object
' to which child controls and templates belong. These child controls
' are in turn defined within an inline template.
Implements ITemplate

Public Overridable Overloads Sub InstantiateIn(ByVal container As
Control) Implements ITemplate.InstantiateIn
' InstantiateIn - When implemented by a class, defines the Control
' object to which child controls and templates belong. These child
' controls are, in turn, defined within an inline template.
' Create an instance of a CheckBox object.
Dim oCheckBox As CheckBox = New CheckBox()

' When the DataBinding event of the CheckBox fires, call the sub
' BindCheckBox to properly bind.
' AddHandler oCheckBox.DataBinding, AddressOf BindCheckBox
'Add the CheckBox to the controls collection.
End Sub
Public Sub BindCheckBox(ByVal sender As Object, ByVal e As EventArgs)
'Create a new instance of a CheckBox.
Dim oCheckBox As CheckBox = CType(sender, CheckBox)
Dim container As DataGridItem = CType(oCheckBox.NamingContainer,
'Evaluate the data from the Grid item and set the Checked property
' appropriatly
If container.DataItem("contract").GetType.ToString = "System.DBNull"
oCheckBox.Checked = False
oCheckBox.Checked = CBool(container.DataItem("contract"))
End If

End Sub
End Class

NOTE: The binding code is commented to make the process easier to
Save and run the code. Notice that the Template Column and unbound CheckBox
controls were added.
How to Iterate Through the Control to Test the Value of the CheckBox
Uncomment the following line of code in the aforementioned code sample:
'AddHandler oCheckBox.DataBinding, AddressOf BindCheckBox

This line calls the event handler, Public Sub BindCheckBox, when the
DataBinding event of the CheckBox control executes. The BindCheckBox
procedure evaluates the data and properly sets the Checked property of the
current check box. Notice that the procedure is called for every row in the
grid as the DataGrid binds each row.
Nov 18 '05 #1
0 2183

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

2 posts views Thread by Mortel | last post: by
1 post views Thread by Joe Bloggs | last post: by
8 posts views Thread by Inigo Jimenez | last post: by
2 posts views Thread by buran | last post: by
7 posts views Thread by Lars Netzel | last post: by
30 posts views Thread by dbuchanan | last post: by
3 posts views Thread by Fao, Sean | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.