منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طريقة حفظ الصور في مجلد البرنامج
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
تقبل الله منا ومنكم وغفر لنا ولكم
لا نزال نتعلم من هذا المنتدى الرائع والذي أكسبنا الكثير من المعلومات المفيدة
وسؤالي هنا :
هل يمكن حفظ الصور في مجلد البرنامج وذلك بملف  Picture
بدل قاعدة البنانات لأنها تأخذ حيزاً كبيراً .
المثال في المرفقات للتطبيق
شاكرً لكم حسن اهتمامكم الكبير بالإجابة عن استفسارات الأعضاء الكرام
لتحميل المثال اضغط هنا
لله درُك ودر ُّأبيك أخي الحبيب ومشرفنا الغالي أمير على تكرمك بالإجابة
وأسال الله العظيم ربَّ العرش العظيم أن يجعله في ميزان حسناتك
عفواً ... أستاذتي أمير
بقى شئٌ آخر وهو :
هل تتكرم بالتعديل على كود عرض التقرير بحيث يتم عرض الصورة الشخصية
فقد حاولتُ التعديل عليه وفشلت

كود :
Dim X As String
X = txtID.Text

Unload Report2
         
Report2.DataControl1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
App.Path & "\Data_Base.mdb;Persist Security Info=False"

If RS.RecordCount <= 0 Then
  MsgBox "لايوجد سجل ", vbCritical + vbMsgBoxRight + vbMsgBoxRtlReading, "تنبيه"
 
  txtIDI.SetFocus
  Exit Sub
End If

Report2.DataControl1.Source = "Select * From [Q_Tech_Table] Where [ID] like '" & X & "'"

Report2.Show

Command7.Enabled = False
أحسن الله إليك وبارك الله فيك وجعل أعمالك في ميزان حسناتك يوم القيامة
واحياك الله حياة طيبة سعيدة هنية
ماشاء الله أكثر من رائع
جزاكم الله الف خير
وجعله في ميزان حسناتكم