[Tajaldeen]

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

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

والأمر الثاني هو رغبتي في عرض الصورة عند تحديد صف معين في قاعدة البيانات المعروضة اسوة ببقية البيانات التي يتم عرضها في اماكنها بمجرد تحديد الصف.

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

ولكم خالص التحية والشكر 

https://drive.google.com/file/d/1rxqeZ8YINTN8RGnymniFpUXPOlALGGzq/view?usp=share_link

[aljzazy]

تم عمل شاشة جديدة اسمها Form2
يوجد بها جميع المطلوب
قمت بالتعديل على قاعدة البيانات وجغلت اسماء الحقول بالانجليزي
ووضعت مفتاح رئيسي للجدول
المشروع بالمرفقات مع التعديل

[Tajaldeen]

(19-12-22, 09:11 PM)aljzazy كتب : تم عمل شاشة جديدة اسمها Form2
يوجد بها جميع المطلوب
قمت بالتعديل على قاعدة البيانات وجغلت اسماء الحقول بالانجليزي
ووضعت مفتاح رئيسي للجدول
المشروع بالمرفقات مع التعديل

جزاك الله خير الجزاء 
جعله الله في ميزان حسناتك ... احسنت بارك الله فيك

[أبو خالد الشكري]

مرحبا بالجميع
أنا عندي ملاحظتين

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

وشكرا لكم .

[Tajaldeen]

(21-12-22, 02:20 AM)أبو خالد الشكري كتب : مرحبا بالجميع
أنا عندي ملاحظتين

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

وشكرا لكم .

جزاك الله خير

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

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

https://drive.google.com/file/d/1sl5cWGdzaNXXlQ-Dv-5eMZFWDTcRBz2D/view?usp=share_link

رسائل الخطأ 

[b] https://ibb.co/brL1Hbx[/b]

الرسالة الثانية 

https://ibb.co/KD7kDM3

---

(20-12-22, 07:39 AM)Tajaldeen كتب :

(19-12-22, 09:11 PM)aljzazy كتب : تم عمل شاشة جديدة اسمها Form2
يوجد بها جميع المطلوب
قمت بالتعديل على قاعدة البيانات وجغلت اسماء الحقول بالانجليزي
ووضعت مفتاح رئيسي للجدول
المشروع بالمرفقات مع التعديل

جزاك الله خير الجزاء
جعله الله في ميزان حسناتك ... احسنت بارك الله فيك

هناك خطأ يظهر عند تعديل الصورة لا ادري ما سببه هل لديك اخي الكريم أي فكرة عنه ، وتفضل هذا رابط البرنامج النسخة الاخيرة بعد إجرا كافة التعديلات عليه بمساعدة كريمة منك 

https://drive.google.com/file/d/1sl5cWGdzaNXXlQ-Dv-5eMZFWDTcRBz2D/view?usp=share_link

[أبووسم]

ضع الكود التالي في الفورم

كود :

Public Sub ChoosePicture(Pbox As PictureBox)
Dim a As New OpenFileDialog
With a
.AddExtension = True
.CheckPathExists = True
.CheckFileExists = True
.Title = "Choose Image"
.Filter = "Choose Image (*.PNG; *.JPG; *.GIF; *.JPEG)| *.PNG; *.JPG; *.GIF; *.JPEG | All Files (*.*)|*.*"
If .ShowDialog = DialogResult.OK Then
PBox.Image = Image.FromFile(.FileName)
End If
End With
End Sub

ثم احذف الكود الموجود في زر استعراض وضع التالي

كود :

ChoosePicture(Pic)

[Tajaldeen]

(24-12-22, 06:06 PM)أبووسم كتب :

ضع الكود التالي في الفورم

جزاك الله خير اخي ابو وسيم .... ولكن ما زال الخطأ التالي يظهر في الكود الخاص بزر التعديل 

كود :

Public Sub ChoosePicture(Pbox As PictureBox)
Dim a As New OpenFileDialog
With a
.AddExtension = True
.CheckPathExists = True
.CheckFileExists = True
.Title = "Choose Image"
.Filter = "Choose Image (*.PNG; *.JPG; *.GIF; *.JPEG)| *.PNG; *.JPG; *.GIF; *.JPEG | All Files (*.*)|*.*"
If .ShowDialog = DialogResult.OK Then
PBox.Image = Image.FromFile(.FileName)
End If
End With
End Sub

ثم احذف الكود الموجود في زر استعراض وضع  التالي

كود :

ChoosePicture(Pic)