عندما احدد نوع الحقل مثلا ( رقم )
فيقوم المستخدم بأدخال ( نص ) تظهر رسالة من الاكسس
اريد ان استبدلها برسالة من عملي
كيف يتم ذلك
استفسار حول رسائل الاكسس
مغلق
المسلم من سلم الناس من لسانه ويده
بارك الله فيك
( لا عدمناك )
(gift)(f)(gift)
عزيزي / أبو عقيل
لم تنجح معي الطريقة
اليك المثال عدل فيه
ويليت تقلي اش الخطأ
بارك الله فيك(gift)(f)(gift)
المثال
عفوا لم يتحمل معي المثال لا ادري لماذا
على العموم
في عملي ان عامل حدث للنموذج قبل التحديث يسأل هل يحفظ أم لا
عزيزي
في برنامج الموضفين
نموذج starup في حدث عند الاغلاق يوجد هذا الجزء DoCmd.DeleteObject acTable, "fbi"
DoCmd.DeleteObject acQuery, "del1"
DoCmd.DeleteObject acQuery, "del2"
DoCmd.DeleteObject acQuery, "del3"
DoCmd.DeleteObject acQuery, "del4"
DoCmd.DeleteObject acQuery, "q22"
DoCmd.DeleteObject acQuery, "q222"
DoCmd.DeleteObject acQuery, "q4"
DoCmd.DeleteObject acQuery, "q5"
DoCmd.DeleteObject acQuery, "q6"
DoCmd.DeleteObject acQuery, "q5-1"
DoCmd.DeleteObject acQuery, "Z"
DoCmd.DeleteObject acQuery, "Y"
DoCmd.DeleteObject acQuery, "L"
مالمقصود به فأغلب الاستعلامات المشار اليها ليست موجودة
الاستعلام q4 موجود في الكثير من الاكواد وهو ليس موجود
الرجاء الايضاح
والرجاء الاكبر أن تتحملنا
للرفع
للرفع
أخي العزيز / أبووليد :D
تحية طيبة وبعد ،،،، هذا المثال مقطوع من برنامج متكامل تم عمله لشركة
سكيكو ،،، شخص عزيز طلبه مني بناءا على طلب من رئيسه ،،، وطلب مني
عمل حماية له في حالة تغيير اسم الدائرة من :
(( الشركة السعودية للكهرباء / غزلان )) إلى أي اسم أخر يتعطل البرنامج
أخذت في الاعتبار في حالة تغيير اسم الدائرة يتم حذف الاشياء الضرورية في
البرنامج والتي بدونها البرنامج يتعطل أو تتعطل بعض الشاشات الرئيسية ،،،
وعليه فقد عينت هذه الاستعلامات من الجدول الذي بدونه تتعطل معظم
النماذج التي في البرنامج ،،،،،
If Me![الاسم ] <> "الشركة السعودية للكهرباء / غزلان" Then Beep MsgBox "هذا البرنامج غير مرخص له بالعمل على هذا الجهاز", vbQuestion, "اتصل بالمبرمج لحل هذه المشكلة" MsgBox " هذا البرنامج مرخص له بالعمل للشركة السعودية للكهرباء / غزلان", vbQuestion, "اتصل بالمبرمج لحل هذه المشكلة" MsgBox " إتصل على رقم الجوال : 055555555 / أبو عقيل ", vbQuestion, "اتصل بالمبرمج لحل هذه المشكلة" DoCmd.DeleteObject acTable, "fbi" DoCmd.DeleteObject acQuery, "del1" DoCmd.DeleteObject acQuery, "del2" DoCmd.DeleteObject acQuery, "del3" DoCmd.DeleteObject acQuery, "del4" DoCmd.DeleteObject acQuery, "q22" DoCmd.DeleteObject acQuery, "q222" DoCmd.DeleteObject acQuery, "q4" DoCmd.DeleteObject acQuery, "q5" DoCmd.DeleteObject acQuery, "q6" DoCmd.DeleteObject acQuery, "q5-1" DoCmd.DeleteObject acQuery, "Z" DoCmd.DeleteObject acQuery, "Y" DoCmd.DeleteObject acQuery, "L" DoCmd.Quit Else DoCmd.OpenForm "frm-p1" End If
الجدول ( fbi ) هو الجدول التي توجد فيه معلومات المستخدم الحالي وجميع
صلاحياته ،،، في حالة حذفه سوف تتعطل جميع الشاشات التي تطلب اسم
المسخدم ،،، وعليه في حالة حذفه من البرنامج سوف يتعطل البرنامج بالكامل
أما الباقي فهي استعلامات أيضا ضرورية وفي حال حذفها سوف تتعطل بعض
النماذج وبعض التقارير المهمة في البرنامج ,,,,,,,
أي القصد من كل هذا هو أنه في حالة تغيير الاسم يتعطل البرنامج
تحياتي : أبو عقيل (f)(gift)(f)
المسلم من سلم الناس من لسانه ويده
الف شكر عزيزي
واسف على البس بين الموضوعين
ما اعودها
بارك الله فيك
(gift)(f)(gift)
هذا الموضوع مغلق.