أحمد الحربي

أخي الكريم عاشق أكسس .. بالنسبة لي فلا أرى في ما تفضل به الأخ صاحب الموضوع أي تكبر .. فنرجوا عدم أخذ الأمور بحساسية فوق اللازم ( لا ألومك فالجو متقلب هذه الأيام ) كما أرجو أن لا تغضب علي ولكن أبين وجهة نظر ليس إلا ومن ناحيتي فأنا أؤيد مثل هذه الطريقة فما استفد…

أولاً .. السلام عليك ورحمة الله وبركاته يا أستاذنا المبدع فهد ثانياً .. الذي فهمت من السؤال هو : من السنة الأولى حتى الخامسة تحسب نقطة واحدة ومن السنة السادسة وفوق تحسب نقطتان عن كل سنة بالإضافة إلى عدد نقاط السنوات الأولى يعني إذا كانت 5 سنوات فالنقاط 5 نقاط …

من قائمة أدوات >> بدء تشغيل >> خيارات متقدمة ضع (صح) على ( استخدام التقويم الهجري)

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

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

تستاهل وهذه تثبيته

الكود بالكامل : Dim sqlInsert As String Dim sqlDelete As String Dim DbADO As New ADODB.Connection Set DbADO = CurrentProject.Connection sqlInsert = "insert into tbl2 select * from tbl1" sqlDelete = "delete tbl1 from tbl1" DoCmd.SetWarnings False DbADO.BeginTra…

بارك الله فيك أخي ا بن مسقط .. لا عدمناك أضيف .. أو إي إصدار للأداة Microsoft ADO Ext. 2.7 for DDL And Security بالنسبة للجداول بالحروف العربية فقد عدلت الكود .. فقط استبدل الموجود بالتالي sqAdd = "INSERT INTO [" & Me.Totable & "]" sqAdd = sqAdd & " IN " & "'"…

جربوا هذه النسخة بعد التعديل .. ويا رب تنجح إرفاق2.rar

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

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

بالنسبة لي فقد صنعت عدة برامج من خلال الأكسس mdb و adp وكلها أخطط لها بالورقة والقلم من الإلف إلى الياء .. ولا أخرج من البيت إلا وفي حوزتي ورقة وقلم .. لأنه تخطر خواطر عند إشارات المرور أو في إي مكان فأكون جاهزاً لتدوينها قبل أن تذهب بها رياح النسيان لذا .. فب…

أخي العزيز ابن مسقط لا يظهر لدي الخطأ الذي ذكرته .. علماً بأن المثال على آكسس2000 لكن أزل الدالة Trim بقوسيها .. فربما تنجح

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

أخي الكريم رامي .. أعتذر إليك عن عدم استطاعتي عمل ما تريد ولكن أخي رامي .. الطريقة التي تطلبها غير سليمة .. فأنت تقوم بالمجازفة بالسجلات والتي قد تكون مهمة .. من ناحية أخرى فطريقة الاستعلامات التي تريدها أستطيع أن أٌقول أنها (يدوية) وليست (أوتوماتيكية) وبالتال…

ما شاء الله عمل ممتاز على اسمك راشد

إنشأ نموذجاً ضع حقلاً وسمه مثلاُ txtTime في خاصية مصدر عنصر التحكم لهذا الحقل ضع : =Time() في خصائص النموذج : خاصية (الفاصل الزمني لعداد الوقت ) ضع قيمة 1000 يعني ثانية واحدة عند حدث (عند عداد الوقت) اختر إجراء حدث ثم اكتب التالي : Me.txtTime.Requery وبالتوفيق…

في رأيي .. أن تقوم بتقسيم جدول المقررات إلى جدولين الأول : جدول المواد sub_id name MaxStu MaxStu = حقل يحمل قيمة رقمية للعدد المسموح به في المادة فينظر البرنامج إلى عدم إتاحة طلاب أكبر مما هو محدد في هذا الحقل .. فعند تسجيل طالب إلى المادة يتحقق من العدد المسج…

لكي يجيبك الإخوة الذين تعاملوا مع الشركات وصنعوا لها برامج لا بد من الإجابة على عدد من الأسئلة مثلاً : س/ كيف حجم البرنامج وإمكانياته ؟ س/ هل البرنامج مكتبي أي يعمل على جهاز واحد أم على شبكة ؟ س/ هل لديه إمكانية النسخ الاحتياطي والعودة لنسخة احتياطية ؟ س/ هل ي…

قبل عبارة الحذف ضع هذه التعليمة DoCmd.SetWarning False