بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
-
Posts
12,448 -
تاريخ الانضمام
-
Days Won
231
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو ابوخليل
-
آمين واياك ، والحمد لله
-
تفضل times28.rar
-
تفضل تم الاستغناء عن جدول المعلمين وبما ان المعلم قد يكون له اكثر من مادة فقد جعلت المواد في التفصيل times27.rar
-
له اكثر من مادة نعم ... ولكن لا يوجد درجة على كل حال انتظرني سوف اعمل الافضل حسب مثالك سأحاول الا اضيف شيئا الا اذا تعذرت الحلول
-
او لحظات دعني انظر في جدول الحصص الدرجة غير موجودة في جدول الحصص في جدول tbl_grade_wihda هل الدرجة ثابتة امام المادة
-
حسب مشاركتك الأخيرة لا يوجد حل سحري انظر المثال لو افترضنا ان لكل معلم درجة واحدة ومادة .......................... وسوف احاول اذا يمكن ضبط المسألة مع تعدد الدرجة والمادة times26.rar اعمل جدول فرعي للمعلمين مرتبط مع جدول المعلمين رأس لأطراف وادرج لهم درجاتهم وموادهم في الفرعي وارفع التعديل
-
طبعا ... المفترض كل معلم له درجته ومادته الخاصة والا كيف سيتم الربط مع الجدول المطلوب سوف اضيفها واوافيك بالحل
-
طلبك واضح ولكن يوجد اشكالية في الربط بين الجداول لتطبيق الحل كما ترغب يجب اضافة حقلي ( المادة / grade ) الى جدول اسماء المعلمين ما رأيك ؟
-
مع شرحك الوافي .. الا ان طلبك غامض وبسبب هذا الغموض لم تحصل على رد ما العلاقة التي تربط اسم المعلم من جدول المعلمين بالبيانات المرفقة والموضحة في الصورة ؟ صحيح ان البيانات من جدول info_stagier .. فما هذه الاسماء التي في الجدول ؟ استفسار اكثر دقة : في الصورة ادناه ما علاقة الاستاذ عبدالمنعم بالجدول الظاهر ، ومن اين اتت هذه الاسماء ؟ هل هي اسماء معلمين او مفتشين لأني تصفحت جدول المعلمين فوجدت الأسماء تختلف
-
عند غلق النموذج اعطاء رسالة بان الحقل الاساسي فارغ
ابوخليل replied to gavan's topic in قسم الأكسيس Access
نيابة عن اخي خليفة SavRefe as integr الموجود في الوحدة النمطية زائد لا يعمل والاستاذ خليفة غفل عن حذفه يمكنك حذف الوحدة النمطية فهي زائدة المتغير SavRef as integr داخل محرر النموذج هو الذي يعمل لاحظ الفرق بين الكلمتين : حرف e وهو على اسمه متغير حسب الحاجة .. تتبعه في الاحداث داخل محرر النموذج ،،، كل حدث اعطيناه قيمة مختلفة من اجل ضبط العملية -
عليكم السلام لا اذكر اني مررت بدرس او كود يعالج هذا الموضوع ولكني اعرف طريقة تحقق ذلك وهي تخفيض دقة الشاشة الى الى حد اقل بحيث يمكنك قراءة الواجههة بشكل مريح
-
لا تعب ولا شي ويسعدني خدمتك مثال الاستاذ جعفر يعالج بيانات ثابتة في الجدول ، وموضوعك مختلف لأن الاجمالي غير موجود في الأصل اعتذر .. لا ادري كيف اعالج الأمر فلعل احد الاخوة هنا الخبراء لديه رأي آخر
-
هذا التصميم خاص بإكسل أكسس يختلف لتطبيق الفكرة واظهار النتيجة على طريقة أكسس انظر المثال. Database3.accdb
-
حقل الاجمالي لا يوضع في الجدول وانما مكانه الاستعلام تفضل النتيجة Database2.accdb
-
تعديل واضافة كود عمل ماسح ضوئي مع برنامج (IrfanView)
ابوخليل replied to Ahmed_J's topic in قسم الأكسيس Access
كان الخلل في قراءة رقم الكتاب هذه تحدث احيانا وليست على اطلاقها .. وهي ان الكود لا يقرأ قيمة الحقل الا مع التركيز عليه لذا اخذت بالاحتياط وتم التحايل على فرق الوقت الذي تأخذه عملية المسح بين ملف وآخر ، بالاستعانة بعداد النموذج بدلا من sleep او wait وهذه هي الجمل البرمجية كاملة ... Option Compare Database Option Explicit Dim i As Integer Dim mypath As String '--------------------------------------------------------------------------------- Private Sub Form_Timer() Me.Refresh If funDirFile = 0 Then If i = 0 Then Me.bookNumber.SetFocus Shell ("c:\Program Files (x86)\irfanview\i_view32.exe /batchscan=(" & Me.bookNumber.Value & ",,,,," & mypath & " ,pdf,0) /scanhidden") i = 1 End If Else Me.TimerInterval = 0 End If Call Form_Current End Sub '---------------------------------------------------------------------- Private Sub scanpdf_Click() i = 0 Dim strFile As String, DirFile As String Me.bookNumber.SetFocus strFile = Trim(bookNumber.Value) & ".pdf" mypath = Application.CurrentProject.Path & "\My_Archive\Import\My_pdf\" DirFile = Dir(Application.CurrentProject.Path & "\My_Archive\Import\My_pdf\" & strFile) Me.TimerInterval = 3000 End Sub '--------------------------------------------------------------------------- Function funDirFile() Dim strFile As String, DirFile As String Me.bookNumber.SetFocus strFile = bookNumber.Value & ".pdf" DirFile = Application.CurrentProject.Path & "\My_Archive\Import\My_pdf\" & strFile funDirFile = Len(Dir(DirFile)) End Function '------------------------------------------------------------------------------------ Private Sub Form_Current() Dim sMyFileName As String sMyFileName = Application.CurrentProject.Path & "\My_Archive\Import\My_pdf\" & Trim(bookNumber.Value) & ".pdf" WebBrowser1.Navigate (sMyFileName) Me.Refresh End Sub test6.rar -
سؤال عن تصميم جدول خاص بالإجازات السنوية
ابوخليل replied to Zain Alabeden Ali's topic in قسم الأكسيس Access
الحديث عن الاجازة العادية .. وهذه دائمة سنوية يتم حساب الارصدة فيها ويخصص جدول فرعي لها ولا ترصد في جدول بيانات العاملين ( ويتعامل معها كما نتعامل مع عمودي الدائن والمدين تماما ) العارضة ( مرضية.. اضطرارية .. امومة .. .. وغيرها ) وهذه وقتية تنتهي بانتهاء السنة حتى لو لم يأخذ العامل منها شيئا وهذه الاخيرة تكون بيانات هذه الاجازات وما يستحقه العمال في جدول خاص ( تحكم) كبيانات ثابتة ( سجل واحد يشمل جميع العمال ) ويمكن رصد الاجازة الممنوحة هذه في جدول الاجازات في حقول خاصة بكل نوع -
تعديل واضافة كود عمل ماسح ضوئي مع برنامج (IrfanView)
ابوخليل replied to Ahmed_J's topic in قسم الأكسيس Access
الحل جاهز عندي النسخ سيكون مرة واحدة سواء قصرت المدة او طالت نسخة او اكثر اقصد تنفيذ الحدث فقط لدي مشكلة في مسألة التأكد من وجود الملف .. dir لا تعترف بالمتغير الذي يمثل رقم الكتاب تريد رقما او اسما صريحا الدالة هذه صغيرة تأخذ سطرا واحدا فقط وبضم len اليها تفيد اذا الملف موجود ام لا سأكمل العمل غدا ان شاء الله وابحث عن طريقة اخرى اذا لديك كودا جاهزا للتأكد من وجود الملف من عدمه فزودني به -
انت تتكلم عن مبالغ والرابط اعلاه خاص بالزمن الافضل ان ترفق مثالا بسيطا لتمكن اخوانك من مساعدتك علما ان طلبك يسير جدا لو فرضنا الحقل الاول اسمه A والحقل الثاني اسمه B وحقل المجموع اسمه C سيكون الحل كالتالي C = NZ([A]) + NZ([B]) هذا اذا كان الكود في محرر الفيجوال ، اما ان كان الكود داخل مصدر عنصر الحقل فيكون كالتالي : = NZ([A]) + NZ([B])
-
حساب انتاج اليوم الذي انا فيه فقط يعني اعرف انتاج كل يوم فقط
ابوخليل replied to mohamadhaje's topic in قسم الأكسيس Access
اذا قصدك يظهر في الفورم مجموع انتاج اليوم الحالي حسب كل نوع اذا نعم بياناتك كلها مسجلة في غير تاريخ اليوم .. اخر عملية تمت امس سجل في الجدول بيانات جديدة بتاريخ اليوم مع البيانات القديمة .. من اجل المقارنة عند عرض الحل -
سؤال عن تصميم جدول خاص بالإجازات السنوية
ابوخليل replied to Zain Alabeden Ali's topic in قسم الأكسيس Access
ما فيه شي اسمه تنطرح كما تفضل اخوي موسى : ولكن بدون استعلامات تخصيص جدول لتفاصيل الاجازات عمل حقلين فيه: 1- حقل الاستحقاق السنوي ، ويتم الادراج فيه بداية كل سنة 30 يوما 2- حقل المنصرف او الاستمتاع او المستقطع "" سمه ما شئت"" يرصد فيه عدد ايام الاجازة التي يتمتع بها الموظف من خلال مجموع الحقلين يمكنك معرفة الارصدة المتبقية واجراء العمليات من واقعها -
تعديل واضافة كود عمل ماسح ضوئي مع برنامج (IrfanView)
ابوخليل replied to Ahmed_J's topic in قسم الأكسيس Access
من اجلك ومن اجل الفائدة العلمية ركبت برنامج اكروبات ريدر والسبب انه عند بحثي عن حلول وجدت ان سبب عدم ظهور الملف موجود في خصائص المتصفح اكسبلورر لذا وضعت لك في رأس المحرر رابط يشرح طريقة تفعيل الريدر داخل اكسبلورر اليك المثال بعد نجاح عملية العرض test6.rar -
تعديل واضافة كود عمل ماسح ضوئي مع برنامج (IrfanView)
ابوخليل replied to Ahmed_J's topic in قسم الأكسيس Access
اخيرا تمكنت من سحب ملفات pdf من دون برنامج اكروبات الآن ومن اجل اظهار الملفات : كيف تريد صفة العرض ؟ 1- هل لكل ملف سجل خاص ؟ 2- ماهو معرف الصورة في السجل ؟ هل هو رقم الكتاب ؟ 3- اذا جميع الملفات التي يتم سحبها دفعة واحدة تخص سجل واحد (رقم الكتاب ) فهذا يستلزم وجود جدول فرعي يرتبط بمعرف الصورة في الرئيسي راجع استفساراتي وبناء عليها ارفع مرفقا معدلا