
ابو البشر
الخبراء-
Posts
704 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
10
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو ابو البشر
-
تفضل ..... Me.an = Me.القائمة27.Column(1) Me.an1 = Me.القائمة27.Column(2) Me.an2 = Me.القائمة27.Column(3) Dim db As DAO.Database Dim rs As Recordset Set db = CurrentDb Set rs = db.OpenRecordset("my_q") rs.AddNew rs!a = Me.القائمة27.Column(1) rs!b = Me.القائمة27.Column(2) rs!c = Me.القائمة27.Column(3) rs!h = Me.المعرف rs.Update rs.Close Set rs = Nothing DoCmd.SetWarnings False DoCmd.RunSQL "DELETE w.q, w.w, w.e FROM w WHERE (((w.q)=[forms]![my_z]![an]) AND ((w.w)=[forms]![my_z]![an1]) AND ((w.e)=[forms]![my_z]![an2]));" DoCmd.SetWarnings True MsgBox "تم اضافة البيانات", vbInformation DoCmd.Requery استخدمنا هذا الكود .... test (12).accdb
-
-
اضف فرز حسب كود اللجنه للتقرير فقط ...
-
السلام عليكم ورحمة الله وبركاته الاخوة الزملاء في منتدانا الحبيب لدى البرنامج المرفق خاص باعطاء مهلة للمستخدمين للبرنامج وذلك قبل اغلاق البرنامج ... حيث يتم اعلامهم عن طريق اشعارات الويندوز بدلا من رسائل الاكسس ( والسبب في استخدام هذه الاشعارات لانها تبنه المستخدم بالاشعار حتى وان كان قد قام بتصغير البرنامج ..... السؤال : هل يمكن عند الضغط على الاشعار من المستخدم أن يفتح الاكسس على نموذج اخر مثلا frm_main بدلا من النموذج المفتوح سلفا ..... اي توجيه الاشعار للقيام بمهمة محدده في البرنامج ؟؟؟ بارك الله فيكم . AutoLogout.accdb
-
تفضل .... Month now sum.accdb
-
نموزج ياخذ من جدول1 عدد 3 بيانات ويضع الجميع فى جدول2
ابو البشر replied to youssef rasslan's topic in قسم الأكسيس Access
تفضل ... المأموريات - 001.accdb -
-
كلامك كله صيحيح لأنه يعمل على موقع نور .... فيموقع نور يتم تصدير جداول المعلمين وجداول الطلاب ومنها يمكن الربط بين جداول الطلاب والمعلمين بطريقه تسهل عليك كا ما تريد فهله فيما بعد .... لكن طالما انك بدأت بطرقك هذه إذا لابد من البحث من مخرج ..... وقد تجد لها حل من الاخوة الخبراء ...
-
أخي فايز ... المفروض كل شعب المعلم الواحد تكون مرتبطة بالمعلم نفسه من خلال علاقة يفهمها البرنامج .... حتى اذا كتبت الكود في التصدير للاكسل يبدأ بالمعلم س وينفذ تصدير كل شعبه بالترتيب الى ملف الاكسل ثم يبدأ بمعلم آخر وهكذا تكون العملية صحيحة في رأي الخاص .... بارك الله في الجميع
-
ممكن مرفقك الذي تعمل عليه للتطبيق .....
-
نموزج ياخذ من جدول1 عدد 3 بيانات ويضع الجميع فى جدول2
ابو البشر replied to youssef rasslan's topic in قسم الأكسيس Access
تفضل ..... المأموريات - 00.accdb -
اضافه قيم الى حقل بناء على قيمه فى حقل اخر
ابو البشر replied to mohd87's topic in قسم الأكسيس Access
ممكن مرفق مصغر لما تريد ... ليتم التطبيق عليه -
هل تم نقل القاعدة من مكان لاخر
-
حياك الله
-
ولحذف الجدول في حال وجودة استخدم هذا الكود في اعلا الكود السابق .... DoCmd.DeleteObject acTable, "Temp"
-
-
ملفك بعد التعديل عليه SS Forms.accdb
-
اضف زر في التقرير ثم ضع هذا الكود وظيفته ::: تكوين جدول باسم Temp ثم تصدير البيانات الموجوده في التقرير اليه .... الان تصتطيع فعل ما تشاء سواءا تكوين رسم بياني أو تصديرة للاكسل ... جرب ووافينا بالنتيجة Dim strSQL2 As String strSQL2 = "CREATE TABLE [Temp] ([Assessment] TEXT(5),[Reassessment] TEXT(5), [Multidisciplinary] TEXT(5),[Followup] TEXT(5),[LAMA] TEXT(5),[MLSD] TEXT(5),[Meeting] TEXT(5),[MOH] TEXT(5),[Rounds] TEXT(5),[Total] TEXT(5));" DoCmd.RunSQL strSQL2 On Error Resume Next Dim rs2 As Recordset, Dbs As DAO.Database Set Dbs = CurrentDb Set rs2 = Dbs.OpenRecordset("Temp") rs2.AddNew rs2.Fields(0) = [Reports]![Total of Assessment]![Count] rs2.Fields(1) = [Reports]![Total of Reassessment]![Count] rs2.Fields(2) = [Reports]![Total of Multidisciplinary]![Count] rs2.Fields(3) = [Reports]![Total of Follow up]![Count] rs2.Fields(4) = [Reports]![Total of LAMA]![Count] rs2.Fields(5) = [Reports]![Total of MLSD]![Count] rs2.Fields(6) = [Reports]![Total of meeting]![Count] rs2.Fields(7) = [Reports]![Total of MOH]![Count] rs2.Fields(8) = [Reports]![Total of Rounds]![Count] rs2.Fields(9) = [Assessment] + [Reassessment] + [Multidisciplinary] + [Followup] + [LAMA] + [MLSD] + [Meeting] + [MOH] + [Rounds] rs2.Update Set rs = Nothing
-
طيب ... بارك الله فيك ممكن مرفق بسيط لما تريد ... حتى نطبق عليه
-
هناك العديد من تلك الامثلة في المنتدى عند البحث تجدها مثل هذه
-
ممكن مرفق بسيط للتطبيق عليه
-
مشكلة في التجميع والطرح من خلال استعلام يقرأ من اربع جداول
ابو البشر replied to عبد اللطيف سلوم's topic in قسم الأكسيس Access
هل هذا ما تريد أخي الكريم .... مشكلة الجمع.accdb -
كود لنقل البيانات من النموذج الرئيسي والفرعي إلى الجدول
ابو البشر replied to نجم30's topic in قسم الأكسيس Access
أخي ابا عبدالملك ...... عنوان الموضوع لا يتطابق مع فحوى الموضوع طيب أنظر بالنسبة لمحمد في الجدول لدية عمران ومهنتان هل تريدها نقلها جميعا الى الجدول أم ماذا ؟؟؟ -
اخي الكريم من اين يتم فتح التقرير المشار الية من النموذج حتى نستطيع معاينتة بالطريقة الصحيح ويتم التجربة عليه ؟؟؟
-
تفضل ..... ولكن عنوان الموضوع يجب ان يكون موافق لما في داخل الموضوع ( قوانين المنتدى ) ... بارك الله فيك استخلاص تاريخ الميلاد.rar