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

اي الطرق اصح فى ربط العلاقه رأس واطراف الطريق رقم 1 ام الطريق رقم 2

اريد تفادى رساله لايمكن اضافة سجل او تغييره لانه مطلوب سجل مرتبط اكسس مع الحفاظ على طريقه ربط الجداول ام الخطاء فى طريقه الربط 025.accdb

اشكر حضرتك على تبنى الفكره ومتابع مع حضرتك من خلال جروب الواتس

احترامى للجميع اتمنا من قبول الفكره وتطويره الحمد لله دى النتيجه اللى قدرت اوصل اليها ومازال ليها بعض التعديلات للتطوير والملف مفتوح المصدر للجميع PatternLock.accdb

اشكرك مع العلم انى بقا لى فتره لدرجه انى جمعت كم اكواد على شان اوصل لنتيجه بس كل المحاولات بائت بالفشل

ممكن استخدام نفس طريقه html مع الاكسس ام لا Pattern-Lock.zip

بشكر الجميع على المساعده ولاكن وصلت الى هذه النتيجه ولاكن ينقصها اسهم اوعلامات لتوضيح مسار النقش قفل نمط.rar

ملف لتوضيح الفكره قفل نمط.rar

بجهز نموذج بس بينقصنى حركة الاسهم حابب استخدمه فى برنامج محل جولات

السلام عليكم ورحمه الله وبركاته هل بالامكان انشاء فكره قريبه إلى نقش الهاتف بالاكسس مع احداثيات الارقام المضغوط عليها ولا من عدمه

بعد البحث بالمنت وجت كودين وتم دمجمهم بنفس قاعده البيانات الاول يعطينى رقم والثانى استعادة الترقيم بعد الحذف طبعا دى محاول بس مع خبرة حضراتك هل هى صحيحه ام لا مع العلم انه يوجد علاقه بين ثلاث جداول 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

اريد عند الغاء التعديل لايأخذ رقم بالسجل ويبقى عند اخر ترقيم 0.rar

هل من مجيب

مع العلم انى بحثت بالمنتدى اريد بحث عن مجلد او ملف واظهار النتائج كما لو بالامكان اغلاق كلك يمين اعمل على برنامج ارشيف خاص لملفاتى abdo02.accdb

الشكر كل الشكر