在允许插入、编辑和删除的 ASP.Net / VB.Net DetailsView 上,我们希望捕获当用户单击 DetailsView 的 Edit 按钮和 Update 按钮时发生的事件。
我们希望通过 VB.Net 代码隐藏文件中的事件处理程序来捕获这些事件。
你能用示例代码告诉我怎么做吗?
* 更新 *
我尝试了这种编码,但在单击“编辑”按钮时出现以下错误:
Unable to cast object of type 'System.Web.UI.WebControls.DetailsView'
to type 'System.Web.UI.WebControls.DetailsViewRow'.
这是显示“编辑”按钮的标记中的编码:
<asp:DetailsView
ID="DetailsViewDetails"
runat="server"
AutoGenerateRows="False"
Height="50px"
Width="268px"
DataSourceID="SqlDataSourceDetails"
DataKeyNames="ID"
OnItemCommand="DetailsViewDetails_ItemCommand">
<Fields>
<asp:TemplateField ShowHeader="False">
<EditItemTemplate>
<asp:Button ID="ButtonUpdate" runat="server" CausesValidation="True"
CommandName="Update" Text="Update" />
<asp:Button ID="ButtonCancelUpdate" runat="server" CausesValidation="False"
CommandName="Cancel" Text="Cancel" />
</EditItemTemplate>
<InsertItemTemplate>
<asp:Button ID="ButtonInsert" runat="server" CausesValidation="True"
CommandName="Insert" Text="Insert" />
<asp:Button ID="ButtonCancelInsert" runat="server" CausesValidation="False"
CommandName="Cancel" Text="Cancel" />
</InsertItemTemplate>
<ItemTemplate>
<asp:Button ID="ButtonEdit" runat="server" CausesValidation="False"
CommandName="Edit" Text="Edit" />
<asp:Button ID="ButtonNew" runat="server" CausesValidation="False"
CommandName="New" Text="New" />
<asp:Button ID="ButtonDelete" runat="server" CausesValidation="False"
CommandName="Delete" Text="Delete" />
<AjaxToolKit:ConfirmButtonExtender ID="deleteButtonConfirmation"
runat="server"
ConfirmText='<%# "You are about to remove: " & vbcr &
Eval("Forename") & vbcr & Eval("Surname") & "!!!" &
vbcrlf & "Are you sure you want to do this?" & vbcrlf &
"Clicking the OK button will delete this parent." %>'
Enabled="True"
TargetControlID="ButtonDelete">
</AjaxToolKit:ConfirmButtonExtender>
</ItemTemplate>
</asp:TemplateField>
这是代码隐藏文件中的处理程序:
Protected Sub DetailsViewDetails_ItemCommand(sender As Object, e As System.Web.UI.WebControls.DetailsViewCommandEventArgs)
Dim row As DetailsViewRow = DirectCast(DirectCast(e.CommandSource, Control).NamingContainer, DetailsViewRow)
Select Case e.CommandName
Case "Add"
Case "Edit"
' Do this when going into edit mode so changes to the panent's tuition total balance can be updated.
'---------------------------------------------------------------------------------------------------
dcmOriginalRegistrationFee = GetValueFromTextBoxRegistrationFee()
Case "Delete"
End Select
End Sub
我们在 Dim 语句中得到错误。