ارجو لمساعدة قمت بعمل داتا بيز اوراكل على وندوز سيرفر 2008 وحبيت ان اقوم بالاضافة ولحذف من الكرد فيو لمشروع كلة ماشي والحمدالله الا دالت الانسرت ماتعمل وهذا كود لصفحة واسفل كود الصفحة كود الانسيرت المشكلة التي تواجهني عندما اقوم بالتنفيذ لا تضهر اي مشكلة وتضهر لداتا واقوم بالتحديث طبيعي وعندما اقوم باضافت لبيانات اضغط زر الانسيرت لا تضاف البيانات
<asp:GridView ID="Test" runat="server" AutoGenerateColumns="False"
DataKeyNames="ID" DataSourceID="SqlDataSource1" ShowFooter="True"
BackColor="White" BorderColor="#CC9966" BorderStyle="None" BorderWidth="1px"
CellPadding="4">
<FooterStyle BackColor="#FFFFCC" ForeColor="#330099" />
<RowStyle BackColor="White" ForeColor="#330099" />
<Columns>
<asp:TemplateField ShowHeader="False">
<EditItemTemplate>
<asp:LinkButton ID="LinkButton1" runat="server" CausesValidation="True"
CommandName="Update" Text="Update"></asp:LinkButton>
<asp:LinkButton ID="LinkButton2" runat="server" CausesValidation="False"
CommandName="Cancel" Text="Cancel"></asp:LinkButton>
</EditItemTemplate>
<footerTemplate>
<asp:Button ID="Insertnew" runat="server" CausesValidation="True"
CommandName="Insert" Text="Insert"></asp:Button>
<asp:LinkButton ID="LinkButton2" runat="server" CausesValidation="False"
CommandName="Cancel" Text="Cancel"></asp:LinkButton>
</footerTemplate>
<ItemTemplate>
<asp:LinkButton ID="LinkButton1" runat="server" CausesValidation="False"
CommandName="Edit" Text="Edit"></asp:LinkButton>
<asp:LinkButton ID="LinkButton2" runat="server" CausesValidation="False"
CommandName="Select" Text="Select"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="ID" SortExpression="ID">
<EditItemTemplate>
<asp:Label ID="Label1" runat="server" Text='<%# Eval("ID") %>'></asp:Label>
</EditItemTemplate>
<footerTemplate>
<asp:Label ID="Insertid" runat="server" Text='<%# Eval("ID") %>'></asp:Label>
</footerTemplate>
<ItemTemplate>
<asp:Label ID="Label1" runat="server" Text='<%# Bind("ID") %>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="NAME" SortExpression="NAME">
<EditItemTemplate>
<asp:TextBox ID="Editname" runat="server" Text='<%# Bind("NAME") %>'></asp:TextBox>
</EditItemTemplate>
<footerTemplate>
<asp:TextBox ID="Insertname" runat="server" Text='<%# Bind("NAME") %>'></asp:TextBox>
</footerTemplate>
<ItemTemplate>
<asp:Label ID="Label2" runat="server" Text='<%# Bind("NAME") %>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="JOB" SortExpression="JOB">
<EditItemTemplate>
<asp:TextBox ID="Editjob" runat="server" Text='<%# Bind("JOB") %>'></asp:TextBox>
</EditItemTemplate>
<footerTemplate>
<asp:TextBox ID="Insertjob" runat="server" Text='<%# Bind("JOB") %>'></asp:TextBox>
</footerTemplate>
<ItemTemplate>
<asp:Label ID="Label3" runat="server" Text='<%# Bind("JOB") %>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<PagerStyle BackColor="#FFFFCC" ForeColor="#330099" HorizontalAlign="Center" />
<EmptyDataTemplate>
NAME:<asp:TextBox ID="nodataname" runat="server" />
JOB :<asp:TextBox ID="nodatajob" runat="server" />
<asp:LinkButton ID= "nodataInsert" runat="server" CommandName="nodataInsert" Text="Insert" />
</EmptyDataTemplate>
<SelectedRowStyle BackColor="#FFCC66" Font-Bold="True" ForeColor="#663399" />
<HeaderStyle BackColor="#990000" Font-Bold="True" ForeColor="#FFFFCC" />
</asp:GridView>
وهذا كود الانسرت بلغة فيشول بسيك دوت نت
Imports System.Data.OracleClient
Imports System
Imports System.Data
Imports System.Web
Imports System.Web.UI
Imports System.Configuration
Imports System.Linq
Imports System.Web.Security
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Partial Class _Default
Inherits System.Web.UI.Page
Private insertParameter As New List(Of OracleParameter)
Protected Sub Test_RowCommand(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCommandEventArgs) Handles Test.RowCommand
If e.CommandName = "NoDataInsert" Then
Dim name As TextBox = CType(Test.Controls(0).Controls(0).FindControl("nodataname"), TextBox)
Dim job As TextBox = CType(Test.Controls(0).Controls(0).FindControl("nodatajob"), TextBox)
Dim fname As New OracleParameter("name", OracleType.VarChar, 10)
fname.Direction = ParameterDirection.Input
fname.Value = name.Text
insertParameter.Add(fname)
Dim fjob As New OracleParameter("job", OracleType.VarChar, 10)
fjob.Direction = ParameterDirection.Input
fjob.Value = job.Text
insertParameter.Add(fjob)
SqlDataSource1.Insert()
ElseIf e.CommandName = "Insertnew" Then
Dim name As TextBox = CType(Test.FooterRow.FindControl("Insertname"), TextBox)
Dim job As TextBox = CType(Test.FooterRow.FindControl("Insertjob"), TextBox)
Dim fname As New OracleParameter("@name", OracleType.VarChar, 10)
fname.Direction = ParameterDirection.Input
fname.Value = name.Text
insertParameter.Add(fname)
Dim fjob As New OracleParameter("@job", OracleType.VarChar, 10)
fjob.Direction = ParameterDirection.Input
fjob.Value = job.Text
insertParameter.Add(fjob)
SqlDataSource1.Insert()
End If
End Sub
Protected Sub SqlDataSource1_Inserting1(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.SqlDataSourceCommandEventArgs) Handles SqlDataSource1.Inserting
e.Command.Parameters.Clear()
For Each p As OracleParameter In insertParameter
e.Command.Parameters.Add(p)
Next
End Sub
End Class
ارجو المساعدة اخوان
