تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[Acces2010] ارجوكم ما هو الخطا فى الكود ؟
#1
عند التشغيل لا تظهر رسائل خطأ
ويتم تنفيذ الكود بنجاح 
ولكن لا يتم اضافة البيانات فى الجدول فى قاعدة البيانات 
هذا هو الكود
Dim conn As New OleDbConnection

    Private Sub frmdoctors_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Reservation.accdb"
    End Sub

    Private Sub btnadd_Click(sender As Object, e As EventArgs) Handles btnadd.Click

        Try

            Dim cmdinsert As New OleDb.OleDbCommand
            cmdinsert.Connection = conn
            cmdinsert.CommandType = CommandType.Text
            cmdinsert.CommandText = "INSERT INTO  tbl_doc
                 (DOC_Name,DOC_PHONE,DOC_specialist,COUNT_P,DAYS_WORK,TIME_WORK)
                 values
                 ( '" & txtname.Text & "','" & txtphone.Text & "','" & cmpspec.Text & "',
                   '" & txtpcount.Text & "','" & cmpdays.Text & "','" & dtp.Value & "')"

            MsgBox(conn.State)
            conn.Open()
            MsgBox(conn.State)
            cmdinsert.ExecuteNonQuery()
            MsgBox("تمت الاضافه بنجاح")

        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            conn.Close()
        End Try

    End Sub
End Clas
الرد
تم الشكر بواسطة:
#2
اقترح عليك تعدل جملة الاتصال من 

كود :
        conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Reservation.accdb"

الى


استبدل الكلمة |DataDirectory| باسم المسار الذي توجد فيه قاعدة البيانات التي تريد استخدامها
كود :
      "conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\myapp\Reservation.accdb

لانه عند انشاء اتصال بقاعدة البيانات عن طريق معالج فيجوال بيسك فسوف تضهر لك هذي الرسالة

   

وهي تعني بانك انشئت اتصال مع قاعدة بيانات محلية والتي ليست موجودة داخل مجلد مشروعك
لذا فانه يقترح بان ينسخ ملف قاعدة البيانات الى مشروعك ثم يعدل جملة الاتصال

ونتيجة هذا انك في كل مرة تشغل برنامجك سيننسخ ملف قاعدة البيانات من مجلد مشروعك الى مجلد الاخراج 
ولهذا فانك لن تستطيع حفظ او تعديل البيانات 

هذا هو الخطا اللي كنت اخطيه انا الين فهمت لكن قد لايكون هو الحل لما تريد

الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  حل ارجوكم عاوز اربط ال SQL Server بالانترنت Hosam Ashraf Elwakel 0 205 17-09-20, 03:05 PM
آخر رد: Hosam Ashraf Elwakel
  انشاء قاعدة بيانات SQL مع الجداول بواسط الكود aiman 1 2,619 26-12-19, 03:30 PM
آخر رد: osamaalymaghraby
  [SQL] هل ممكن المساعده في هذا الكود php mysql fadisat 0 576 07-08-19, 11:30 PM
آخر رد: fadisat
  أضافة زر إلى الفورم بواسطة الكود djelloul 1 777 02-05-19, 01:55 PM
آخر رد: PalmTree
  [سؤال] ما هو الخطأ فى هذا الكود احمد عبد الحكيم 1 957 07-07-17, 01:12 AM
آخر رد: silverlight
  طلب مساعدة لكتابة الكود بشكل صحيح moftah70 1 1,299 12-07-16, 07:52 PM
آخر رد: aliday03
  [سؤال] كيف افتح الاتصال باستخدام هذا الكود سعود 2 1,522 12-07-16, 06:23 PM
آخر رد: aliday03
  اريد استبدال الكود المرفق بكود ابسط على ان يعطي نفس النتيجة ledoledo 1 1,195 02-02-16, 07:07 PM
آخر رد: ledoledo
  [VB.NET] عرض الكود بار djelloul 2 1,175 15-01-16, 11:39 PM
آخر رد: djelloul
  [سؤال] طريقة الاتصال بقاعدة البيانات هل يمكن تعديل الكود elhon.tec 3 2,565 27-05-15, 02:53 AM
آخر رد: mbk2006

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم