add Another row to GridView Footer-

[NewTel]

Hi

This code works great but it only adds the one row. I need a second one.
How?

Thanks!
Protected Sub grdExcel_RowDataBound(ByVal sender As Object, ByVal e As
System.Web.UI.WebControls.GridViewRowEventArgs)

If e.Row.RowType = DataControlRowType.DataRow Then

' add the UnitPrice and QuantityTotal to the running total variables

SUM_AMOUNT2 += Convert.ToDecimal(DataBinder.Eval(e.Row.DataItem, _

"AMOUNT"))

CANCEL_AMOUNT2 += Convert.ToDecimal(DataBinder.Eval(e.Row.DataItem, _

"CANCEL_AMOUNT"))

ElseIf e.Row.RowType = DataControlRowType.Footer Then

e.Row.Cells(3).Text = "Totals:"

' for the Footer, display the running totals

e.Row.Cells(4).Text = SUM_AMOUNT2.ToString("c")

e.Row.Cells(5).Text = CANCEL_AMOUNT2.ToString("c")

e.Row.Cells(6).Text = (SUM_AMOUNT2 - CANCEL_AMOUNT2).ToString("c")
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Right

e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right

e.Row.Cells(6).HorizontalAlign = HorizontalAlign.Right

e.Row.Font.Bold = True
End If

End Sub

[Andrew Robinson]

The GridView is limited to a single footer row.

--

Andrew Robinson
http://blog.binaryocean.com
"NewTel" <dd**@dimdddabot.com> wrote in message
news:Da********************@comcast.com...

Hi

This code works great but it only adds the one row. I need a second one.
How?

Thanks!
Protected Sub grdExcel_RowDataBound(ByVal sender As Object, ByVal e As
System.Web.UI.WebControls.GridViewRowEventArgs)

If e.Row.RowType = DataControlRowType.DataRow Then

' add the UnitPrice and QuantityTotal to the running total variables

SUM_AMOUNT2 += Convert.ToDecimal(DataBinder.Eval(e.Row.DataItem, _

"AMOUNT"))

CANCEL_AMOUNT2 += Convert.ToDecimal(DataBinder.Eval(e.Row.DataItem, _

"CANCEL_AMOUNT"))

ElseIf e.Row.RowType = DataControlRowType.Footer Then

e.Row.Cells(3).Text = "Totals:"

' for the Footer, display the running totals

e.Row.Cells(4).Text = SUM_AMOUNT2.ToString("c")

e.Row.Cells(5).Text = CANCEL_AMOUNT2.ToString("c")

e.Row.Cells(6).Text = (SUM_AMOUNT2 - CANCEL_AMOUNT2).ToString("c")
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Right

e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right

e.Row.Cells(6).HorizontalAlign = HorizontalAlign.Right

e.Row.Font.Bold = True
End If

End Sub