Eng.Qassim
الخبراء-
Posts
2,303 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
22
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو Eng.Qassim
-
حياك الله اخي استاذ خالد ..انا لم اعمل العلاقة على افتراض ان صاحب البرنامج يعرف ذلك واختصارا للوقت بالمناسبة ..دائما ما اسال نفسي عن الفرق بين القاعدة المسطحة والعلائقية خبرتي محدودة جدا في الاكسل لكن من الواضح انها تعمل كأسس العلائقية
-
وعليكم السلام ممكن تشرح لنا فكرة المشروع وماهية الجداول ..اقصد ماهي وظيفة كل جدول ؟ حتى نتمكن من معرفة العلاقات
-
هههه انا على ابواب التقاعد يا اخي
-
كيف لا يوجد عندك والنافذة تقول ذلك ربما انت غيرت الاسم ولم تغيره في التقرير
-
نسيت ال Between 😂
-
برنامج rar لا يعمل على ضغط قاعدة بيانات محمية بكلمة مرور
Eng.Qassim replied to محمد القدسي's topic in قسم الأكسيس Access
-
وعليكم السلام استخدم Not In (500;501;502;503;504;505)
-
وعليكم السلام وكيف يعرف الاكسس ان القاهرة تابعة لمصر (مثلا) انظر للتعديل كومبوبوكس.rar
-
برنامج rar لا يعمل على ضغط قاعدة بيانات محمية بكلمة مرور
Eng.Qassim replied to محمد القدسي's topic in قسم الأكسيس Access
لا اعتقد بوجود حل لهذه المسألة ربما البديل وضع باسوورد لل Win rar -
مشكلة بكود انشاء فولدرات من خلال حقول النموذج
Eng.Qassim replied to figo82eg's topic in قسم الأكسيس Access
اجعل ال End If الاولى في الاخير (بعد اختها) مع حذف End -
مطلوب مساعدة في استكمال برنامج لحصر عهدة جهة حكومية
Eng.Qassim replied to khaledm123's topic in قسم الأكسيس Access
جملة السكوال تكون هكذا DoCmd.RunSQL "INSERT INTO items ( itemname )SELECT [forms]![Copy Of insertdata]![itemcod] AS myItem;" ولا داعي للسطر Me.Requery لانه يعيدك الى الصفحة الاولى بالنسبة لتقرير البحث اعملي نفس الشيء كما هو في تقرير الاصناف لا اعلم ان كنت تصدين شيء اخر ..ممكن تفصيل اكثر احاول لا ارفع الملف حتى لانثقل على الموقع -
لنترك الجدول الوسيط وجرب المرفق التالي تكرار موظف.rar
-
-
تغيير تاريخ الطباعة من التقرير الى حقل فى النموذج
Eng.Qassim replied to محمد احمد لطفى's topic in قسم الأكسيس Access
بصراحة لم افهم شيئا استاذ @محمد احمد لطفى ماهي علاقة التاريخ الذي تدخلة للطباعة بالتاريخ الموجود في Q1 انا حاولت ادخل تاريخ اليوم للطباعة فيظهر لي خطأ لان التاريخ غير موجود في استعلام Q1 ربما لاني لم اتجول بالبرنامج -
مسح جميع البيانات من جدول ما عدا السجل الاول
Eng.Qassim replied to ِAbo_El_Ela's topic in قسم الأكسيس Access
مشاركة مع اساتذتي DELETE USER.id FROM USER WHERE (((USER.id) Not In (SELECT TOP 1 USER.id FROM USER))); -
مطلوب مساعدة في استكمال برنامج لحصر عهدة جهة حكومية
Eng.Qassim replied to khaledm123's topic in قسم الأكسيس Access
من مصدر سجلات تقرير الاصناف تقوم بعملية تجميع مع حذف حقل التاريخ وتعمل SUM للكمية والمبلغ كما في الصورة وفي وضع التصميم للتقرير تقوم بتغيير مصدر سجلات الكمية والمبلغ حسب الحقول التي انشأها استعلام التجميع وللتجميع حسب الصنف Group on itemname كما في الصورة وهذا ينطبق على تجميع حسب المخزن -
مطلوب مساعدة في استكمال برنامج لحصر عهدة جهة حكومية
Eng.Qassim replied to khaledm123's topic in قسم الأكسيس Access
وعليكم السلام ..نجيها وحدة وحدة بالنسبة لهذا السؤال يمكن عمل نموذج ادخال مصدر بياناته جدول insertdata ويكون حقل itemcod نص وليس رقم وفي حدث بعد تحديث الحقل نعمل جملة سكوال لالحاق اسم الصنف الى جدول الاصناف..وهذا ينطبق على حقل المخزن ايضا ربما احد الاخوة لديه طريقة اخرى -
هل كل الاقسام في جدول واحد ..ام كل قسم في جدول منفصل؟
-
اعمل نموذج اخر وامسح النموذج Form1 واجعل مصدر بياناته الجدول..وسيشتغل معك باذن الله
- 22 replies
-
- ابا جودى
- حقول إجبارية
- (و7 أكثر)
-
ان كان ماشغلك هو الافطار ...الف عافية على قلبك انا افطاري مازال امامي هو شوربة خضار ... حكم العمر يا اخي 😂
-
لديك مشكلة في التحميل اخي @ابو عبد الله العراقي اعمل البرنامج بنفسك وهو ليس صعبا انظر للصورة كل حقل مطلوب اعمل ال Tag=* ثم انسخ الموديول والصقة لديك Function RequiredData(ByVal frm As Form) On Error Resume Next Dim ctl As Control Dim err As Integer For Each ctl In frm.Controls Select Case ctl.ControlType Case acTextBox, acComboBox, acListBox, acCheckBox, acOptionButton, acOptionGroup: If ctl.Tag = "*" Then If IsNull(ctl) Or ctl = "" Or ctl = Null Then ctl.BackColor = 15531489 ctl.SetFocus err = err + 1: MsgBox "Please fill in the " & ctl.Controls(0).Caption: Exit Function Exit For Exit Function Else ctl.BackColor = 16777215 End If End If End Select Set ctl = Nothing Next ctl End Function وانظر لهذا السطر ...الذي يمر على جميع مربعات النصوص التي يكون ال Tag=* If ctl.Tag = "*" Then فحينما يجد المربع فارغ يعطيك تحذير ويغير لون الخلفية
- 22 replies
-
- ابا جودى
- حقول إجبارية
- (و7 أكثر)
-
استاذي العزيز @مبرمج سابق او استاذ خالد لماذا لانجمع الحقلين في استعلام ونجعل المعيار له مساوية لقيمة الكومبوبوكس ؟
-
لا تنسى استاذي العزيز ..ان البلد (اي بلد) له تاثير كبير على الاسعار ...فالبلد (س) الذي يكثر فيه المبرمجون يختلف عن البلد (ص) الذي يقل فيه المبرمجون وكما قيل قديما ..كناقل التمر الى هجر او كما نقول في العراقي ...قيم الركاع من ديرة عفج اقصد انه يجب ان تكون اسعارك تنافسية في بلد يكثر فيه المبرمجون ...اضافة الى اللمسات السحرية التي تجذب الزبون تحياتي لكم
-
افكر بطريقة لا اعلم ان كانت صحيحة ام لا .. لدينا جدول موظفين وجدول اقسام ..والاخير مربوط بالاول بمعرف اسم القسم في بداية التكويد للموظفين ...نقوم بكتابة اسم الموظف ثم نختار اسم القسم من مربع تحرير (الذي يظهر لنا اسم القسم ).. وعند حفظ المعلومات يتم الحاقها بجدول اخر بنفس التاريخ وحين ندخل على صفحة ذلك الموظف يظهر لنا قسمه الذي اخترناه اول مرة ...وعند تغيير القسم والحفظ ...يتم الحاق تلك المعلومات الى الجدول الثاني بتاريخ اخر لاننا سنحتاجها عند عمل تقرير ومواقع عمل ذلك الموظف ولانحتاج لرسالة تنبيه ...لان صفحة الموظف حين فتحها ستظهر لنا اخر قسم عمل فيه دة اقتراحي في القضية ☺️
-
برنامج للتحميل (ادارة مزارع الماشية )
Eng.Qassim replied to Elsayed Bn Gemy's topic in قسم الأكسيس Access
اطلب ذلك بشكل عام من بقية الاساتذة والاعضاء مع تحديد ماتريده ..فهناك من الخبرات الكبيرة الموجودة وان كنت مبتدأ في اكسس فيمكنك عمل برنامج بسيط لمشروعك وتطرح اسألة لكل التفاصيل حتى يتكون لديك برنامج بالمجان انا متأكد ان الكثير سيساهمون في مساعدتك تحياتي