Index Out of Bounds Error

[dwenwa]

Hi,

I have a datagrid in my application that has a Template Column with a
radiobutton. After selecting the item in the datagrid and the submit button,
the program executes getSelectedItem (). See below. This works fine except
when there is only one row in the datagrid. Then I get the Index out of
bounds error.

Has anyone seen this before?

Dave
Private Function GetSelectedItem s(ByVal grdlst As DataGrid) As String
Dim rowCount As Integer = 0
Dim gridSelections As StringBuilder = New StringBuilder
Try
Dim oDataGridItem As DataGridItem
For Each oDataGridItem In grdlst.Items
Dim rdoSelected As RadioButton =
CType(oDataGrid Item.Cells(0).C ontrols(1), RadioButton)

If rdoSelected.Che cked = True Then
rowCount += 1
gridSelections. AppendFormat("{ 0}~",
grdlst.DataKeys (oDataGridItem. ItemIndex).ToSt ring())
End If
Next

Catch ex As Exception
lblMessage.Text = "Error finding selected row; " & ex.Message
End Try

If rowCount > 0 Then
'Remove the last separation symbol
'gridSelections .Remove(gridSel ections.Length - 1, 1)
Return (gridSelections .ToString)
Else
Return ("")
End If
End Function

[Ken Cox [Microsoft MVP]]

Just wondering if your problem has to do with the For Each loop trying to
find a checkbox inside header and footer items?

A fix would be to check that you are only looking inside
ListItemType.Al ternatingItem and ListItemType.It em types

Ken
MVP [ASP.NET]

"dw****@company abc.com" <dw************ *****@discussio ns.microsoft.co m>
wrote in message news:39******** *************** ***********@mic rosoft.com...

Hi,

I have a datagrid in my application that has a Template Column with a
radiobutton. After selecting the item in the datagrid and the submit
button,
the program executes getSelectedItem (). See below. This works fine
except
when there is only one row in the datagrid. Then I get the Index out of
bounds error.

Has anyone seen this before?

Dave
Private Function GetSelectedItem s(ByVal grdlst As DataGrid) As String
Dim rowCount As Integer = 0
Dim gridSelections As StringBuilder = New StringBuilder
Try
Dim oDataGridItem As DataGridItem
For Each oDataGridItem In grdlst.Items
Dim rdoSelected As RadioButton =
CType(oDataGrid Item.Cells(0).C ontrols(1), RadioButton)

If rdoSelected.Che cked = True Then
rowCount += 1
gridSelections. AppendFormat("{ 0}~",
grdlst.DataKeys (oDataGridItem. ItemIndex).ToSt ring())
End If
Next

Catch ex As Exception
lblMessage.Text = "Error finding selected row; " & ex.Message
End Try

If rowCount > 0 Then
'Remove the last separation symbol
'gridSelections .Remove(gridSel ections.Length - 1, 1)
Return (gridSelections .ToString)
Else
Return ("")
End If
End Function

[dwenwa]

Ken,

Thanks for the response. I found the problem. I didn't define a DataKey
for the Datagrid. DataKeys are required to pick up the selected row. So my
code looks like the following now:
dvPromote = New DataView(dtProm ote)
dgRequests.Data Source = dvPromote
dgRequests.Data KeyField = "Tran_ID"
dgRequests.Data Bind()
I didn't show this code before, but the dgRequests.Data KeyField entry was
missing.

Thanks again for your help.

Dave

"Ken Cox [Microsoft MVP]" wrote:

Just wondering if your problem has to do with the For Each loop trying to
find a checkbox inside header and footer items?

A fix would be to check that you are only looking inside
ListItemType.Al ternatingItem and ListItemType.It em types

Ken
MVP [ASP.NET]

"dw****@company abc.com" <dw************ *****@discussio ns.microsoft.co m>
wrote in message news:39******** *************** ***********@mic rosoft.com...

Hi,

I have a datagrid in my application that has a Template Column with a
radiobutton. After selecting the item in the datagrid and the submit
button,
the program executes getSelectedItem (). See below. This works fine
except
when there is only one row in the datagrid. Then I get the Index out of
bounds error.

Has anyone seen this before?

Dave
Private Function GetSelectedItem s(ByVal grdlst As DataGrid) As String
Dim rowCount As Integer = 0
Dim gridSelections As StringBuilder = New StringBuilder
Try
Dim oDataGridItem As DataGridItem
For Each oDataGridItem In grdlst.Items
Dim rdoSelected As RadioButton =
CType(oDataGrid Item.Cells(0).C ontrols(1), RadioButton)

If rdoSelected.Che cked = True Then
rowCount += 1
gridSelections. AppendFormat("{ 0}~",
grdlst.DataKeys (oDataGridItem. ItemIndex).ToSt ring())
End If
Next

Catch ex As Exception
lblMessage.Text = "Error finding selected row; " & ex.Message
End Try

If rowCount > 0 Then
'Remove the last separation symbol
'gridSelections .Remove(gridSel ections.Length - 1, 1)
Return (gridSelections .ToString)
Else
Return ("")
End If
End Function