我正在尝试使用vb.net和asp（visual studio 2008）网站制作一个简单的Gridview，它与sql数据库中的单个表一起使用。我手动编写了所有语句，它们不是自动生成的（删除，插入，更新）。插入和更新工作正常并提交到数据库。尝试删除时，我收到此错误：
“您已指定删除命令比较SqlDataSource'mydatasource'上的所有值，但传入值的字典为空。传入有效字典进行删除或将模式更改为OverwriteChanges。”
我一直在阅读关于乐观并发被启用纠正这一点，但除了让数据源自动生成更新，删除，插入语句之外，我不知道如何启用它。我不是在这里做的。这个代码在我正在处理的另一个项目中工作，所以我很茫然。非常感谢任何帮助。
******************************************ASP CODE***************************************************
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<%@ Register assembly="System.Web.Entity, Version=3.5.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"
namespace="System.Web.UI.WebControls" tagprefix="asp" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-
transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title> OnCall Schedule </title>
<style type="text/css">
#form1
{
height: 731px;
width: 1122px;
}
</style>
</head>
<body>
<form id="frmDefault" method="post" runat="server">
<asp:ToolkitScriptManager ID="ToolkitScriptManager2" runat="server">
</asp:ToolkitScriptManager>
<div>
</div>
<asp:SqlDataSource ID="dsOncallGroup" runat="server"
ConnectionString="<%$ ConnectionStrings:DiscussSQLConnectionString %>"
SelectCommand="SELECT * FROM tblOnCall WHERE (tblOnCall.fldOnCallGroup = @fldOnCallGroup)
AND (tblOnCall.fldEndOnCall > GETDATE())
ORDER BY tblOnCall.fldOnCallGroup, tblOnCall.fldEndOnCall, tblOnCall.fldRank"
OldValuesParameterFormatString="original_{0}"
ConflictDetection="CompareAllValues"
DeleteCommand="DELETE FROM tblOnCall WHERE fldOCID = @fldOCID"
InsertCommand="INSERT INTO [tblOnCall] ([fldOnCallGroup], [fldStartOnCall], [fldEndOnCall], [fldRank],
[fldEmpName], [fldEmpWorkPhone],
[fldEmpHomePhone],[fldEmpHomeCellPhone],[fldEmpAltPhone],[fldOCPreferredContact])
VALUES (@fldOnCallGroup, @fldStartOnCall, @fldEndOnCall, @fldRank, @fldEmpName, @fldEmpWorkPhone, @fldEmpHomePhone,
@fldEmpHomeCellPhone, @fldEmpAltPhone, @fldOCPreferredContact)"
UpdateCommand="UPDATE [tblOnCall] SET [fldOnCallGroup] = @fldOnCallGroup, [fldStartOnCall] = @fldStartOnCall,
[fldEndOnCall] = @fldEndOnCall, [fldRank] = @fldRank, [fldEmpName] = @fldEmpName, [fldEmpWorkPhone] =
@fldEmpWorkPhone,
[fldEmpHomePhone] = @fldEmpHomePhone,[fldEmpHomeCellPhone] = @fldEmpHomeCellPhone,[fldEmpAltPhone] = @fldEmpAltPhone,
[fldOCPreferredContact] = @fldOCPreferredContact
WHERE [fldOCID] = @original_fldOCID">
<SelectParameters>
<asp:ControlParameter ControlID="cboOncallGroup" Name="fldOnCallGroup"
PropertyName="SelectedValue" Type="String" />
</SelectParameters>
<DeleteParameters>
<asp:Parameter Name= "original_fldOCID" Type="Int16" />
</DeleteParameters>
<UpdateParameters>
<asp:Parameter Name="fldOnCallGroup" Type="String" ConvertEmptyStringToNull="false" />
<asp:Parameter Name="fldStartOnCall" DbType ="DateTime2" />
<asp:Parameter Name="fldEndOnCall" DbType ="DateTime2" />
<asp:Parameter Name= "fldRank" Type="Int16" />
<asp:Parameter Name= "fldEmpName" Type="String" />
<asp:Parameter Name= "fldEmpWorkPhone" Type="String" />
<asp:Parameter Name= "fldEmpHomePhone" Type="String" />
<asp:Parameter Name= "fldEmpHomeCellPhone" Type="String" />
<asp:Parameter Name= "fldEmpAltPhone" Type="String" />
<asp:Parameter Name= "fldOCPreferredContact" Type="String" />
<asp:Parameter Name="original_fldOnCallGroup" Type="String" ConvertEmptyStringToNull="false" />
<asp:Parameter Name="original_fldStartOnCall" DbType="DateTime2" />
<asp:Parameter Name="original_fldEndOnCall" DbType="DateTime2" />
<asp:Parameter Name= "original_fldRank" Type="Int16" />
<asp:Parameter Name= "original_fldEmpName" Type="String" />
<asp:Parameter Name= "original_fldEmpWorkPhone" Type="String" />
<asp:Parameter Name= "original_fldEmpHomePhone" Type="String" />
<asp:Parameter Name= "original_fldEmpHomeCellPhone" Type="String" />
<asp:Parameter Name= "original_fldEmpAltPhone" Type="String" />
<asp:Parameter Name= "original_fldOCPreferredContact" Type="String" />
</UpdateParameters>
<InsertParameters>
<asp:Parameter Name="fldOnCallGroup" Type="String" />
<asp:Parameter DbType="DateTime2" Name="fldStartOnCall" />
<asp:Parameter DbType="DateTime2" Name="fldEndOnCall" />
<asp:Parameter Name="fldRank" Type="Int16" />
<asp:Parameter Name="fldEmpName" Type="String" />
<asp:Parameter Name="fldEmpWorkPhone" Type="String" />
<asp:Parameter Name="fldEmpHomePhone" Type="String" />
<asp:Parameter Name="fldEmpHomeCellPhone" Type="String" />
<asp:Parameter Name="fldEmpAltPhone" Type="String" />
<asp:Parameter Name="fldOCPreferredContact" Type="String" />
<asp:Parameter Name="original_fldOnCallGroup" Type="String" ConvertEmptyStringToNull="false" />
<asp:Parameter Name="original_fldStartOnCall" DbType="DateTime2" />
<asp:Parameter Name="original_fldEndOnCall" DbType="DateTime2" />
<asp:Parameter Name= "original_fldRank" Type="Int16" />
<asp:Parameter Name= "original_fldEmpName" Type="String" />
<asp:Parameter Name= "original_fldEmpWorkPhone" Type="String" />
<asp:Parameter Name= "original_fldEmpHomePhone" Type="String" />
<asp:Parameter Name= "original_fldEmpHomeCellPhone" Type="String" />
<asp:Parameter Name= "original_fldEmpAltPhone" Type="String" />
<asp:Parameter Name= "original_fldOCPreferredContact" Type="String" />
</InsertParameters>
</asp:SqlDataSource>
<asp:SqlDataSource ID="dsListbox" runat="server"
ConnectionString="<%$ ConnectionStrings:DiscussSQLConnectionString %>"
SelectCommand="SELECT DISTINCT [fldOnCallGroup] FROM [tblOnCall]">
</asp:SqlDataSource>
<br />
<div style="margin-left: 50px">
<asp:Image ID="Image1" runat="server" Height="100px"
ImageUrl="~/images/ITSLogo.jpg" Width="100px" />
<br /> <br /> <br /> <br />
<asp:DropDownList ID="cboOncallGroup" runat="server" DataSourceID="dsListbox" DataTextField="fldOnCallGroup"
DataValueField="fldOnCallGroup" AppendDataBoundItems="true"
OnSelectedIndexChanged="cboOnCallGroup_SelectedIndexChanged" AutoPostBack="true" Height="19px" Width="237px">
</asp:DropDownList>
</div>
<asp:SqlDataSource ID="dsEmp" runat="server"
ConnectionString="<%$ ConnectionStrings:DiscussSQLConnectionString %>"
SelectCommand="SELECT DISTINCT [fldEmpName] FROM [tblOnCall]">
</asp:SqlDataSource>
<br /> <br />
<div style="margin-left: 50px">
<asp:Gridview ID="gvOnCallSchedule" runat="server" AllowSorting="True" AllowPaging="True" showfooter="true"
OnRowUpdating="GvOnCall_Update" onRowCommand="gvOnCallSchedule_RowCommand" DataKeyNames="fldOCID"
BackColor="Aqua" DataSourceID="dsOncallGroup" Font-Bold="True"
Font-Italic="False" Font-Overline="False" Font-Strikeout="False"
Font-Underline="False" ForeColor="#333333" HorizontalAlign="Justify"
CellPadding="4" GridLines="None" PageSize="20" AutoGenerateColumns ="false"
OnSelectedIndexChanged="cboOnCallGroup_SelectedIndexChanged">
<Columns>
<asp:TemplateField ShowHeader="false">
<FooterTemplate>
<asp:ImageButton ID="AddButton" runat="server" CommandName="Insert" ImageURL="~/images/New.png"
Text="Add" ToolTip="Add New On Call Record" />
</FooterTemplate>
<EditItemTemplate>
<asp:ImageButton ID="UpdateButton" runat="server" CausesValidation="False" CommandName="Update"
ImageUrl="~/images/Save.png" Text="Update" ToolTip="Update" />
<asp:ImageButton ID="CancelButton" runat="server" CausesValidation="false" CommandName="Cancel"
ImageURL="~/images/Cancel.png" Text="Cancel" ToolTip="Cancel" />
</EditItemTemplate>
<ItemTemplate>
<asp:ImageButton ID="EditButton" runat="server" CausesValidation="False" CommandName="Edit"
ImageUrl="~/images/Edit.gif" Text="Edit" ToolTip="Edit" />
<asp:ImageButton ID="DeleteButton" runat="server" CausesValidation="False" CommandName="Delete"
ImageUrl="~/images/Delete.png" Text="Delete" ToolTip="Delete" />
</ItemTemplate>
<ItemStyle Wrap="false" />
</asp:TemplateField>
<asp:Boundfield headertext="fldOCID" datafield="fldOCID" sortexpression="fldOCID" visible="false"
InsertVisible="False" />
<asp:TemplateField headertext="On Call Group">
<ItemTemplate>
<asp:DropDownList ID="ddlOCGroup" width="250px" runat="server" datavaluefield="fldOnCallGroup" Enabled="false"
DataSourceID= "dsListbox" SelectedValue="<%# Bind('fldOnCallGroup') %>">
</asp:DropDownList>
</ItemTemplate>
<FooterTemplate>
<asp:DropDownList ID="ftrddlOCGroup" width="250px" runat="server" datavaluefield="fldOnCallGroup"
DataSourceID= "dsListbox" SelectedValue="<%# Bind('fldOnCallGroup') %>">
</asp:DropDownList>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Start Date/Time">
<ItemTemplate>
<asp:Textbox ID="txtStartOnCall" runat="server" Text='<%# Bind("fldStartOnCall") %>'>
</asp:Textbox>
<asp:Image ID="calpopup" runat="server" ImageUrl="~/images/calendar2.png" />
<asp:CalendarExtender ID="StartOnCallCal" runat="server" TargetControlID="txtStartOnCall"
PopupButtonID="calpopup" PopupPosition="Right" format="MM/dd/yyyy hh:mm:ss tt">
</asp:CalendarExtender>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtStartOnCallFtr" runat="server" Text='<%# Bind("fldStartOncall") %>'>
</asp:Textbox>
<asp:Image ID="calpopupFtr" runat="server" ImageUrl="~/images/calendar2.png" />
<asp:CalendarExtender ID="StartOnCallCalFtr" runat="server" TargetControlID="txtStartOnCallFtr"
PopupButtonID="calpopupFtr" PopupPosition="Right" format="MM/dd/yyyy hh:mm:ss tt">
</asp:CalendarExtender>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="End Date/Time">
<ItemTemplate>
<asp:Textbox ID="txtEndOnCall" runat="server" Text='<%# Bind("fldEndOnCall") %>'>
</asp:Textbox>
<asp:Image ID="calpopup2" runat="server" ImageUrl="~/images/calendar2.png" />
<asp:CalendarExtender ID="EndOnCallCal" runat="server" TargetControlID="txtEndOnCall"
PopupButtonID="calpopup2" PopupPosition="Right" format="MM/dd/yyyy hh:mm:ss tt">
</asp:CalendarExtender>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtEndOnCallFtr" runat="server" Text='<%# Bind("fldEndOnCall") %>'>
</asp:Textbox>
<asp:Image ID="calpopup2Ftr" runat="server" ImageUrl="~/images/calendar2.png" />
<asp:CalendarExtender ID="EndOnCallCalFtr" runat="server" TargetControlID="txtEndOnCallFtr"
PopupButtonID="calpopup2Ftr" PopupPosition="Right" format="MM/dd/yyyy hh:mm:ss tt">
</asp:CalendarExtender>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Call Order">
<ItemTemplate>
<asp:Textbox ID="lblCallOrder" runat="server" Text='<%# Bind("fldRank") %>'>
</asp:Textbox>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtCallOrderFtr" runat="server" Text='<%# Bind("fldOnCallGroup") %>'>
</asp:Textbox>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="OnCall Analyst">
<ItemTemplate>
<asp:DropDownList ID="ddlAnalyst" runat="server" datavaluefield="fldEmpName"
datasourceID="dsEmp" SelectedValue='<%# Bind("fldEmpName") %>'>
</asp:DropDownList>
</ItemTemplate>
<FooterTemplate>
<asp:DropDownList ID="ddlAnalystFtr" runat="server" datavaluefield="fldEmpName"
DataSourceID= "dsEmp" SelectedValue='<%# Bind("fldEmpName") %>'>
</asp:DropDownList>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Work Phone">
<ItemTemplate>
<asp:Textbox ID="lblWorkPhone" runat="server" Text='<%# Bind("fldEmpWorkPhone") %>'>
</asp:Textbox>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtWorkPhoneFtr" runat="server" Text='<%# Bind("fldEmpWorkPhone") %>'>
</asp:Textbox>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Home Phone">
<ItemTemplate>
<asp:Textbox ID="lblHomePhone" runat="server" Text='<%# Bind("fldEmpHomePhone") %>'>
</asp:Textbox>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtHomePhoneFtr" runat="server" Text='<%# Bind("fldEmpHomePhone") %>'>
</asp:Textbox>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Personal Cell">
<ItemTemplate>
<asp:Textbox ID="lblHomeCellPhone" runat="server" Text='<%# Bind("fldEmpHomeCellPhone") %>'>
</asp:Textbox>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtHomeCellPhoneFtr" runat="server" Text='<%# Bind("fldEmpHomeCellPhone") %>'>
</asp:Textbox>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Alternate Phone">
<ItemTemplate>
<asp:Textbox ID="lblAltPhone" runat="server" Text='<%# Bind("fldEmpAltPhone") %>'>
</asp:Textbox>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtAltPhoneFtr" runat="server" Text='<%# Bind("fldEmpAltPhone") %>'>
</asp:Textbox>
</FooterTemplate>
</asp:TemplateField>
<asp:TemplateField headertext="Preferred Contact">
<ItemTemplate>
<asp:Textbox ID="lblOCPreferredContact" runat="server" Text='<%# Bind("fldOCPreferredContact") %>'>
</asp:Textbox>
</ItemTemplate>
<FooterTemplate>
<asp:Textbox ID="txtOCPreferredContactFtr" runat="server" Text='<%# Bind("fldOCPreferredContact") %>'>
</asp:Textbox>
</FooterTemplate>
</asp:TemplateField>
</Columns>
<FooterStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />
<PagerStyle BackColor="#666666" ForeColor="White" HorizontalAlign="Center" />
<SelectedRowStyle BackColor="#C5BBAF" Font-Bold="True" ForeColor="#333333" />
<HeaderStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />
<EditRowStyle BackColor="#7C6F57" />
<AlternatingRowStyle BackColor="White" />
</asp:Gridview>
</div>
<br />
<br />
<div style="margin-left: 200px">
</div>
</form>
</body>
</html>
***************************************VB.net Code behind****************************************
Imports System
Imports System.Data
Imports System.Data.Sql
Imports System.Data.SqlClient
Imports System.Data.DataRowView
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub cboOnCallGroup_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles
cboOncallGroup.SelectedIndexChanged
'Dim cboAssignedFK As DropDownList = DirectCast(sender, DropDownList)
Dim cboOnCallGroup As String = TryCast(sender, DropDownList).SelectedValue
Dim sqlConn As New SqlConnection(ConfigurationManager.ConnectionStrings
("DiscussSQLConnectionString").ConnectionString)
Dim sSql As System.Xml.Linq.XElement = <sql>
SELECT [fldOnCallGroup], [fldStartOnCall], [fldEndOnCall], [fldRank], [fldEmpName], [fldEmpWorkPhone],
[fldEmpHomePhone], [fldEmpHomeCellPhone], [fldEmpAltPhone], [fldOCPreferredContact]
FROM [tblOnCall]
WHERE ([fldOnCallGroup] = '<%= cboOnCallGroup %>')
ORDER BY [fldOnCallGroup], [fldEndOnCall], [fldRank] </sql>
Dim sqlCmd As New SqlCommand(sSql.Value, sqlConn)
Dim sqlRead As SqlDataReader
If sqlConn.State <> ConnectionState.Open Then
sqlConn.Open()
End If
sqlRead = sqlCmd.ExecuteReader()
sqlRead.Read()
sqlRead.Close()
sqlConn.Close()
End Sub
Function SendSQLCommand(ByVal tsSQLCmd As String, ByVal tsqlConn As SqlConnection) As Integer
Dim iRetVal As Integer = -1
Dim sqlCmd As New SqlCommand(tsSQLCmd, tsqlConn)
If tsqlConn.State <> ConnectionState.Open Then
tsqlConn.Open()
End If
Try
iRetVal = sqlCmd.ExecuteNonQuery()
Catch ex As Exception
Throw ex
End Try
Return iRetVal
End Function
Function SendSQLCommand2(ByVal tsSQLCmd As String, ByVal tsqlConn As SqlConnection) As Integer
Dim iRetVal As Integer = -1
Dim sqlCmd As New SqlCommand(tsSQLCmd, tsqlConn)
If tsqlConn.State <> ConnectionState.Open Then
tsqlConn.Open()
End If
Return iRetVal
End Function
Protected Sub GvOnCall_Update(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs)
Dim keyValue As Integer = e.Keys("fldOCID")
Dim strfldOnCallGroupOld As String = RTrim(LTrim(e.OldValues("fldOnCallGroup").ToString()))
Dim strfldOnCallGroupNew As String = RTrim(LTrim(e.NewValues("fldOnCallGroup").ToString()))
Dim strfldStartOnCallOld As String = RTrim(LTrim(e.OldValues("fldStartOnCall").ToString()))
Dim strfldStartOnCallNew As String = RTrim(LTrim(e.NewValues("fldStartOnCall").ToString()))
Dim strfldEndOnCallOld As String = RTrim(LTrim(e.OldValues("fldEndOnCall").ToString()))
Dim strfldEndOnCallNew As String = RTrim(LTrim(e.NewValues("fldEndOnCall").ToString()))
Dim strfldRankOld As Int32 = e.OldValues("fldRank")
Dim strfldRankNew As Int32 = e.NewValues("fldRank")
Dim strfldEmpNameOld As String = e.OldValues("fldEmpName")
Dim strfldEmpNameNew As String = e.NewValues("fldEmpName")
Dim strfldEmpWorkPhoneOld As String = e.OldValues("fldEmpWorkPhone")
Dim strfldEmpWorkPhoneNew As String = e.OldValues("fldEmpWorkPhone")
Dim strfldEmpHomePhoneOld As String = e.OldValues("fldEmpHomePhone")
Dim strfldEmpHomePhoneNew As String = e.OldValues("fldEmpHomePhone")
Dim strfldEmpHomeCellPhoneOld As String = e.OldValues("fldEmpHomeCellPhone")
Dim strfldEmpHomeCellPhoneNew As String = e.OldValues("fldEmpHomeCellPhone")
Dim strfldEmpAltPhoneOld As String = e.OldValues("fldEmpAltPhone")
Dim strfldEmpAltPhoneNew As String = e.OldValues("fldEmpAltPhone")
Dim strfldOnCallCellPhoneOld As String = e.OldValues("fldOnCallCellPhone")
Dim strfldOnCallCellPhoneNew As String = e.OldValues("fldOnCallCellPhone")
Dim fldOCPreferredContactOld As String = e.OldValues("fldOCPreferredContact")
Dim fldOCPreferredContactNew As String = e.OldValues("fldOCPreferredContact")
gvOnCall_Updated(keyValue, strfldOnCallGroupNew, strfldStartOnCallNew, strfldEndOnCallNew, strfldRankNew,
strfldEmpNameNew, _
strfldEmpWorkPhoneNew, strfldEmpHomePhoneNew, strfldEmpHomeCellPhoneNew, strfldEmpAltPhoneNew,
strfldOnCallCellPhoneNew, fldOCPreferredContactNew)
End Sub
Protected Sub gvOnCall_Updated(ByVal fldOCID As Integer, ByVal fldOnCallGroup As String, ByVal fldStartOnCall As
String, ByVal fldEndOnCall As String, _
ByVal fldRank As Integer, ByVal fldEmpName As String, ByVal fldEmpWorkPhone As String,
ByVal fldEmpHomePhone As String, _
ByVal fldEmpHomeCellPhone As String, ByVal fldEmpAltPhone As String, ByVal fldOnCallCellPhone As String,
ByVal fldOCPreferredContact As String)
Dim sqlConn As New SqlConnection(ConfigurationManager.ConnectionStrings
("DiscussSQLConnectionString").ConnectionString)
Dim sSql As XElement
sSql = <sql>
Update [tblOncall] SET [fldOnCallGroup] = '<%= fldOnCallGroup %>',
[fldStartOnCall] = '<%= [fldStartOnCall] %>',[fldEndOnCall] = '<%= [fldEndOnCall] %>',
[fldRank] = '<%= [fldRank] %>', [fldEmpName] = '<%= [fldEmpName] %>', [fldEmpWorkPhone] = '<%= [fldEmpWorkPhone] %>',
[fldEmpHomePhone] = '<%= [fldEmpHomePhone] %>', [fldEmpHomeCellPhone] = '<%= [fldEmpHomeCellPhone] %>',
[fldEmpAltPhone] = '<%= [fldEmpAltPhone] %>', [fldOCPreferredContact] = '<%= [fldOCPreferredContact] %>'
Where [fldOCID] = '<%= [fldOCID] %>' </sql>
'MsgBox(Err.Description, MsgBoxStyle.Critical, "SQL Error")
SendSQLCommand(sSql.Value, sqlConn)
sqlConn.Close()
End Sub
Protected Sub gvOnCallSchedule_RowCommand(ByVal sender As Object, ByVal e As
System.Web.UI.WebControls.CommandEventArgs) Handles gvOnCallSchedule.RowCommand
If e.CommandName = "Insert" AndAlso Page.IsValid Then
Try
dsOncallGroup.Insert()
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Critical, "SQL Error")
'MsgBox("An error occured. Please ensure all required fields are entered and that the Application you
are trying to add doesn't already exist.", MsgBoxStyle.Critical, "Database Error")
Response.Redirect("Default.aspx")
End Try
Response.Redirect("Default.aspx")
End If
If e.CommandName = "Delete" Then
Try
dsOncallGroup.Delete()
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Critical, "SQL Error")
'MsgBox("Application Deleted Successfully")
End Try
Response.Redirect("Default.aspx")
End If
End Sub
Protected Sub dsOnCallGroup_Inserting(ByVal sender As Object, ByVal e As SqlDataSourceCommandEventArgs) Handles
dsOncallGroup.Inserting
Dim strddlGroupName As New DropDownList
Dim txtStartOnCall As New TextBox
Dim txtEndOnCall As New TextBox
Dim txtRank As New TextBox
Dim strddlEmpName As New DropDownList
Dim txtEmpWorkPhone As New TextBox
Dim txtEmpHomePhone As New TextBox
Dim txtEmpHomeCellPhone As New TextBox
Dim txtEmpAltPhone As New TextBox
Dim txtOCPreferredContact As New TextBox
strddlGroupName = CType(gvOnCallSchedule.FooterRow.FindControl("ftrddlOCGroup"), DropDownList)
txtStartOnCall = CType(gvOnCallSchedule.FooterRow.FindControl("txtStartOnCallFtr"), TextBox)
txtEndOnCall = CType(gvOnCallSchedule.FooterRow.FindControl("txtEndOnCallFtr"), TextBox)
txtRank = CType(gvOnCallSchedule.FooterRow.FindControl("txtCallOrderFtr"), TextBox)
strddlEmpName = CType(gvOnCallSchedule.FooterRow.FindControl("ddlAnalystFtr"), DropDownList)
txtEmpWorkPhone = CType(gvOnCallSchedule.FooterRow.FindControl("txtWorkPhoneFtr"), TextBox)
txtEmpHomePhone = CType(gvOnCallSchedule.FooterRow.FindControl("txtHomePhoneFtr"), TextBox)
txtEmpHomeCellPhone = CType(gvOnCallSchedule.FooterRow.FindControl("txtHomeCellPhoneFtr"), TextBox)
txtEmpAltPhone = CType(gvOnCallSchedule.FooterRow.FindControl("txtAltPhoneFtr"), TextBox)
txtOCPreferredContact = CType(gvOnCallSchedule.FooterRow.FindControl("txtOCPreferredContactFtr"), TextBox)
e.Command.Parameters("@fldOnCallGroup").Value = strddlGroupName.Text
e.Command.Parameters("@fldStartOnCall").Value = txtStartOnCall.Text
e.Command.Parameters("@fldEndOnCall").Value = txtEndOnCall.Text
e.Command.Parameters("@fldRank").Value = txtRank.Text
e.Command.Parameters("@fldEmpName").Value = strddlEmpName.Text
e.Command.Parameters("@fldEmpWorkPhone").Value = txtEmpWorkPhone.Text
e.Command.Parameters("@fldEmpHomePhone").Value = txtEmpHomePhone.Text
e.Command.Parameters("@fldEmpHomeCellPhone").Value = txtEmpHomeCellPhone.Text
e.Command.Parameters("@fldEmpAltPhone").Value = txtEmpAltPhone.Text
e.Command.Parameters("@fldOCPreferredContact").Value = txtOCPreferredContact.Text
'MsgBox(strddlGroup.Text, MsgBoxStyle.Information)
End Sub
End Class
答案 0 :(得分：1)
您需要设置
ConflictDetection="OverwriteChanges"
在你的
中<asp:SqlDataSource ID="dsOncallGroup" runat="server"