طلب مساعدة

[The best]

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

أولا : فى نموذج Frm_Data فى البيانات الوظيفية كنت محتاج لما اختار حقل ( نوع المرحلة ) على سبيل المثال ابتدائى

واختار حقل ( جهة العمل ) يجيب المدارس الابتدائية فقط وهكذا مع بقية المراحل

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

وده بيحصل مشكلة فى التقرير عند الطباعة 

HR_EDARA.rar

تم تعديل منذ 23 ساعات بواسطه The best

[Foksh]

57 دقائق مضت, The best said:

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

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

أرى أنه من الأفضل والأدق برمجياً ، هو ربط الجداول باستخدام المفتاحين . فالأفضل هو تعديل حقل Educa_Stag في جدول Tb_School ليخزن رقم المرحلة Mrhla_ID بدلاً من النص .

فالأصل فعلاً هو أن تكون القيم في الجداول هي معرف الحقل من جدول آخر ، وليس قيمته النصية ، فهذا أضمن وأسلم عند التعديل على المسميات . فمثلاً لو كانت القيمة في أحد الجداول = اعدادى ، وقمت يوماً ما بتصحيح الإسم ليصبح إعدادى أو اعدادي فستجد الكثير من المشاكل قد بدأت بالظهور عندما يكون الشرط نصي مثل اعدادى القديمة ... إلخ .

 

ولكن وبما أنني لا أريد أن أعبث بتصميمك . فإليك الحل ببقاء تصميمك وفكرتك كما هي بحيث . كومبوبوكس جهة العمل Gha_Aml تم تعديله ليصبح :-

SELECT Tb_School.School_ID, Tb_School.School, Tb_School.Educa_Stag
FROM Tb_School INNER JOIN Tb_Mrhla ON Tb_School.Educa_Stag = Tb_Mrhla.Empo_Mrhla
WHERE (((Tb_Mrhla.Mrhla_ID)=[Forms]![Frm_Data]![Form1].[Form]![mrhla]))
ORDER BY Tb_School.School_ID;

 

وفي كومبوبوكس نوع المرحلة ، استخدم الحدث التالي بعد التحديث له :-

Private Sub mrhla_AfterUpdate()
    Me.Gha_Aml = Null
    Me.Gha_Aml.Requery
End Sub

 

ملفك بعد التعديلات أعلاه :-

Personnel_affairs.zip

تم تعديل منذ 22 ساعات بواسطه Foksh
تنسيق المحتوى

[The best]

1 ساعه مضت, Foksh said:

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

أرى أنه من الأفضل والأدق برمجياً ، هو ربط الجداول باستخدام المفتاحين . فالأفضل هو تعديل حقل Educa_Stag في جدول Tb_School ليخزن رقم المرحلة Mrhla_ID بدلاً من النص .

فالأصل فعلاً هو أن تكون القيم في الجداول هي معرف الحقل من جدول آخر ، وليس قيمته النصية ، فهذا أضمن وأسلم عند التعديل على المسميات . فمثلاً لو كانت القيمة في أحد الجداول = اعدادى ، وقمت يوماً ما بتصحيح الإسم ليصبح إعدادى أو اعدادي فستجد الكثير من المشاكل قد بدأت بالظهور عندما يكون الشرط نصي مثل اعدادى القديمة ... إلخ .

 

ولكن وبما أنني لا أريد أن أعبث بتصميمك . فإليك الحل ببقاء تصميمك وفكرتك كما هي بحيث . كومبوبوكس جهة العمل Gha_Aml تم تعديله ليصبح :-

SELECT Tb_School.School_ID, Tb_School.School, Tb_School.Educa_Stag
FROM Tb_School INNER JOIN Tb_Mrhla ON Tb_School.Educa_Stag = Tb_Mrhla.Empo_Mrhla
WHERE (((Tb_Mrhla.Mrhla_ID)=[Forms]![Frm_Data]![Form1].[Form]![mrhla]))
ORDER BY Tb_School.School_ID;

 

وفي كومبوبوكس نوع المرحلة ، استخدم الحدث التالي بعد التحديث له :-

Private Sub mrhla_AfterUpdate()
    Me.Gha_Aml = Null
    Me.Gha_Aml.Requery
End Sub

 

ملفك بعد التعديلات أعلاه :-

Personnel_affairs.zip 138.4 kB · 1 download

شكرا أستاذى الفاضل على توجيهاتك 

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

[Foksh]

هذا لأنك تستعمل الكومبوبوكس داخل الجداول ، والأصل ان يكون حقل الجنسية = رقمي ، وبالتالي العلاقات بين الجداول ستكون كفيلة بحل هذه المشكلة وجلب قيمة 1 من جدول الديانة نفسه ( كما ذكرت سابقاً حتى لو تغيرت معك التسميات ، فسيتم تغييرها في جميع السجلات في جميع الجداول التي يوجد بها هذا الحقل ) .

تم تعديل منذ 1 ساعه بواسطه Foksh

[The best]

الكومبو بوكس فى النموذج

وفى الجدول الحقل رقمى بالفعل 

ازاى نحلها ونجعل البيانات تظهر نصوص فى التقرير

[The best]

16 ساعات مضت, The best said:

الكومبو بوكس فى النموذج

وفى الجدول الحقل رقمى بالفعل 

ازاى نحلها ونجعل البيانات تظهر نصوص فى التقرير

؟؟؟

[Foksh]

17 ساعات مضت, The best said:

ازاى نحلها ونجعل البيانات تظهر نصوص فى التقرير

جرب استعمال الاستعلام التالي كمصدر للتقرير :-

SELECT Tb_personal_data.rkm_mlf, Tb_personal_data.cod_mothaf, Tb_personal_data.student_name, Tb_personal_data.kwmy, Tb_personal_data.tr_milad, Tb_personal_data.mkan_milad, Tb_personal_data.mkan_scan, Tb_personal_data.gns, Tb_Dyana.Dyana AS dyana, Tb_Gnsya.Gnsya AS gnsya, Tb_Hala_Egtmaia.Hala_Egtmaia AS Hala_Egtmaia, Tb_personal_data.rkm_hatef, Tb_personal_data.rkm_tamin, Tb_Mrhla.Empo_Mrhla AS Mrhla, Tb_Gob.The_Gob AS Gha_Aml, Tb_Functional_data.noa_taeen, Tb_Functional_data.tr_taeen, Tb_Functional_data.tr_estlam_aml, Tb_Functional_data.mokf_aml, Tb_Functional_data.mgmoa_taleem, Tb_Functional_data.wathifa, Tb_Functional_data.rkm_krar, Tb_Functional_data.tr_krar, Tb_Functional_data.kader, Tb_Functional_data.mada_tdrees, Tb_Qualification_data.noa_moahel, Tb_Qualification_data.drga_elmia, Tb_Qualification_data.moahel, Tb_Qualification_data.gha_hslo, Tb_Qualification_data.tr_hsol, Tb_Qualification_data.tkdeer, Tb_Additional_data.mkr_aml, Tb_Additional_data.rkm_nekba, Tb_Additional_data.rkm_seha, Tb_Additional_data.tr_maash, Tb_Additional_data.mokf_tgneed, Tb_Additional_data.emil, IIf(Mid([kwmy],1,1)=2,19,20) & "" & Mid([kwmy],2,2) & "/" & Mid([kwmy],4,2) & "/" & Mid([kwmy],6,2) AS Tarik_Milad
FROM (((((((Tb_personal_data LEFT JOIN Tb_Dyana ON Tb_personal_data.dyana = Tb_Dyana.Dyana_ID) LEFT JOIN Tb_Gnsya ON Tb_personal_data.gnsya = Tb_Gnsya.Gnsya_ID) LEFT JOIN Tb_Hala_Egtmaia ON Tb_personal_data.Hala_Egtmaia = Tb_Hala_Egtmaia.Egtmaia_ID) LEFT JOIN Tb_Functional_data ON Tb_personal_data.rkm_mlf = Tb_Functional_data.rkm_mlf_Func) LEFT JOIN Tb_Mrhla ON Tb_Functional_data.Mrhla = Tb_Mrhla.Mrhla_ID) LEFT JOIN Tb_Gob ON CStr(Tb_Functional_data.Gha_Aml) = CStr(Tb_Gob.Gob_ID)) LEFT JOIN Tb_Additional_data ON Tb_personal_data.rkm_mlf = Tb_Additional_data.rkm_mlf_Addi) LEFT JOIN Tb_Qualification_data ON Tb_personal_data.rkm_mlf = Tb_Qualification_data.rkm_mlf_Qual;