ادخال سجل جديد بقاعدة البيانات بواسطة ASP.NET

<WebMethod()> Public Function Add_New_Rec(ByVal sdata As String)
        Dim Conn As New OleDbConnection
        Dim cAddNew As OleDbCommand = New OleDbCommand

        Conn.ConnectionString = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=C:\REPORTS.mdb"
        cAddNew.Connection = Conn

        cAddNew.CommandText = "insert into W_Report(A2) values(@sdata) "

        cAddNew.CommandType = CommandType.Text
        cAddNew.Parameters.Add("@sdata",sdata)
        cAddNew.ExecuteNonQuery()

        cAddNew = Nothing
        Conn.Close()
        Conn = Nothing

    End Function

جرب هذا

شكر اخي ابو انس على مرورك بموضوعي وبصراحه جربت الله يعطيك العافيه الكود الذي وضعت وظهر عندي الخطأ التالي:-

System.InvalidOperationException: ExecuteNonQuery requires an open and available Connection. The connection's current state is Closed.
   at System.Data.OleDb.OleDbConnection.SetStateExecuting(OleDbCommand attempt, String method, Boolean flag)
   at System.Data.OleDb.OleDbCommand.ValidateConnectionAndTransaction(String method, Int32& localState)
   at System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   at System.Data.OleDb.OleDbCommand.ExecuteNonQuery()
   at sss.DataService.Add_New_Rec(String sdata) in c:\inetpub\wwwroot\sss\Service1.asmx.vb:line 83

اقرأ الخطأ لترى أنك لم تفتح الإتصال قبل الإجراء؟!

ضع السطر التالي قبل cAddNew.ExecuteNonQuery()

Conn.open

بالتوفيق

اخي smiling4ever وضعت التالي :

<WebMethod()> Public Function Add_New_Rec(ByVal sdata As String)
        Dim Conn As New OleDbConnection
        Dim cAddNew As OleDbCommand = New OleDbCommand

        Conn.ConnectionString = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=C:\REPORTS.mdb"
        cAddNew.Connection = Conn

        cAddNew.CommandText = "insert into W_Report(A2) values(@sdata) "

        cAddNew.CommandType = CommandType.Text
        cAddNew.Parameters.Add("@sdata", sdata)

        Conn.Open()
        cAddNew.ExecuteNonQuery()

        cAddNew = Nothing
        Conn.Close()
        Conn = Nothing

    End Function

وظهر عندي الخطأ التالي :

System.Data.OleDb.OleDbException: Operation must use an updateable query.
   at System.Data.OleDb.OleDbCommand.ExecuteCommandTextErrorHandling(Int32 hr)
   at System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
   at System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
   at System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
   at System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   at System.Data.OleDb.OleDbCommand.ExecuteNonQuery()
   at sss.DataService.Add_New_Rec(String sdata) in c:\inetpub\wwwroot\sss\Service1.asmx.vb:line 84

^

الوووووووووووو .. هل من مجيب .... معقول مبرمجين ASP.NET ولا يوجد حل لارسال بيانات الى ملف قاعدة البيانات بواسطة صفحات ASP.NET

السلام عليكم ورحمة الله

بالنسبة للمشكلة الأخير فقد حصلت معي وهي تحصل فقط مع قاعدة بيانات اكسيس

حاول اخراج مجلد قاعدة البيانات خارج

wwwroot

وضع له صلاحية القراءة والكتابة

الله يعطيك العافيه ابو انس والله ملف قاعدة البيانات فعلا بالاكسس وموجود الملف على خارج الـ wwwroot على الـ C مباشرتاً مضبوط عليها صلاحيات القراءة والكتابة حتى المستخدم العادي له صلاحيات القراءة والكتابة

وانا صراحة لجأت لاكسس مؤقتا من باب التجربة فقط اما استخدامي الاساسي هو Oracle9i ولكن للاسف يحصل انني احصل على رسالة خطا تفيد بعدم القدرة على تحميل ملف DLL وسبق انني وضعت المشلكه بالمنتدى في قسم ASP.NET و Oracle ولم احصل على حل لها ...... ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ................

dim cn As OleDbConnection

cn = New OleDbConnection("Provider=Microsoft.jet.OLEDB.4.0;Data Source=C:\REPORTS.mdb")

Dim sql As String = "INSERT INTO mail_folder

(folder_name,folder_type) values('" & txtfoldername.Text & "',0 )"

Dim cm As New OleDbCommand(sql, cn)

cn.Open()

cm.ExecuteNonQuery()

cn.Close()

جرب هذه الطريقة و ان شاء الله باتضبط معاك، طبعا أسماء الحقول على حسب ما هو موجود معاك و ايضا القيم على حسب ما تريد انته

صراحة أخوي انا انتقلت الى استخدم

SQl Server

بسبب هذه المشكلة ولاحظ انى قلت لك جرب لأني لست متأكد

محاولة أخرى

غير نوع قاعدة البيانات الى أصدار قديم 2000 او 97 وجرب مرة أخرى

على العموم أنا لما حطيت قاعدة البيانات على الموقع وحطيت للمجلد صلاحية القراءة والكتابة مشى الحال

العقده كتب:

اخي smiling4ever وضعت التالي :

<WebMethod()> Public Function Add_New_Rec(ByVal sdata As String)
        Dim Conn As New OleDbConnection
        Dim cAddNew As OleDbCommand = New OleDbCommand

        Conn.ConnectionString = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=C:\REPORTS.mdb"
        cAddNew.Connection = Conn

        cAddNew.CommandText = "insert into W_Report(A2) values(@sdata) "

        cAddNew.CommandType = CommandType.Text
        cAddNew.Parameters.Add("@sdata", sdata)

        Conn.Open()
        cAddNew.ExecuteNonQuery()

        cAddNew = Nothing
        Conn.Close()
        Conn = Nothing

    End Function

وظهر عندي الخطأ التالي :

System.Data.OleDb.OleDbException: Operation must use an updateable query.
   at System.Data.OleDb.OleDbCommand.ExecuteCommandTextErrorHandling(Int32 hr)
   at System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
   at System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
   at System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
   at System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   at System.Data.OleDb.OleDbCommand.ExecuteNonQuery()
   at sss.DataService.Add_New_Rec(String sdata) in c:\inetpub\wwwroot\sss\Service1.asmx.vb:line 84

←

هذا الخطأ شائع وحله بسيط.

أعط المجلد الذي يحتوي على قاعدة البيانات في جهازك سماحية الكتابة والمستخدم ASPNET

ما هو الخطأ الذي يظهر في الكود الخاص فيك