منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
رسالة خطأ عند حفظ صورة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : رسالة خطأ عند حفظ صورة (/showthread.php?tid=12226)



رسالة خطأ عند حفظ صورة - مصطفى_ظيمة - 05-05-15

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

اعمل على حفظ بيانات فى جدولين
وفى أحد الجدولين يتم حفظ عدة صور

تم الربط بين الجدولين بواسطة الكود ويعمل تمام الحمد لله

عند محاولة حفظ الصورة يظهر هذا الخطأ ولا أعرف سببه

أعمل على vb 2010
قاعد البيانات Access 2003

الخطأ كما فى الصورة






اتمنى ان اجد الحل لدى خبراء وأعضاء المنتدى
ولكم جزيل الشكر مقدما ولكل من يتفضل بمساعدتى



RE: رسالة خطأ عند حفظ صورة - سعود - 05-05-15

وعليكم السلام ورحمة الله وبركاته
كيف عبات الداتاست؟
اكتب جملة الاستعلام لعل الخطا فيها او لعل الحل بطريقة اخرى.


RE: رسالة خطأ عند حفظ صورة - مصطفى_ظيمة - 05-05-15

(05-05-15, 05:50 AM)سعود كتب : وعليكم السلام ورحمة الله وبركاته
كيف عبات الداتاست؟
اكتب جملة الاستعلام لعل الخطا فيها او لعل الحل بطريقة اخرى.
تفضل يا أخى

كود :
Dim cmd As OleDbCommand = New OleDbCommand("SELECT Tab.id,Tab.name,Tab.phone,Tab.datee,Tab1.idnam,Tab1.pic  from Tab,Tab1 where Tab.id=Tab1.id", con)



RE: رسالة خطأ عند حفظ صورة - سعود - 05-05-15

اكيد بس هذا الكود؟؟
اذا نعم فهذا السبب لانه لم تتم تعبئة الداتاست dataset1 بعد!!!
ام انك اسندت  selectcommand هذا  لمكيف البيانات؟

شوف الموضوع هذا
https://msdn.microsoft.com/en-us/library/4esb49b4.aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1


RE: رسالة خطأ عند حفظ صورة - مصطفى_ظيمة - 05-05-15

(05-05-15, 07:28 PM)سعود كتب : اكيد بس هذا الكود؟؟
اذا نعم فهذا السبب لانه لم تتم تعبئة الداتاست dataset1 بعد!!!
ام انك اسندت  selectcommand هذا  لمكيف البيانات؟




شوف الموضوع هذا
https://msdn.microsoft.com/en-us/library/4esb49b4.aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1

الحقيقة أخى لم افهم شئ من الرابط

فعلا الجدول Tab1 فارغ من السجلات

هذا كود الاتصال بقاعدة البيانات



كود :
Dim con As New OleDb.OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Application.StartupPath & "\data.mdb;user id=admin;jet oledb:database password=12345")


هذا باقى الكود لملء الـ Dataset1



كود :
'Dim cmd As OleDbCommand = New OleDbCommand( "Select * From Tab Inner Join Tab1 On Tab1.id = Tab.id Where Tab.id = 1",con)
       Dim cmd As OleDbCommand = New OleDbCommand("SELECT Tab.id,Tab.name,Tab.phone,Tab.datee,Tab1.idnam,Tab1.pic  from Tab,Tab1 where Tab.id = Tab1.idnam", con)
       'Dim cmd As OleDbCommand = New OleDbCommand("SELECT id,name,phone,datee  from Tab order by ID ", con)
       DataAdapter = New OleDbDataAdapter(cmd)
       Dim builder As OleDbCommandBuilder = New OleDbCommandBuilder(DataAdapter)

       con.Open()
       DataSet1 = New DataSet

       DataAdapter.Fill(DataSet1, "Tab")

       con.Close()



       Label1.DataBindings.Add("Text", DataSet1, "Tab.id")
       TextBox1.DataBindings.Add("text", DataSet1, "Tab.name")
       TextBox2.DataBindings.Add("text", DataSet1, "Tab.phone", 2, 2)
       TextBox3.DataBindings.Add("text", DataSet1, "Tab.datee", 2, 2)


وممكن ابعتلك مثال لو تحب



RE: رسالة خطأ عند حفظ صورة - سعود - 05-05-15

اخي الكريم مشكلة تحديث جدولين مترابطين لم افهم له حل والرابط اللي كتبته حاولت اطبق فيه وماعرفت  افهم فيه شيSad
قلت لعل احد يفيدنا.

اذا لم تجد حل مارايك تشوف الموضوع هنا
http://vb4arb.com/vb/Thread-%D9%85%D8%B4%D9%83%D9%84%D8%A9-%D8%AD%D9%81%D8%B8-%D8%AA%D8%B9%D8%AF%D9%8A%D9%84%D8%A7%D8%AA-%D8%A7%D9%84%D8%AF%D8%A7%D8%AA%D8%A7%D9%82%D8%B1%D9%8A%D8%AF
وهي مجرد حيلة قد لا تنفعSad


RE: رسالة خطأ عند حفظ صورة - مصطفى_ظيمة - 05-05-15

هاجرب اللى فى الرابط وارد عليك
شكرا اخى سعود
تعبتك معايا


RE: رسالة خطأ عند حفظ صورة - مصطفى_ظيمة - 02-06-15

تم حل المشكلة وجزاكم الله خيرا