الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ارجو الافادة - عدم تخزين قاعدة البيانات الأصلية للبيانات المعدلة في visualbasic 2008

بدأه شحاتة وافي في 7 يناير 2014 · 4 رد · 913 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

- عدم تخزين قاعدة البيانات الأصلية للبيانات المعدلة في visualbasic 2008

 

قمت بانشاء قاعدة بيانات باستخدام access 2010   وقمت بعمل برنامج باستخدام ال Visual basic .net 2008  وبعد اضافة Data grade view  وربطها واضافة الازرار ، يتم عرض قاعدة البيانات بالشكل الصحيح 

ولكن

كل تعديل يحدث في الفورم أو في ال DATAGRADEVIEW   لا يتم تطبيقة على قاعدة البيانات الأصلية 

ارجو الافادة 

وجزاكم الله خيرا

#2

الموضوع مكرر ابحث عنه في المنتدي

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

اعتقد ان اخي حسام السامي اجاب هذا السوال من قبل

سبحانه الله وبحمده سبحانه الله العظيم

 
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");
 
Make it run, make it right, make it fast, make it small

normalize your data and don't make it look like excel sheet
 
الأبداع في الرأس والعلم في الكراس
روابط مفيدة
[دروس] تجاهل الwhere
طريقة الاضافة للجدولين مرتبطين مرة واحدة
قراءة صوره من مسار
حل مشكلة الارقام العربي في الكريستال ريبورت
حل مشكلة تصدير OLE Object الي Physical File مرة أخري
كود عمل نسخة يومية من قاعدة البيانات بتاريخ مع حذف النسخة السابقة من 30 يوم مضي
معظم دوال التعامل مع string
Change Data Capture
SQL Course
string-format-datetime
LINQ to SQL in C#
Sum-of-previous-row-values-in-SqlServer
alarm-for-stop-agent-service
SQL Server CTE
#3

مشكله صلاحيات للداتا بيز اكسس  اعط صلاحيات كاملة  لقاعدة البيانات   قراءة-كتابه- تعديل- حذف

تم تعديل هذه المشاركة بواسطة NaSeR33 في 8 يناير 2014 في 12:39

#4

كيف يمكنني اعطاء صلاحيات كاملة للداتا بيز اكسس ( اضافة - حذف - تعديل - قراءة )

#5

بعد تجربة البرنامج اتضح لي ان الخطأ كان في جملة الاستعلام insert into

فعند الوقوف على كلمة insert لمعرفة الخطأ بها تظهر الرسالة :

name " INSERT" is not declared

 

وبالنسبة لباقي جملة الاستعلام تكون رسالة الخطأ هي :

end of statment expected

 

فهل يلزم تعريف جملة insert وباقي جمل الاستعلام ( update - delete )

أم اني أخطأت في ماذا

مع العلم بأن الاتصال بقاعدة البيانات سليم وتم تجربته .

 

واليكم الكود للمساعدة في حل المشكلة :

 

 

        Dim x As String
 
        Dim SavInto As New OleDbCommand
        Dim ConStr As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\mydata.accdb"
        Dim Conn As New OleDbConnection(ConStr)
        Conn.Open()
        SavInto.Connection = Conn
        SavInto.CommandType = CommandType.Text
        x =INSERT INTO students(stud_name1 ,stud_father ,stud_Gfather ,stud_family ,stud_BOD ,noor ,melad_paper ,tatiem_paper ,family_card ,photoes ,money ,brothers ,father_jawal ,teacher_name ,stud_ID)" & " values ('" & (TextBox1.Text) & "','" & (TextBox2.Text) & "','" & (TextBox3.Text) & "','" & (TextBox4.Text) & "','" & (DateTimePicker1.Value) & "','" & (CheckBox7.CheckState) & "','" & (CheckBox3.CheckState) & "','" & (CheckBox4.CheckState) & "','" & (CheckBox5.CheckState) & "','" & (CheckBox6.CheckState) & "','" & (TextBox6.Text) & "','" & (NumericUpDown1.Value) & "','" & (TextBox7.Text) & "','" & (ListBox1.ValueMember) & "','" & (TextBox8.Text) & "') 
        SavInto.CommandText = x
        SavInto.ExecuteNonQuery()
        Conn.Close()
        MsgBox("تمت عملية الاضافة والحفظ في قاعدة لبيانات بنجاح")
        Me.Close()
        frm1.Show()
 
        Exit Sub

 

 

 

 

:rolleyes:  :rolleyes:  :rolleyes:  :rolleyes:  :rolleyes:

تم تعديل هذه المشاركة بواسطة شحاتة وافي في 29 يناير 2014 في 09:55

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…