ابوخليل

السلام عليكم اظن ان هذه الحالة تظهر بعد حذف أحد النماذج فتبقى صورته عالقة في صفحة المحرر مررت بهذه الحالة ولكني حينذاك كنت على عجلة من امري ولم استقصي السبب وانما عالجت الأمر بفتح قاعدة جديدة ثم استوردت الكائنات من القاعدة المذكورة

ولك بالمثل الحمد لله

تم التعديل باضافة استعلام الحاق للجدول الفرعي مع ضبط التكرار في الجدول افحص ووافني بالنتيجة Abu_Ahmed3.rar

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

مثال بالتحديث الجماعي باستخدام خانة اختيار - باستخدام الاستعلامات او تحويلها الى عبارة sql داخل النموذج ( اختر ما شئت ) - تحديث الدرجة استنادا الى تحديد خانة الختيار - ثم تحديث خانة الاختيار الى الوضع false Abu_Ahmed2.rar

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

الطلب غير واضح اشرح طبيعة عملك وما تقوم به على ارض الواقع شرحا وافيا

لسنا بحاجة الى انشاء جدول جانبي الا حين نريد التعامل مع البيانات حال التكرار وغالبا تكون هذه الجداول مؤقتة والسبب ان الاستعلام يقوم بمهمة التصفية فيمكننا انشاء استعلام تحديد لتصفية البيانات حسب معيار محدد ثم نستخدم هذا الاستعلام داخل النماذج او التقارير حسب الطلب . وكذلك يمكننا جعله مصدر لاستعلام اجرائي . علما ان الاستعلامات الاجرائية يمكنها الجمع بين التصفية والاجراء . اما مسألتك وهي فرز 200 شخص من 400 مثلا لاجراء تحديث لبياناتهم دون غيرهم وبضغطة زر واحدة فكما ذكرت لك في مشاركتي السابقة : لا بد من صفة تجمع بينهم وتميزهم عن غيرهم وتكون موجودة ضمن الجدول مثلا يكون شرط الترقية من درجة الى اخرى لمن امضى عددا معينا من السنوات فيها فحينئذ نستخدم الاستعلام لفرز شيئين : 1- من هم على درجة معينة 2- ومن امضوا سنين محددة آمل ان اكون وفقت في ايصال المعلومة

وهذا تطبيق لتحديث النوعين Abu_Ahmed1.rar

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

يقصد ابو أحمد : لا يصلح وتتم العملية في الاستعلام او النموذج او التقرير هكذا : [القيمة]=[الكمية]*[السعر] اذا لم تتوصل الى مطلوبك ارفق مثالك ليتم التوضيح

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

00/00/0000 ( القناع ) لإلزام المستخدم ادخال التاريخ بصيغة معينة ، بغض النظر عن العرض داخل الجدول وقد يكون فيها تيسير على المستخدم بأن يكتفي بكتابة الارقام فقط حيث تكون فواصل التاريخ موجودة ضمن القناع ولكن هناك اشكالية حين نجعل القناع يبدأ من اليمين ( جرب ! لتلاحظ ) وتعقيبا على اجابتي السابقة : يكفي لحل المشكلة اختيار نوع معين من التنسيق ، وليس القناع شرطا اما yyyy/mm/dd (التنسيق ) وهي للعرض ونستخدمها غالبا في النماذج والتقارير وقد يقرأها أكسس على أنها تاريخ قصير ويستبدلها بـ Short Date

انظر هنا لعلك تجد فائدة http://www.webxpertz.net/forums/showthread.php/37372-GraB-NMEA-string-from-Comm-Port وهنا http://www.bigresource.com/VB-MSComm-PortOpen-wk1MsDZ6r8.html

تمر بنا هذه الحالة عند ترك حقل التنسيق في الجدول فارغا اجعل التنسيق في الجدول Short Date ولقناع الادخال 0000/00/00 للبدء من اليسار او 00/00/0000 للبدء من اليمين

تحفة بديعة لذا لن ندعها تمر هكذا نريد من استاذنا القدير تفضلا وكرما وكما اعتدنا منه شرحا مبسطا أمام هذه الاسطر Private Function sReplace(SearchLine As String, SearchFor As String, ReplaceWith As String) As Integer Dim vSearchLine As String, found As Integer found = InStr(SearchLine, SearchFor) vSearchLine = SearchLine If found <> 0 Then sReplace = 1 vSearchLine = "" If found > 1 Then vSearchLine = Left(SearchLine, found - 1) vSearchLine = vSearchLine + ReplaceWith If found + Len(SearchFor) - 1 < Len(SearchLine) Then _ vSearchLine = vSearchLine + Right$(SearchLine, Len(SearchLine) - _ found - Len(SearchFor) + 1) End If found = InStr(vSearchLine, SearchFor) MyString = vSearchLine Do While found <> 0 sReplace = sReplace + 1 vSearchLine = Left(vSearchLine, found - 1) vSearchLine = vSearchLine + ReplaceWith vSearchLine = vSearchLine + Right$(MyString, Len(MyString) - _ found - Len(SearchFor) + 1) found = InStr(vSearchLine, SearchFor) Loop End Function

من باب المساعدة تم تعديل العنوان

اعتقد انه لا يلزم ، والتجربة خير برهان

لن اطرح افضل مما طرحه استاذنا القدير محمد طاهر هنا http://www.officena.net/ib/index.php?showtopic=228

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

تمام ايضا يمكنك تطبيق الشرط على ثلاث حقول : المعرف ، الصف ‘ السنة بجعلها مفاتيح

سلمت أناملك ،،، هذه يحق تسميتها بالبلاغة البرمجية

اجعل رقم الطالب ورقم الصف مفتاحين

اخي الكريم : انت منذ زمن ليس بالقليل وأنت تبحث عن حل اعلم اخي اننا نقف مكتوفي الايدي وقلوبنا معك فمن يريد ان يتصدى للمحاولة والحل لا بد تواجد شيئين لديه 1- اوفيس اكس بي 2- ميزان لربطه بالجهاز نسأل الله الكريم ان يبعث لك من يعينك

قبل توزيع قاعدة الواجهات على الاجهزة تأكد من : خصائص النموذج / بيانات / تأمين السجلات غير الخاصية الى : سجل محرر الكلام السابق يطبق على جميع النماذج