بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
ابوخليل
-
Posts
11,769 -
تاريخ الانضمام
-
Days Won
198
Community Answers
-
ابوخليل's post in اريد كود عدم تكرار رقم في حقل علما انه ليس ترقيم تلقائي was marked as the answer
الاسماء عادة تتشابه خلاف للسجل المدني او الرقم القومي
الحل هو الكود السابق مع تغير طفيف ليتناسب مع الحقول النصية
اكتب الكود التالي في حدث بعد التحديث لحقل الاسم
if DCount("*","tbl1","txtname='" & txtname & "'")>0 then msgbox"الاسم موجود" undo exit sub end if باعتبار txtname هو حقل الاسم
-
ابوخليل's post in عرض عمود افقيا فى التقرير was marked as the answer
انظر التعديل
ان كان يوافق طلبك فأكمل على النسق نفسه
student8.rar
-
ابوخليل's post in استخدام داله if فى الاكسس باكثر من 3 شروط was marked as the answer
يبدو ان الامور تحسنت
هذا هو التعديل
studEhsa.rar
-
ابوخليل's post in أريد مساعدتكم في إظهار كلمة نعم أو لا was marked as the answer
تفضل التعديل
تم توظيف الأداة if في حدث تنسيق التفصيل
Database11.rar
-
ابوخليل's post in اظهار مربع نص بشرط was marked as the answer
اولا : في تنسيق خصائص الحقل ff اجعل القيمة: مرئي=لا
ثم الصق الجملة التالية في حدث بعد التحديث للحقل tt
If tt.Value = "شيك" Or tt.Value = "مرتجع" Then ff.Visible = True Else ff.Visible = False End If -
ابوخليل's post in عاوز كود يجعل النموذج شكلى او مشروط was marked as the answer
نعم يمكن
اضف هذا السطر
DoCmd.Save acForm, "frm1"
لتصبح الجملة كاملة :
On Error Resume Next DoCmd.OpenForm "frm1", acDesign, , , acFormPropertySettings, acHidden Forms!frm1.PopUp = True Forms!frm1.Modal = True DoCmd.Save acForm, "frm1" DoCmd.OpenForm "frm1", acNormal -
ابوخليل's post in استعلام لا يعمل was marked as the answer
مشكلة التاريخ
ضع تاريخ اليوم للقيمة الافتراضية في حقل التاريخ في جدول maintble
اما بالنسبة لظهور الصف والفصل في جدول maintble فانا اعتبره زيادة
لانه يكفينا المعرف
ولا يخفى عليك انه يمكننا اظهار الصف والفصل في اي مكان اذا كان لدينا المعرف
تم التعديل واظهار الصف والفصل
D22.rar
-
ابوخليل's post in هل ممكن عند اختيار تبويب يغير كذلك القيمة التى تساويه فى مربع التحرير والسرد was marked as the answer
اخي الكريم
يمكن حسب تصميمك في المثال ايجاد الحل ولكننا نحتاج الى جملة برمجية اطول من الحاجة
حيث انك جعلت مربع التحرير يأخذ بياناته من جدول
بينما في جدول البيانات جعلت الحقل يأخذ البيانات نفسها ولكن كقيم مكتوبة داخل الاستعلام
لذا قمت بتعديل نوع الحقل داخل الجدول الى رقمي وكذلك مربع التحرير
لتصبح الجملة البرمجية التي تحقق مطلوبك هكذا :
Private Sub o_Change() Me.tr.Value = Me.o.Value End Sub اما اذا اردت الابقاء على عملك بدون تعديل فيمكن حينها ان اعمل لك الكود المناسب
ولكنه سيكون اطول قليلا حيث سيكون لكل تبويب شرطا يخصه
علامة الجدوله2.rar
-
ابوخليل's post in المساعده فى اتمام البحث داخل نموزج الاخصائي was marked as the answer
تفضل
ولاحظ اني غيرت نوع حقل المدرسة في جدول الطلاب الى رقمي
نموزج الاخصائي2.rar
-
ابوخليل's post in استخدم ملف اكسس من اكثر مستخدم بنفس الوقت was marked as the answer
اجابة لكل اسئلتك
عند الانتهاء من مشروعك تقوم بتقسيم قاعدة البيانات الى جداول وواجهات (معالج اكسس يقوم بذلك )
تضع الجداول على جهاز وتوزع الواجهات على الاجهزة الاخرى ويمكن في هذه الحالة ان تعمل عشرة اجهزة في وقت واحد
بقي شيء مهم وهو لا تنسى تضبط جميع نماذجك من الخصائص / لسان التبويب : بيانات /القيمة : تأمين السجلات ، اجعلها : سجل محرر
-
ابوخليل's post in معرفه سبب عدم القدره على التعديل او الاضافه من نموزج الادخال was marked as the answer
السبب هو انك جعلت مصدر بيانات النموذج من اكثر من جدول واستعلام
لذا لا يمكنك التعديل
-
ابوخليل's post in Join 2 Tables In Access was marked as the answer
هل تصلح لك هذه الطريقة
انظر استعلام التوحيد داخل المثال
db1.rar
-
ابوخليل's post in كيف نرجع DateDiff الى تاريخ محدد بالنموذج was marked as the answer
Age: DateDiff("yyyy";[Texit_Brtheday];[forms]![frm1]![text1]) شرط يكون النموذج مفتوح
اذا غير واضح ارفق مثالك للتعديل
-
ابوخليل's post in اريد تغير خاصية لعنصر تحكم بفورم من خلال كود لعنصر تحكم بفورم اخر was marked as the answer
الان المطلوب واضح تماما
ولكن اعلم ان هذه الطريقة تصلح لبرنامج يستخدمه مستخدم واحد فقط
وتحتاج لتطبيق ذلك الى التالي :
نموذج بداية يتفحص الشرط
فإن وجد الخانة مفعلة فتح نموذج كلمة المرور والا فتح نموذج البيانات
انظر المثال المرفق :
كلمة المرور=1
انقر على زر تعديل لتغيير الرقم السري ولتفعيل ظهور نموذج كلمة المرور من عدمه
آمل ان يكون هو ما تبحث عنه
تحكم في ظهور نموذج كلمة لمرور.rar
-
ابوخليل's post in اضافة رسالة الى زر امر was marked as the answer
Private Sub Command9_Click() If IsNull(Frame0) Then MsgBox "ادخل احد الخيارات" Exit Sub Else DoCmd.Close End If End Sub Database3.rar
-
ابوخليل's post in جلب الرقم الرمزي للموظف تلقائيا was marked as the answer
جزاك الله خير استاذ علي
وهذا المثال بعد التعديل
db1.rar
-
ابوخليل's post in تنسيق حقول التقرير was marked as the answer
جزاك الله خيرا يابو احمد على هذا الجهد والعطاء
اخونا علي : الخلية في اكسس ليست كمثيلاتها في اكسل او وورد
لذا فالتعامل معها يحتاج الى عمليات خاصة خارج نطاق خصائصها
وفي مسألتك هذه نحن بحاجة الى عمليتين :
الاولى : لتوسيع الخلية عموديا ( ويجب ان تتزامن الخلايا الاخرى معها في التمدد والتقلص )
الثانية : توسيط النص عموديا سواء كان سطرا واحدا او اكثر ( ويطبق ذلك على جميع الخلايا )
ولدي وحدتين نمطيتين تعمل كل واحدة على حدة ولم يتسنى لي الجمع بينهما
ولكن العملية الثانية هي الاقرب الى حاجتك ومطلوبك وكثيرا ما استخدمها
وهي تحتاج بدأً الى ضبط ارتفاع الخلايا على مقياس محدد ،كسطرين او ثلاثة ونحو ذلك حسب البيانات المتوقعة
انظر التعديل على المرفق آمل ان يحوز على رضاك
Database4.rar
-
ابوخليل's post in التسلسل المفروز لا يضبط في الاستعلام was marked as the answer
شكرا للاستاذ جلال وجزاه الله خيرا
السبب هو ان نوع بيانات الحقل المفروز = نص
غير نوع البيانات في الجدول الى = رقم
-
ابوخليل's post in مربع نص وصورة في نموذج فرعي was marked as the answer
يمكن ان تضيف نموذجا فرعيا جديدا يكون كواجهة
ويمكن ان تضع صورة تغطي النموذج الفرعي ويتم اظهارها واخفاءها حسب الرغبة
في المرفقات تطبيق للطريقة الاولى
db68.rar
-
ابوخليل's post in معيار في النموذج الفرعي was marked as the answer
في الاستعلام qyr_saderbydate2
استبدل المعيار الموجود بهذا
>=[forms]![frm_main]![zh]![txtDateFrom] And <=[forms]![frm_main]![zh]![txtDateTo] يبدو ان سبب المشكلة واضح الآن
-
ابوخليل's post in جدول بسجل واحد فقط ؟ was marked as the answer
يمكن عبر النموذج ؟
يمكن التحكم في ذلك من خصائص النموذج
لسان التبويب : بيانات
القيمة : السماح بالاضافة = لا
-
ابوخليل's post in مشاكل واجهتني في استعلام حساب أيام الغياب was marked as the answer
بعد اذن الاستاذ علي
استبدل الكود الموجود في حقل date2 بهذا :
date2: (SELECT MAX(A2.S_date) FROM Absent As A2 WHERE A2.S_date < A1.S_date and A2.[emp no]=A1.[emp no] ) -
ابوخليل's post in بعد إدخال التاريخ أن يظهر الشهر السابق was marked as the answer
اخي ايمن
احرص دوما على عدم ترك مسافات خالية في التسميات
From_Date_one_month = DateAdd("m", -1, [the_Date]) Date2.rar
-
ابوخليل's post in طلب تعديل اضافة صورة الي نموذج والتقارير was marked as the answer
المشكلة عندك نقص في المكتبات
اتبع الخطوات التالية بعد فتح القاعدة على التصميم :
1-افتح محرر الفيجوال ؛ ( Alt+F11)
2- Tools / References
3- سيظهر لك مربع حوار المكتبات المفعلة
انظر ان كانت المكتبة التالية موجودة :
microsoft office 11.0 object library
اذا لم تكن موجودة
انقر زر المستكشف سيفتح لك آليا على مجلد النظام
ابحث عن ملف باسم Mso.dll
انقر عليه نقرتين
تجد انه اضاف المكتبة الى برنامجك
موافق ثم اخرج
ملحوظة : اذا لم تجد المكتبة في مجلد النظام system تجدها في :
c:\programfiles\microsoftsharad\office11\Mso.dll
-
ابوخليل's post in ارجو الحل في هذه الرسالة التحذيرية was marked as the answer
الرسالة تعني ان اعدادات اللغة في الجهاز غير متوافقة مع البرنامج
اضبط اعدادات اللغة في وندوز من لوحة التحكم
في xp الاعداد الاقليمية
وفي win7 المنطقة واللغة