jjafferr

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

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

وعليكم السلام هذه طريقتي ، بمشروع متكامل: http://www.officena.net/ib/topic/60235-هدية-ربط-الصور-وملفات-pdf-بالنموذج،-وتشغيل-الماسح-الضوئي/ ومثل ما قال أخونا ابو خليل: ابحث عن "اكثر من صورة" ، مثال مختصر للموضوع اعلاه: http://www.officena.net/ib/topic/62143-هدية-سحب-اكثر-من-صورة-من-الاسكنر-وتحويلها-الي-pdf-او-صور-مسلسلة/ جعفر

حياك الله الشئ المهم معرفته هو: 1. اذا اردت 3 سجلات في التقرير فقط ، استخدم رقم 3 ، واذا اردت 4 سجلات في التقرير استخدم الرقم 4 ، وعلى هذا الاساس تستخدم الرقم الصح لعدد سجلات التقرير ، 2. هذه المعادلة لا تتغير ، والتقرير يعتمد على هذا الحقل في عمل المجموعة ، وهذين الحقلين يمكن استخدامهما في اي برنامج ، والتغيير يكون في مسميات الحقول في رقم 1: . والنتيجة (لاحظ الحقل Int_S ، كما اشرت لك في رقم 2 اعلاه ، تلاحظ كل 3 سجلات برقم مسلسل): . وهكذا نعمل مجموعة للحقل Int_S : . والنتيجة كما في مشاركتي السابقة: البرنامج بين يديك ، فاعمل به ما تشاء جعفر

السلام عليكم بعدما تختار اسم المريض ، وتختار جميع زياراته ، ترى جميع زياراته في حقل Visit_Date ، وعندها تستطيع ان تنقر مرتين على التاريخ الذي تريد ، فسيتم تصفية النموذج على اساسه وهذا شكل التقرير ، كل 3 ادوية مجموعة مع بعض: جعفر 298.Medication.accdb.zip

السلام عليكم أخي عصام الكود بحاجة الى مسافة قبل كلمة Where ، فيصبح الكود الصحيح هكذا: DoCmd.RunSQL "UPDATE main SET main.responsable ='" & [TempVars]![loginid] & "' WHERE (((main.ID)=[forms]![new txn]![issue id]))" وفي برامجي ، دائما اجزّء الكود الى اسطر ، حتى لا اقع في مثل هذا الخطأ ، فيكون الكود هكذا (لاحظ المسافة قبل Where) : mySQL = "UPDATE main SET main.responsable ='" & [TempVars]![loginid] & "'" mySQL = mySQL & " WHERE main.ID =[forms]![new txn]![issue id]" DoCmd.RunSQL mySQL جعفر

وعليكم السلام رجاء وضع الكود الكامل الذي تستخدمه للأمر Update ، مع الاسطر الاخرى من الكود التي تواجه فيها مشكلة (احيانا ) ، ولماذا تستخدم هذا الامر بالذات؟ جعفر

السلام عليكم رجاء مطالعة المرفق ، فهو حسب ما ذكرته انا في مشاركتي السابقة رجاء تفسر شو معنى افتح "وصفة جديدة" ؟ هل معناه انك تريد عمل فرز للأدوية عند طباعتها ، بحيث كل وصفة ادوية تحتوي على 3 ادوية فقط؟ فاذا كان الجواب نعم ، فالمسألة لا علاقة لها في نموذج الادخال ، وانما في التقرير جعفر 298.Medication.accdb.zip

السلام عليكم هنا كانت لي مشاركة في منتدى الفريق العربي للبرمجة ، وبها احد الاقتراحات: http://arabteam2000-forum.com/index.php?/topic/291451-ربط-النماذج-الفرعيه/&do=findComment&comment=1393460 جعفر

وعليكم السلام لا يمكن عمل Combobox في نموذج مستمر ، معتمد على Combobox آخر ، فهناك من يعتقد انه احد العيوب في الاكسس التي لم يتم اصلاحها جعفر

السلام عليكم 1. بعض الاوقات الحفظ بصيغة ثانية ما يصير ، فالطريقة الاخرى لعمل هذا ، هو ان تعمل قاعدة بيانات جديدة بالصيغة اللي تريدها ، ثم تستورد كائنات البرنامج الاخر الى برنامجك الجديد 2. ها ، لا تقولون ما كان لي دور في عمل البرنامج المرفق بصيغة mdb . جعفر BackUp-delete-Control.zip

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

وعليكم السلام اعمل مربع النص في حجم النموذج الفرعي ، واجعله خلف جميع كائنات النموذج واجعل جميع مربعات النص ذو خلفية شفافة جعفر

وعليكم السلام ايش رايك بواحده من هذه الطرق / الحركات : البرنامج على الرابط التالي: http://hitechcoach.com/index.php?option=com_docman&task=doc_details&gid=44&Itemid=19 جعفر

. وهنا بداية جديدة للمرحلة التالية ، ونريد افكارك كذلك : http://www.officena.net/ib/topic/67564-علاج-تراكم-عدد-النسخ-الاحتياطي/ جعفر

وعليكم السلام ورحمة الله وبركاته رحم الله والديك على هالفكرة ، وبالفعل ، يجب تنظيف الملفات القديمة والآن يجي دور اخونا محمد سلامة ، علشان يطلع لنا بعدّة خيارات للحذف (مثل ما عمل عدة خيارات للحفظ) جعفر

وعليكم السلام عندي مجموعة اشياء في اعلا القائمة ، ومحتاج اخلصها ، وبعدين اشوف مسقط التقارير بس للعلم ، ارفق لك جزء قمت به ، وليس متكاملا لإختيار الخطوط . جعفر

حياك الله أخوي رمهان زين الحمدلله طلّيت علينا انا كذلك كان عندي تجربة اخرى مع Echo ، وهي عند كتابة ملاحظات على Status Bar في اسفل النموذج ، وكذلك استخدمت بديل له ، وهو: DoEvents Call SysCmd(acSysCmdSetStatus, "HI THERE!!") DoEvents . و الامر DoEvents جدا مهم ، وهو لإخبار الكود بأن يعمل الامر هذا ، ويواصل العمل للخطوة التالية اما عن اغلاق المواضيع ، فانا اقوم بإغلاق مواضيعي ، وذلك بعد ان يسأل صاحب الموضوع سؤال لا علاقة له بالموضوع ، فأضطر عمل هذا حتى لا يتشعب الموضوع جعفر

آسف ياشباب نسيت اخبركم ، انا عملت موضوع مستقل لمثال عن Me.Painting على الرابط التالي: http://www.officena.net/ib/topic/67520-تجديد-تحديث-النموذج-mepainting/ جعفر

تسلم أخي كرار ، على السطرين الاخيرين جعفر

وعليكم السلام اليك هذاالكود من احد برامجي: ونفترض ان اسم الحقل (سواء في الاستعلام او في النموذج) strText ، فكود تغيير الاسم يكون: في النموذج Me.strText = Characters_Windows_Refuse (Me.strText) في الاستعلام A: Characters_Windows_Refuse ([strText]) و الوحدة النمطية Function Characters_Windows_Refuse(str_Name As String) As String 'check if the file name is correct, 'and it does not incluse the characters windows refuse 'usage: 'Me.strText = Characters_Windows_Refuse (Me.strText) ' Dim Correct_To As String Correct_To = "-" str_Name = Replace(str_Name, "\", Correct_To) str_Name = Replace(str_Name, "/", Correct_To) str_Name = Replace(str_Name, ":", Correct_To) str_Name = Replace(str_Name, "*", Correct_To) str_Name = Replace(str_Name, "?", Correct_To) str_Name = Replace(str_Name, Chr(34), Correct_To) str_Name = Replace(str_Name, "<", Correct_To) str_Name = Replace(str_Name, ">", Correct_To) str_Name = Replace(str_Name, "|", Correct_To) 'return this value to the field Characters_Windows_Refuse = str_Name End Function جعفر

حياك الله ولي الشرف ان يستفيد الشباب من تجاربي جعفر

يا واد انت جعفر

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