ابوحمود

الأخ منصور نعم الكود على الأكسس ولكن في الأسطر الثلاثة الأخيرة أزل الأول والثالث واستخدم الأوسط فقط ولا اظن أن هذا يخفى عليك :) الأخ Read Only أنا لا اعرف الجواب في موضوعه ولكنني رأيته يطلب معرفة مسار الملف التنفيذي للأكسس فكتب له الكود الذي عندي . جربت الكود …

لم أفهم مقصدك من هذا العمل ، ما اعرفه أن AddMenu مخصص لإضافة أمر إلى شريط قوائم مخصص . وهذا الأمر لايوجد له مقابل في VBA . ولك تحياتي

الأخ الغامدي استخدم الكود التالي مع تغيير ما يلزم : If DCount("[اسم الحقل الذي تضع فيه الرقم في الجدول]", "اسم الجدول") = 0 Then [اسم الحقل الذي تضع فيه الرقم] = 1 Else [اسم الحقل الذي تضع فيه الرقم] = DLast("[اسم الحقل السابق في الجدول]", "اسم الجدول") + 1 En…

افتح النموذج في عرض التصميم ثم اختر الزر أو الأزرار المطلوبة ثم أظهر الخصائص وفي صفحة التبويب غير ذلك تجد خاصية علامة جدولة اجعلها لا . ولك تحياتي

الأخ benga إذا كنت جعلت موضوع رسالتك بالإنجليزي فقد حذفته لأننه تأتيني الكثير من الرسائل ولا أقرأها فقد يكون منها . لذلك أرسل الملف مرة اخرى مع اعتذراي لك . ولك تحياتي

الأخ ابو بشاير إذا لم يكن لديك مانع أرسل لي القاعدة على البريد واحذف كل شيء ماعدا النموذجين وما يتعلق بهما من استعلامات وجداول . ولك تحياتي

ابو بشاير لقد جربت إنشاء نموذجين كلاهما مبني على نفس الجدول فتم التحديث مباشرة بعد إغلاق النموذج الثاني ثم جعلت الأول مبني على عبارة SQL ونفس النتيجة ثم جعلت الأول مبني على استعلام ونفس النتيجة يعني ما فيه أي حاجة لاستخدام اكواد . ولكن اتضح لي بعد هذه التجارب …

جرب هذا الكود : Private Declare Function GetModuleHandle& Lib "kernel32" Alias _ "GetModuleHandleA" (ByVal FileName$) Private Declare Function GetModuleFileName& Lib "kernel32" Alias _ "GetModuleFileNameA" (ByVal hModule&, ByVal FileName$, ByVal _ nSize&) Priv…

اذا لم تستطع اكتب بريدك وأرسله لك إن شاء الله . ولك تحياتي

إذا كانت المسألة نموذج نموذجين وثلاثة وأكثر لن يؤثر ذلك على الذاكرة تأثيرا واضحاً . ومن الأسهل ترك النموذج الأساس مفتوحا . ولدي قاعدة افتح فيها اربعة نماذج سويا والرام 128 ولم ألاحظ أي فرق في الأداء . وللجميع التحية

الأخ مصراوي وضع التنسيق في مصدر عنصر التحكم يظهر كلمة خطأ في الحقل . ولكن فكرتك دلتني على حل آخر وهو وضع التنسيق في الاستعلام أو عبارة SQL المبني عليها التقرير : اسم جديد: IIf([اسم الحقل]<>0;Format([اسم الحقل];"ثابت");Format([اسم الحقل];"0")) وقد جربت جعل الاس…

لقد وصلتني القاعدة جزى الله ابن مسقط خيراً ، واطلعت على الجداول وارغب أن تعطيني فكرة عن وظيفة كل جدول وماهي الحسابات التي تطبقها في القاعدة وأين تخزن النتائج ؟ وما رأيك أين يمكن وضع حقل تاريخ ؟ وهل هناك مشكلة لو وضعت حقل تاريخ في الجداول ؟ هذه الأسئلة لأنني لم…

الأخ ابو بشاير استخدم في حدث عند التنشيط للنموذج الأول : Me.Requery أو Me.Recalc أو Me.Refresh أحدها ولابد سينفع فجربها كلها وأخبرنا بالنتيجة . ولك تحياتي

إذا أردت ظهور تقويم عربي يعني أسماء الأشهر عربية فاعملي الآتي : 1- انتقل إلى أدوات / عناصر تحكم ActiveX واختر تسجيل ثم اختر الملف Mscomct2.ocx من مجلد WindowsSystem . 2- اختر من إدراج عنصر تحكم ActiveX ثم اختر Microsoft MonthView Control Ver 6 . وللجميع التحية

اهلا وسهلا بك مشتركا جديداً في هذا المنتدى . وبالنسبة للسؤال الأول : انظر الرابط : http://www.arabteam2000.com/vb/showthread....%E4%DD%ED%D0%ED والرابط : http://www.arabteam2000.com/vb/showthread....%E4%DD%ED%D0%ED والرابط : http://www.arabteam2000.com/vb/show…

لا أدري ماذا أقول لك .....:( ولكن جرب أن تحمل القاعدة الى صفحتك الشخصية كملف ZIP مضغوط . ولك تحياتي

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

مازالت الرسالة تظهر : Unrecognized database Format ولك تحياتي

الأخ panadol ارسلت اليك الملف بعد التعديل . الأخوة وجد في المثال الذي ارسله الى الأخ باندول حقلي وقت حاولت معرفة فرق التوقيت بينهما وتخزين الناتج في حقل آخر إى أنني بعد محاولات عدة لم اتوصل سوى الى الكود التالي : Dim ثواني_البداية As Integer, ثواني_النهاية As …

الأخ باندول لم يصلني الملف . ولك تحياتي