اذهب الي المحتوي
أوفيسنا

عبدالعليم اسماعيل

03 عضو مميز
  • Posts

    104
  • تاريخ الانضمام

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

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

17 Good

عن العضو عبدالعليم اسماعيل

  • تاريخ الميلاد 20 أكت, 1984

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    لايوجد
  • البلد
    مصر
  • الإهتمامات
    إذا تسبب السلاح في الجرائم فإن الملاعق تجعلك سمينا

اخر الزوار

1,577 زياره للملف الشخصي
  1. اي الطرق اصح فى ربط العلاقه رأس واطراف الطريق رقم 1 ام الطريق رقم 2
  2. اريد تفادى رساله لايمكن اضافة سجل او تغييره لانه مطلوب سجل مرتبط اكسس مع الحفاظ على طريقه ربط الجداول ام الخطاء فى طريقه الربط 025.accdb
  3. اشكر حضرتك على تبنى الفكره ومتابع مع حضرتك من خلال جروب الواتس
  4. احترامى للجميع اتمنا من قبول الفكره وتطويره الحمد لله دى النتيجه اللى قدرت اوصل اليها ومازال ليها بعض التعديلات للتطوير والملف مفتوح المصدر للجميع PatternLock.accdb
  5. اشكرك مع العلم انى بقا لى فتره لدرجه انى جمعت كم اكواد على شان اوصل لنتيجه بس كل المحاولات بائت بالفشل
  6. ممكن استخدام نفس طريقه html مع الاكسس ام لا Pattern-Lock.zip
  7. بشكر الجميع على المساعده ولاكن وصلت الى هذه النتيجه ولاكن ينقصها اسهم اوعلامات لتوضيح مسار النقش قفل نمط.rar
  8. بجهز نموذج بس بينقصنى حركة الاسهم حابب استخدمه فى برنامج محل جولات
  9. السلام عليكم ورحمه الله وبركاته هل بالامكان انشاء فكره قريبه إلى نقش الهاتف بالاكسس مع احداثيات الارقام المضغوط عليها ولا من عدمه
  10. بعد البحث بالمنت وجت كودين وتم دمجمهم بنفس قاعده البيانات الاول يعطينى رقم والثانى استعادة الترقيم بعد الحذف طبعا دى محاول بس مع خبرة حضراتك هل هى صحيحه ام لا مع العلم انه يوجد علاقه بين ثلاث جداول DoCmd.GoToRecord , , acNewRec If IsNull(DMax("[kod_alad5al]", "tblControls")) Or DMax("[kod_alad5al]", "tblControls") = 0 Then Me.kod_alad5al.Value = 1 Else kod_alad5al = DMax("[kod_alad5al]", "tblControls") + 1 End If Dim i As Integer, k As Integer Dim db As DAO.Database Dim Rs As DAO.Recordset Set db = CurrentDb DoCmd.SetWarnings False Set Rs = db.OpenRecordset("SELECT tblControls.* FROM tblControls ORDER BY tblControls.asm_a") If Nz(Rs.RecordCount, 0) > 0 Then Rs.MoveLast k = Rs.RecordCount Rs.MoveFirst For i = 1 To k Rs.Edit Rs!kod_alad5al = i Rs.Update Rs.MoveNext Next i End If Set Rs = Nothing Set db = Nothing DoCmd.SetWarnings True 01.rar
  11. اريد عند الغاء التعديل لايأخذ رقم بالسجل ويبقى عند اخر ترقيم 0.rar
  12. مع العلم انى بحثت بالمنتدى اريد بحث عن مجلد او ملف واظهار النتائج كما لو بالامكان اغلاق كلك يمين اعمل على برنامج ارشيف خاص لملفاتى abdo02.accdb
×
×
  • اضف...

Important Information