تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مطلوب التعديل على نموذج البحث
#18
(29-06-18, 11:53 PM)elgokr كتب :
(29-06-18, 11:48 PM)ZaerAllail كتب :
(29-06-18, 11:43 PM)elgokr كتب :
(29-06-18, 09:46 PM)ZaerAllail كتب : أخي الفاضل فيه ملاحظه الأن لاحظتها في النموذج بعد تعديلك عليه ويبدوا إنك ما ما اخذت بالك منها لأنه نقاشنا كان عن أمر مختلف 
النموذج يعطيك خيار إضافة صورة لحفظها ولكن المشكله هي إذا ما رفعت صورة أو لا يوجد صورة عند الحفظ تواجه برسالة خطأ تجعل حفظ الصورة إلزامي !
جرب الحفظ ورح تكتشف هالرساله !

كيف يتم حلها برايك ؟


لحل تلك لامشكلة
كل ما عليك فعله التالى

تعال عند السطر الخاص بـ
PHP كود :
Line1
اعلى هذا السطر 
كود :
Dim ms As New MemoryStream
قم باضافة الكود التالى
كود :
       If PictureBox1.Image Is Nothing Then
           PictureBox1.Image = Image.FromFile(Application.StartupPath & "\img\non.png")
       End If
وكل ما عليك تحميل ما فى المرفق واجعل المجلد والصورة بجانب قاعدة البيانات

وبكده عند اضافة مستخدم جديد ولم يقوم بتحديد صورة
سيقوم البرنامج تلقائي بجعل الصورة الافتراضية وهى خلفية فارغة بيضاء صورة له

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

ملحوظة
يوجد سطر التحقق من اسم المستخدم عند الاضافة الكود عبارة عن
كود :
da = New OleDbDataAdapter("select * From MovTable where NameOfMov = '" & TextBox1.Text & "'", con)
طبعاً تاكد من تعديل اسم الجدول واسم الحقل الخاص بالاسم

تحياتى لك
وتمنياتى لك التوفيق

كل التقدير لك يا غالي كلامك جميل وهالطريقة أعرفها مسبقاً بس كنت أتوقع إنه فيه حل يعطيني الحرية في عدم حفظ صورة تماما مثل التكست إذا رغبت كتابته وحفظه من عدمه !!

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


يوجد حل اخر


وهو عمل كود التحقق عبارة عن
كود :
If PictureBox1.Image Is Nothing Then

اذا التحقق ايجابى يكون كود الاضافة عبارة عن
كود :
Dim cmd As New OleDbCommand("insert into NewTable (id,Fname,Fnation,Fdate) values (@id,@Fname,@Fnation,@Fdate)", con)

واذا كان التحقق سلبى يكون كود الاضافة
كود :
Dim cmd As New OleDbCommand("insert into NewTable (id,Fname,Fnation,Fdate,Fpic) values (@id,@Fname,@Fnation,@Fdate,@Fpic)", con)

وطبعاً يجب ان تجعل الحقل فى قاعدة البيانات غير مجبر على ادخال البيانات

تحياتى لك
وتمنياتى لك التوفيق

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

بس أكيد في طريقة تجعلنا نتجاوز هالخطأ بدون تكرار الكود أو تحميل صوره وهميه تمام مثل إلي يحصل معاك إذا تم الحفظ وتركت تكست بوكس أو إثنين فاضية بدون محتوى !

هذا ما أبحث عنه 

الله يبارك فيك أخي الكريم ويزيدك علم وفضل  

تحياتي لك !
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: مطلوب التعديل على نموذج البحث - بواسطة ZaerAllail - 29-06-18, 11:57 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [كود] مطلوب إضافة حقل بجدول بعد التأكد من عدم وجوده AmeenRashed 6 187 18-05-24, 02:35 AM
آخر رد: justforit
  التعديل على كود حفظ الصورة في مجلد من picturebox صالح عبدالله 3 135 14-05-24, 10:47 PM
آخر رد: أبو خالد الشكري
  أريد البحث بإستخدام أي جزء من الكلمة و ليس أول جزء منها . CoderMM 3 173 17-04-24, 01:19 AM
آخر رد: Taha Okla
  ارجو التعديل على الدالة المرفقة - الدالة تعيد الرقم -1 new_programer 4 170 20-03-24, 01:18 PM
آخر رد: تركي الحلواني
  [VB.NET] البحث باستخدام CheckedListBox لتكون نتيجة التحديد شرط لجملة الاستعلام ahmedramzyaish 0 161 19-02-24, 03:44 AM
آخر رد: ahmedramzyaish
  البحث بالهوية annagui 2 351 25-01-24, 01:00 PM
آخر رد: annagui
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 677 18-01-24, 11:40 PM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 318 18-01-24, 05:04 PM
آخر رد: loay775
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 279 13-01-24, 06:42 PM
آخر رد: melad2002
  مطلوب شرح لتقارير DevExpress بلغة vb.net Adel27213 3 423 03-01-24, 12:23 AM
آخر رد: عبد العزيز البسكري

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


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