الدكتور خضر الرجبي

السلام عليكم أخي فتى الوادي ، بارك الله فيك لقد تابعت لك المشكلة التي تتحدث عنها في أروقة ميكروسوفت وهم يعترفون بوجود هذا الخطأ الفظيع في الترقيم التلقائي هنا الأعتراف ويدعون أن الحل موجود في إنزال Jet 4.0 أخر تعديل بما يتناسب مع نسختك من الأكسيس وذلك هنا . أقترح عليك أن تقوم بذلك وتجرب. مع الاحترام والتقدير

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

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

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

السلام عليكم أخي فتى الوادي ، بارك الله فيك هل حلت المشكلة ؟! مع الاحترام

السلام عليكم إخواني وأخواتي ، بارك الله فيكم جزء صغير من حلمي الكبير يتحقق في هذا الأصدار ... محرك بحث في مواضيع الأكسيس في كبرى المنتديات العربية المتخصصة (الفريق العربي للبرمجة وأوفيسنا) وفي منتدى المحيط العربي ومنتداي المتواضع الواعد (ولا فخر). هذا المحرك الذي أعددته من أجل خدمتكم وراحتكم في الوصول إلى موضوعات المنتديات والذي يوفر عليك الكثير الكثير من العناء في البحث عن بغيتك. 10,000 ، نعم عشرة ألاف موضوع ، ليس هذا فحسب بل ومصنفة ، نعم مصنفة حسب التصنيفات المشتركة بين جميع المنتديات العربية . التصنيفات المتوفرة في المحرك (التحليل والتصميم ، الجداول، العلاقات، الاستعلامات، النماذج، التقارير، صفحات الأكسيس، الماكروات، البرمجة ، الحماية والآمان ، الأشرطة والأدوات ، رسائل الخطأ ، الشبكات والمستخدمين ، لوحات التبديل ، الجداول المحورية، معالجة الصور، ملقم SQL ، مستندات XML ، عناصر التحكم ActiveX ، البرامج والأمثلة، الكتب، المواقع المفيدة، أدوات مساعدة، مقلم MySQL ، الملتميديا، المشاريع، الاقتراحات، الاستطلاعات، الدروس، الدورات، التهاني، الاعلانات، المجلات) هل هذا كل شيء عن المحرك ، لا ... إذا لم تعجبك كل التصنيفات السابقة ضع كلمات البحث التي ترغب بالبحث عنها وابحث عنها مجتمعة أو متفرقة (و، أو) ... هذا هو الأصدار الأول وأعدكم في مطلع كل شهر ميلادي أن أزودكم بالإصدار المحدث وبدون هذا الشرح الممل (اسف للإطالة) مع احترامي وتقديري لكم جميعاً الملف بعد التعديل AccessSearchEngine1_1_.2.rar

السلام عليكم أخي فتى الوادي ، بارك الله فيك كما وأنصحك بالأطلاع على الترقيم التلقائي, حل لمشكلة الترقيم التلقائي السنوي لأخي الجهبذ أبا هادي بارك الله فيه وحفظه من كل سوء. مع الاحترام

السلام عليكم أخي فتى الوادي ، بارك الله فيك الحل في الدالة التي أعدها خصيصا لهذه الغاية المهندس محمد طاهر ، فأرجو أن تبحث عنها في هذا المنتدى ، وهي أيضا تستخدم DMax . مع الاحترام

السلام عليكم أخي woowoow ، بارك الله فيك وبعد إذن أخي أمير عاطف ، أود المشاركة هنا 1. حيث أن المتغيرين a,b درجة المدير والموجه تسمحان بالقيمة الفارغة Null فهما متغيران Variant 2. ربما تستغربان الحل ، فإنه لا حل لحساب المتوسط لهذه المسألة التي تبدو غاية في البساطة إلا الحل المعقد التالي وهو : الوسط الحسابي = (Nz(Nz(a, b), 0) + Nz(Nz(b, a), 0)) / 2 واسمحا لي أن أشرح لكما كيف تعمل المعادلة السابقة إذا كانت a = null فإننا نجعل قيمة b =a وإذا كانت قيمة b = null فإننا نجعل النتيجة 0 وهكذا للجزء الثاني ولكن بعكس المتغيرات . مع الاحترام والتقدير

السلام عليكم أخواي حسن وسهل ، بارك الله فيكما عندما قرأت الحل استغربت ولكني عندما قرأت المثال الرائع لأخي سهل فهمت ما نسي ذكره سهوا ، أود إيضاحه هنا لئلا يحدث إلتباس. 1. نعرف قيمة text2 في النموذج هكذا =DLookUp("id","t1","id=text1") 2. نعرف إقتران التحقق من عدم التكرار لمربع النص text1 Private Sub text1_AfterUpdate() text2.Requery If Not IsNull(text2) Then MsgBox "الرقم مكرر ", vbCritical, "تنبيه" Me.Undo End If End Sub وما سبق هو توضيح لحل أخي سهل ليس إلا. مع احترامي وتقديري لكم

السلام عليكم أخي فتى الوادي ، بارك الله فيك المثال الذي وعدتك به ، أملا أن ينال إعجابك. Valley_Younker.rar

السلام عليكم حل جميل جدا من أخي فتى الوادي ، بارك الله فيك أخي رامي ، بارك الله فيك إذا كنت مصرا على ذلك استخدم الاقتران nz . مثال =nz(x,0)<>0 في هذه الحالة إذا كانت قيمة x = null فإن رسالة التحقق من الصحة تظهر . مع الاحترام

السلام عليكم أخي فتى الوادي ، بارك الله فيك بكل سرور ، غدا صباحا بإذن الله لك المثال. مع الاحترام

السلام عليكم أخواي سلمان والفيلسوف111 ، بارك الله فيكما ما شاء الله أعجبني الموضوع والحل ولتتم الفائدة أود الأشارة إلى أن In يمكن استخدامها للإشارة إلى قاعدة بيانات خارجية واحدة فقط في جملة Select ولها شكلين متكافئين كما في المثال التالي هما : ... FROM Table IN " [dBASE IV; DATABASE=C:\DBASE\DATA\SALES;];" أو ... FROM Table IN "C:\DBASE\DATA\SALES" "dBASE IV;" مع الاحترام والتقدير

السلام عليكم أخي فتى الوادي ، بارك الله فيك ما تطلبه هو ترحيل قيم عناصر غير منضمة في نموذج إلى جدول والطريقة هي كما يلي : INSERT INTO target [(field1[, field2[, ...]])] SELECT (value1[, value2[, ...]) حيث target هو اسم الجدول الذي تضيف فيه البيانات. field1 ، field2 وهكذا أسماء الحقول التي ستنضم لها البيانات بالترتيب. value1، value2 وهكذا هي العناصر غير المنضمة من النموذج . ويوضع هذا الكود في حدث عند النقر في زر التنفيذ . مع الاحترام

السلام عليكم أخي رحال ، بارك الله فيك أذكر أنني شاركت مرتين في الأجابة عن أسئلة شبيهة بسؤالك أرجو أن تراجع هذه المواضيع الثمانية عشر في الأرشيف هـنـا. مع الاحترام

السلام عليكم أخي ana ana ، بارك الله فيك الحل في بناء القوائم المنسدلة وذلك إبتداءً ببناء شريط أدوات جديد ووضع فيه الخيارات التي تريدها من جميع كائنات القاعدة (الجداول، التقارير ، الاستعلامات، النماذج ،...) ومنتدانا غنيٌ والحمد لله بالشرو ح الكثيرة عن هذا الموضوع ، أرجو منك البحث في الأرشيف وخصوصا في موضوعات أخرى . مع الاحترام والتقدير

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

السلام عليكم أرجو مراجعة هذا الموضوع ، يمكن تستفيد مع الاحترام

السلام عليكم بارك الله فيك ، مثال جميل. مع الاحترام

السلام عليكم أخواي نورش وسهل ، بارك الله فيكما أقدم لكما المثال المطلوب مع الاحترام Abbreviations_To_Words_v1.rar

السلام عليكم في التقرير وفي مصدر البيانات لمربع النص نضع =Forms!اسم مربع النص في النموذج!اسم النموذج ولا تنسى اشارة المساوة =. مثال =Forms!F!T1 مع الاحترام

السلام عليكم أختي راوية وأخي رضوان تحياتي لكم. بعد دراسة مستفيضة للموضوع وللسيناريو التي تحدثت عنه الأخت راوية أستطيع القول: 1. بالنسبة لعملية النسخ للحافظة ومنها إلى جدول في وورد بدون اسماء الحقول هذا أمر لا يمكن حيث أن خاصية النسخ من الجدول في الأكسيس تدرج أسماء الحقول تلقائيا ولا أرى ما يغير هذه الميكانيكة في النسخ رغم بحثي الطويل وأعتقد أنه لا يوجد. 2. يجب تغيير استراتيجية الحل وهناك استراتيجية ستكون ناجحة بالتأكيد وهي أن تقوم الاخت راوية بتعبئة المعلومات التي يختارها المستخدم (المدلل) في مربع نص خفي في النموذج وعندما يضغط على زر النسخ يتم تحويل التركيز لذلك المربع والنسخ منه. 3. أعتقد أن الأخت راوية حسبما أرى تستطيع القيام بذلك برمجيا لوحدها وبدون مساعدتي وإن لم تنجح فأرجو إعلامي وانصحك اختي راوية أن لا تحصري تركيزك على طريقة محددة في حل المسائل فهذا الامر أحيانا لا ينجح لأن لكل طريقة واستراتيجية حدود لا يمكن تجاوزها. مع الاحترام والتقدير

السلام عليكم بما أنك مصرٌ عل التغميق فقد وصلت لك إلى الحل Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) Const bold As Byte = 20 Me.FontBold = True V = Me.ScaleHeight / 2 R = Me.ScaleHeight / 3 If Me.Grade < 50 Then For i = 0 To bold Me.Circle (5570, V), R + i, vbRed Next i End If End Sub درجة التغميق موجودة في أول سطر غيرها كما تحب من 20 إلى أي عدد مع الاحترام

السلام عليكم الأخت راوية ، بارك الله فيك أنا كنت شاعر من البداية إنك مش ممكن تطرحين مسألة سهلة ، ولكني في البداية كذبت نفسي. والأن خلاص كل شيء أصبح واضح قبل الدخول للموضوع فالمعادلة هي راوية = مسائل صعبة الأن وضح السيناريو تماماً ، سأحاول إيجاد حل (أن شاء الله) مع الاحترام