-
Posts
1727 -
تاريخ الانضمام
-
Days Won
5
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو أبو عبدالله الحلوانى
-
هل من الممكن زيادة report width الى 80سم
أبو عبدالله الحلوانى replied to hamdy1111's topic in قسم الأكسيس Access
-
تصفية سجلات نموزج فرعى بناءا على حقل بنموزج رئيسى
أبو عبدالله الحلوانى replied to أبو حوده's topic in قسم الأكسيس Access
نعم أزلت حقول الربط بين الرئيسى والفرعى وكذلك ازلت كود كان يضعه الأخ بحدث عند الفلترة بالنموذج الفرعى وقمت بتعديل مصدر السجلات بالفورم الفرعى بوضع المعيار الذى ستتم عليه الفلترة أركز بحل المشكلة التى يعرضها الموضوع فحسب ولا أقوم بفحص كامل للبرنامج المرفق تارك استنتاج ذلك لصاحب البرنامج فقد تعلمنا هكذا -
تصفية سجلات نموزج فرعى بناءا على حقل بنموزج رئيسى
أبو عبدالله الحلوانى replied to أبو حوده's topic in قسم الأكسيس Access
تفضل تم التعديل أرجو أن يكون هو المطلوب تمنياتى بالتوفيق اجازات.rar -
جزاك الله خيرا ولكن باعتقادى هذا الكود لجلب البيانات ولا علاقة له بحجما
-
الحمد لله ممكن تتفضل بطرح هذا الكود هنا لتعم الفائدة ولك جزيل الشكر
-
بامكانك استخدام التنسيق الشرطى لفعل ذلك ولكنى غير متأكد بالضبط من امكانية فعل هذا قم بالبحث عن التنسيق الشرطى داخل المنتدى لعلك تجد مايفيدك بهذا الأمر وجدت لك هذا الموضوع لعله يفيدك تفضل
-
وعليكم السلام ورحمة الله وبركاته بامكانك أن تجعل نوع البيانات بالحقل التابع له مربع النص مذكرة (Memo) كما بالصورة جرب ووافنا بالنتائج
-
تصفية سجلات نموزج فرعى بناءا على حقل بنموزج رئيسى
أبو عبدالله الحلوانى replied to أبو حوده's topic in قسم الأكسيس Access
ممكن حضرتك تضيف بعض البيانات الغير حقيقية للتجربة عليها وتقتصر بالمرفق على النموذج الرئيسى والفرعى فقط الذى تحتاج التعديل عليه هذا سيجعل الوصول لموطن المشكلة أسرع -
جرب هذا ووافنا بالنتائج ولكن نصيحتى أن تستخدم حروف انجليزية فى تسمية الجداول والحقول هذا سيسهل عليك أمور كثيرة وبامكانك استخدام خاصية الكبشن للتسمية العربية وعلى كل هذا التعديل شمل توضيحا لذلك اجماليات.rar
-
أولا - أستاذنا / elkareee بارك الله فيك كلمتك اقشعر لها بدنى - المبالغة بالمدح توقع فى عمل الشيطان وانما أنا عبد حقير فقير الى عفو ربى غفر الله لى ولك - وزادك فضلا ورفعة وعلما ثانيا - ما استطعت فهم تسمية حضرتك أحببت أن أناديك بحروف عربية ( لأنى لغتى الأجنبية ممتازة كما تعلم ) فهلا ساعدتنا للناديك باسم تحبه وترضاه نفسك. ثالثا - الكمبو بوكس يسمح لك بالكتابة ويسهل عليك عنائها فى نفس الوقت فعند كتابة الأحرف الأولى تجده أحضر لك باقى الكلمة وعموما اذا أردت التحول الى تكست بوكس يلزم عليك تغير معيار فلترة البيانات الى اسم المنتج هذه ما فهمتها
-
مطلوب مقارنه بين اكسيس و sqlite وايهما افضل
أبو عبدالله الحلوانى replied to خزيم's topic in قسم الأكسيس Access
السلام عليكم ورحمة الله وبركاته مارأيك بالجمع بينهما للاستفادة من امكانات كلا البرنامجين معا راجع هذا الموضوع وهناك كثير من الموضوعات بخصوص هذا الشأن ولكن مع قليل من البحث -
ممكن صيفة أمر ( تكرار السجل )
أبو عبدالله الحلوانى replied to أبو نادر's topic in قسم الأكسيس Access
ما عاش اللى يجعلك تخبص ليش ما قلت هيك من الأول واش لون تستغنى عن كل ها الشىء ونكتفى باهدول السطور فقط DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy DoCmd.RunCommand acCmdRecordsGoToNew DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdPaste ولكن لابد من الوقوف على السجل المراد تكراره قبل دعس الزر طبعا انا بحاول التكلم بلهجتك (من شان هيك تلقانى ممتاز ) على فكرة اتفقنا على -
السلام عليكم ورحمة الله وبركاته اذا كان ما تقصده أنك تريد فتح الفورم الفرعى على السجل المحدد فقط وليس عرض كل السجلات أولا - لنفترض أن الفورم الرئيسى به حقل T1 والذى يحوى نفس الرقم الذى هو المفتاح الأساسى بالفورم الفرعى ولنفرض أن هذا الحقل بالفورم الفرعى اسمه T0 . اتفقنا الى هنا ثانيا - استخدم هذا الكود لفتح وفلترة البيانات فى آن واحد (ما رأيك ) DoCmd.OpenForm "ن_نماذج_فرعية", , , "T0 =" & Me.T1 والآن قم بالتجربة ووافنا بالنتائج
-
ممكن صيفة أمر ( تكرار السجل )
أبو عبدالله الحلوانى replied to أبو نادر's topic in قسم الأكسيس Access
وعليكم السلام ورحمة الله وبركاته أولا - فكرة تكرار السجل هى عملية نسخ ولصق للسجل الذى تريد تكراره ثانيا - هذا هو الكود وقد استخرجته لك من معالج انشاء الأزرار بالأكسس وهذا هو: On Error Resume Next DoCmd.RunCommand acCmdSelectRecord If (MacroError = 0) Then DoCmd.RunCommand acCmdCopy End If If (MacroError = 0) Then DoCmd.RunCommand acCmdRecordsGoToNew End If If (MacroError = 0) Then DoCmd.RunCommand acCmdSelectRecord End If If (MacroError = 0) Then DoCmd.RunCommand acCmdPaste End If If (MacroError <> 0) Then Beep MsgBox MacroError.Description, vbOKOnly, "" End If Command203_Click_Exit: Exit Sub Command203_Click_Err: MsgBox Error$ Resume Command203_Click_Exit وأخيرا - تمنياتى بالتوفيق ولا تنسانا من دعائك