الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ممكن حل لمشكلة الطباعة والبحث

بدأه aftfm في 6 فبراير 2009 · 11 رد · 1,090 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

توجل مشكلة في فورم frmEmployeesDetails بيانات الموظفين عندما اريد البحث يتم فتح فورم frmFindEmployee في هذا الفورم اختر اسم الموظف ثم اضغط على بحث يوجد الخطأ ,

والمشكلة الثانية في نفس فورم بيانات الموظفين عند الضغط على طباعة الكل توجد مشكلة هناك.

ايضاً في فورم frmCome تسجيل الحضور , لا يقبل الا تسجيل حضور الموظف الاول اما الموظف الثاني يظهر فيه الخطأ.

Employees3.rar

#2

تمت الإجابة على السؤال الأول .. وبالنسبة للسؤال الثاني فالـ frmCome غير موجود مع المشروع

Employees.rar

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#3

الله يجزاك خير انا لك من الشاكرين

هذا المشروع بالكامل وستجد فية frmCome

وحنا ماشين حبة حبة نعدل في البرنامج بس لا تغضب

_____________Employees.rar

#4

:)

الحد الأقصى لأي متغير من نوع Integer هو 32767 .. ورقم الموظف يزيد عنه

لذا يجب تغيير نوع المتغير iID من Integer إلى Long

Employees.rar

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#5

تمت حلول كثيرة ولكن ايضاً توجد مشكلة ثانية في البحث في بيانات الموظفين , عندما ابحث عن موظف ثم تفتح لي فورم البحث اختار اسم الموظف ثم اضغط على زر (الإنتقال الى بطاقة الموقع) يتم انتقالي الي بيانات الموظف المختار ولكن عندما اريد البحث عن موظف آخر أحياناً لا توجد مشكلة ولكن عند تكرار العملية يحدث خطأ في mdlEmployeesDetails في

IF Not IsNull(dRS![iD]) then .txtID = (dRS![iD]) ,k

#6

يجب الإنتقال إلى السجل الأول قبل إستخدام الدالة Find .. وهذا في حالة وجود سجلات

If dRS.RecordCount > 0 Then dRS.MoveFirst

Employees.rar

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#7

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

كذلك في فورم الاجازات نفس المشكلة , كما توجد مشكلة في فورم الاجازات في البحث الذي تم تعديلة مسبقاً في فورم بيانات الموظفين

#8

ضع السطر أدناه في الحدث Load للـ MDIForm

Calendar = vbCalHijri

ليصبح الإجراء بأكمله هكذا :


Calendar = vbCalHijri
ConData
End Sub
Private Sub MDIForm_Load()

والـ Calendar هذه هي المسؤلة عن طريقة عرض التاريخ في المشروع بأكلمه

أي حين تغييرها إلى vbCalHijri أصبح التاريخ هجري داخل المشروع

وحين تغييرها إلى vbCalGreg أصبح التاريخ جريجي أي ميلادي داخل المشروع بأكمله أيضا

وفي إستفسارك ذكرت ان التاريخ هجري أحيانا وميلادي أحيانا أخرى .. لماذا ؟؟

لأنك تستخدم Control الـ MonthView أو الـ DTPicker

وكلاهما يعرض التاريخ وفقا لـ Calendar الجهاز وليس المشروع

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#9

المشاكل كثيرة ويبدو أني ازعجتك ولكن يجزيك الله خير

في فورم الغياب ايضاً عند تعديل سبب الغياب وليكن مرضي , وبعد الضغط على زر حفظ تظهر المشكلة.

وفي فورم الاجازات في بحث توجد هناك مشكلة ايضاَ.

تم تعديل هذه المشاركة بواسطة aftfm في 7 فبراير 2009 في 21:00

#10

لو ممكن تخصصلي نسخه للتعديل عليها اكون من الشاكرين

النسخه الموجوده لدي من الواضح انها تختلف كثيرا عن ما توصلت اليه

ومن أفضل ذكر نص الرسالة الدالة على وجود المشكلة المقصوده

وذكر السطر المؤشر عليه وقت ظهور المشكلة :)

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#11

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

![Reason] = Trim(txtAlibi.Text)

وهناك مشكلة اخرى في فورم الاجازات في البحث

ودمتم

_______Employees3.rar

#12

بالنسبة للخطأ الأول فعليك بتغيير كلمة Reason إلى Reson ليتطابق مع الإسم الحقيقي للحقل

وبالنسبة للنقطة الثانية انت بتستخدم شاشة بحث عن موظف في الأجازات وهي مخصصة لشاشة بيانات الموظفين

في الاول كنت متخيل ان النسخه عندي قديمة .. لكن النسخه الجديدة هي هياها تقريبا

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

مواضيع مشابهة