اذهب الي المحتوي
بحث مخصص من جوجل فى أوفيسنا
Custom Search

عبد الفتاح كيرة

الخبراء
  • Content count

    2,802
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    3

عبد الفتاح كيرة last won the day on March 25

عبد الفتاح كيرة had the most liked content!

السمعه بالموقع

367 Excellent

عن العضو عبد الفتاح كيرة

  • الرتبه
    طالب الأكسيس
  • تاريخ الميلاد 01 نوف, 1963

Profile Information

  • Gender (Ar)
    ذكر
  • Job Title
    teacher
  • Location
    مصر
  • Interests
    excel - Access

Contact Methods

  • MSN
    ahmadkera@hotmail.com
  • Website URL
    http://noormobeen.blogspot.com/
  • ICQ
    0
  • Yahoo
    abokera@yahoo.com
  • Skype
    abdelfattahkeera

اخر الزوار

2,890 زياره للملف الشخصي
  1. شرح عمل أكثر من شهادة بشيت واحد

    شكراً لك
  2. اختصار الكود

    يا سلام على الأفكار النيرة حيلة عظيمة قسمة الحقل على نفسه يعطينا 1 فى حال كان به أى رقم وصفر إن كان فارغا بارك الله فى علمك وشكرا لاستحابتك
  3. اختصار الكود

    السلام عليكم و رحمة الله هذا كود يقوم 1- حساب عدد حصص كل معلم وتسجيلها فى مربع نص اسمه sthu88 2 - حساب مجموع كل الحصص و تدوينها فى مربع نص اسمه total وذلك بالتنقل عبر حقول الاستعلام Q_all و حساب الحصص و ذلك باستخدام رقم الحقل فى dao وقد قمت بعمل دوارتين لهذا الغرض و قد اضطررت لتكرار جزء من الدوارة الأولى و استخدامه فى الدوارة الثانية Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer) Dim db As Database Dim rs As DAO.Recordset Dim i As Integer Dim ii As Integer Dim tt As Integer Set db = CurrentDb Set rs = db.OpenRecordset(Me.RecordSource) rs.MoveFirst Do Until rs.EOF For i = 3 To 47 If rs(i) <> "" Then ii = ii + 1 End If Next i tt = tt + ii rs.MoveNext ii = 0 Loop rs.MoveFirst rs.FindFirst ("[tt_tname]=" & [tt_tname]) For i = 3 To 47 If rs(i) <> "" Then ii = ii + 1 End If Next i Me.sthu88 = ii Me.total = tt rs.Close Set rs = Nothing db.Close Set db = Nothing End Sub الجزء المكرر هو هذا الذى يحسب عدد حصص كل مدرس For i = 3 To 47 If rs(i) <> "" Then ii = ii + 1 End If Next i Me.sthu88 = ii هل يمكن ضم الدوارتين معا كما كنت أحاول سابقا لكنى لم أنجح شكرا لكم مقدما الملف مرفق و التقرير rpt_alls newTab113.rar
  4. ترتيب التاريخ تصاعدى من النموذج الرئيسى

    ملفك ليس به سجلات فارغة ما يظهر فى نهاية النموذج الفرعى هو لاستقبال سجل جديد
  5. ترتيب التاريخ تصاعدى من النموذج الرئيسى

    كلنا نتعلم شكرا لك
  6. ترتيب التاريخ تصاعدى من النموذج الرئيسى

    عليكم السلام و رحمة الله و بركاته أولا ما يصلح أن تسمى حقلا باسم date غيرته إلى mdate أضف السطرين التاليين إلى زر ترتيب تصاعدى فى النموذج الرئيسى Me.test.Form.OrderBy = "mdate asc" Me.test.Form.OrderByOn = True ملفك بعد التعديل test1005.rar
  7. الاكسيس يرى التاريخ كانه حقل

    صدقت أما التى بالقوسين ففى مصدر بيانات عنصر التحكم من نافذة الخصائص
  8. الاكسيس يرى التاريخ كانه حقل

    =date ()
  9. كود ترحيل البيانات

    ما علاقة ذلك بقسم الأكسيس؟
  10. كل عام وانتم بالف خير ... عيد سعيد

    تقبل الله منا ومنكم صالح الأعمال
  11. الله يبارك فيك أبا خليل المحترم وهذه النتيجة المرضية و الحمد لله و كل عام و أنتم بخير
  12. السلام عليكم وكل عام و أنتم بخير الصورة الأولى بها عنصر التحكم rs وبجواره عنصران آخران فالفصل 2/1 لديه المدرس فوزى عوف و المادة لغة عربية كيف يمكن الحصول على الشكل التالى فى التقرير وجميع هذه الحقول فى استعلام يبنى عليه التقرير و هذه هى القاعدة كاملة newTab112.rar
  13. ليس من السهل استرجاع خطوات سابقة و طرق الحل فيها لكن لأجل الأستاذ شيفان نحاول الحل بطريقة الجدول الوسيط تقرير taqall الحل بطريقة الأستاذ شيفان تقرير rpt_all2 فى الملف التالى newTab10.rar الحل النهائى بطريقة الأخ رمهان فى الملف التالى تقرير rpt_alls وفقكم الله newTab11.rar
  14. معادلة حساب العمر

    هذا كان فى بدايات الانتقال من الإكسيل إلى الأكسيس والحمد لله مازلنا نتعلم كل يوم فى منتدانا الغالى شكرا لك أخى شيفان
  15. ده شغل كبير جدا ربنا ييسر الأمر طريقتك بها قاعدة مرفقة و طريقة الأستاذ رمهان ما تحتاج قاعدة و الطريقة الثالثة سأحاول رفعها إن شاء الله جزاكم الله خيرا
×