المشاركات : 372
المواضيع 15
الإنتساب : Sep 2013
السمعة :
28
الشكر: 487
تم شكره 1677 مرات في 187 مشاركات
السلام عليكم...
ليس لدي VB الآن، و لكن أعتقد أن التعديلات التالية قد تفي بالغرض:
1. اترك كود الحدث WillMove كما هو.
2. احذف جملة movv = False من الحدث MoveComplete.
3. كود الحدث Change لمربعات النص يكو كالتالي:
كود :
If movv Then
movv = False
Else
cmdCancel.Visible = True
cmdUpdate.Visible = True
End If
* حتى لو نجح هذا الكود - و أرجو أن ينجح - فإن هناك اعتبار آخر. فالحدث WillMove لا يحدث فقط عند الانتقال من سجل إلى آخر عن طريق الـ ADO Control أو بأوامر مثل MoveNext أو MoveLast، و إنما أبضاً عند إضافة سجل جديد (الانتقال إلى السجل الجديد) أو عند الحذف (الانتقال إلى السجل التالي عير المحذوف). و لهذا أعتقد أن عليك التعامل مع البارامتر adReason في الحدث WillMove حيث يبين هذا البارامتر سبب الانتقال إلى سجل آخر.
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
لم[SIZE=1] ينجح هذا الكود
يا أستاذنا الكبير[/SIZE]
المشاركات : 513
المواضيع 2
الإنتساب : Sep 2013
السمعة :
16
الشكر: 245
تم شكره 445 مرات في 172 مشاركات
السلام عليكم
- طبعاً في البداية أكيد يوجد لكل مستخدم إسم وكلمة سر خاصه به تميزه عن غيره يدخل بها إلى البرنامج , فإذاً على ما أعتقد الشغله ستكون سهله أضف حقل في الجدول التي تعرض منه البيانات أو المخزنه فيه البيانات التي تعرض في التكستات وليكن لإسم المستخدم الذي عدل آخر تعديل , وعندما تتغيير البيانات في الtxtFlelds إستخدم كود للإستعلام عن الحقل الخاص بإسم المستخدم الذي عدل آخر تعديل إن كان مطابق لإسم المستخدم الذي هو مسجل الدخول في البرنامج أظهر الأزرار وإن كان الحقل فارغ أو غير مطابق فقم بإخفائها أو إلغاء تفعيلها , طبعاً ضع كود الإستعلام في حدث الـ Change لل الtxtFlelds بشرط أن يكون هناك تكست منها يحمل قيم غير قابله للتكرار كرقم ID مثلاً وإن لم يكن هناك مثل هذا التكست قم بإنشاء حقل في الجدول رقمي مثلاُ تسلسلي غير قابل للتكرار في بياناته وضع التكست الذي الخاص به مخفي مش شرط يكون ظاهر دعه فقط لكي تستفيد منه في الإستعلام . أرجوا أن تكون وصلت لك الفكرة .
- تحياتي .
المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
جزاك الله خيرآ
على ما فهمت منك ان هذين الزرين سيظهران فى بداية البرنامج
بمجرد التحقق من أن الحقل الخاص بإسم المستخدم الذي عدل آخر تعديل مطابق لإسم المستخدم الذي هو مسجل الدخول في البرنامج
ولكنى أريد ألا يظهر أى من الزرين الا اذا عدل المستخدم بنفسه فى ال txtFields
أما ان كان المستخدم يتصفح السجلات او يبحث عن شئ معين أو.........فلا داعى لوجود هذين الزرين
دعك من موضوع إسم المستخدم وكلمة السر الخاصه به وحاول أن تعطينى حلآ لسؤالى الأصلى
وشكرآ
المشاركات : 513
المواضيع 2
الإنتساب : Sep 2013
السمعة :
16
الشكر: 245
تم شكره 445 مرات في 172 مشاركات
السلام عليكم
- في البداية يجب أن يكون هناك بيانات أو حقل مربوط بالمستخدم أو بيانات تكون خاصة بالمستخدم لكي نقدر نعرف عند التنقل بين السجلات أن السجل الحالي المنتقل اليه أو منه هو له علاقة بهذا المستخدم بعدها نقدر نفحص أو نستعلم عن القيمة التي في الحقل الخاص بإسم آخر من عدل على هذا السجل لأنه لو كان ليس له أي علاقة بهذا السجل فلايتم أصلاً الإستعلام ولايتم إظهار الزرين فلذلك بعد التعرف على السجل أنه له علاقة بهذا المستخدم وأن قيمة الحقل الخاص بإسم آخر من عدل تكون فارغه أو كانت القيمة أو الإسم مطابقه للمستخدم المسجل الدخول فيتم في كلا الحالتين إظهار الزرين . وكود الإستعلام يكون في حدث ال Change للتكستات .
- تحياتي .