jjafferr

مب كأنّ احد جاب اسمي وطاريّي وانا نايم جعفر

1. نعم ربط جداول (لا تنسى اني اتكلم عن جداول مؤقته) ، واعتقد بأني كنت اربطه برمجيا ، وذلك بسبب اختلاف مسار مجلد الكمبيوتر المؤقت من مستخدم الى آخر ، 2. البرنامج كاملا كان "لإدارة بلا ورق" ، فقد قمنا بعمل ارشفة ضوئية Scan لجميع الملفات و المراسلات والعقود السابقة ، وكانت هذه الجزئية (على ما اعتقد) لحساب عدد الملفات الممسوحة ضوئيا ، والتأكد من عدد صفحات كل ملف ، ثم ارساله الملفات واحدا بعد الاخر الى برنامج Abbyy FineReader والذي في اعتقادي بعد التجربة انه الافضل (العمل كان على ملفات باللغة الانجليزية ، ولكن الشركة عندها نسخة للنصوص العربية الآن) ، لتحويل الصور الى نص ، ومن ثم التأكد من ان عدد الصفحات هي نفسها ، وإلا فنرسل الملف الى مجلد آخر للتأكد والعمل عليه يدويا ، وينتهي عمل هذه الجداول جعفر

وعليكم السلام أخي عمر عمل جبّار ، مبارك عليك هذه الهمّه العالية شاكرا لك ترك تسمية "مسقط التقارير" كما هو بالنسبة الى برنامجك ، رجاء استيراد جميع الكائنات من برنامجي الى برنامجك ، بإستثناء الوحدتين النمطيتين: API_FolderDialog و basOpenSaveDialog لأنهم موجودين في برنامجك ، ولكن بمسميات مختلفة وكُله تمام ان شاء الله جعفر

وعليكم السلام انا اشعر اني فظ في التعامل معك ، فاعتذر منك واليك نصيحتي والتي قلتها سابقا: رجاء ان يكون سؤالك واضح وبالتفصيل الممل ، وفيه امثلة من بياناتك ، ومن اسماء نماذجك وحقولك ، وتوضيح (سواء على الاكسل او الوورد او الصور) ، وترفق هذه الجزئية من برنامجك (لأنه يجب على احدنا عمل المثال). عندها تحصل على اجابة تامّة كاملة ، وجاهزة للعمل والآن الى سؤالك: انت تعرف ان قوانين المنتدى تسمح بسؤال لكل موضوع ، لهذا السبب يجب عليك فتح موضوع لكل سؤال ، لوسمحت وسأرد على اسئلتك بسرعة ، للعلم فقط ، ويترتب عليك فتح مواضيع لها: هل بالامكان بدل طباعه التقرير ارساله الى ( القسم ) على فيئه تقرير او ايميل ، نعم على شكل مرفق pdf في ايميل مثلا ، بدل طباعه الوصفه ارسالها مباشره للصيدليه للصرف ، نعم ، اذا كانت الصيدلية مربوطة بالبرنامج على الشبكة ، فلا تحتاج لشئ ، فقط يعطي المريض رقمه الى الصيدلية ، وبنموذج خاص للصيدليه ، يمكنه الصرف ، والتأشير على السجل عند الصرف ، بدل طباعه نموذج اشعه ارساله للقسم مع امكانيه عمل فيد باك او حفظ النتيجه بملف المريض ، نعم ، كما قلت ، يمكنه العمل ، والتأشير على السجل بعد العمل ، ولو لاحظت ، فانا عملت لك تبويب Medications و Lab Reports حتى تستطيع ان تتوسع في هذا الطريق: يعني تكون هناك اشارة تنبيه للصيدليه بوجود وصفه للصرف ، المختبر ب وجود عينه ، للاشعه بوجود طلب ، للعياده بوجود مريض نعم يمكن ، وسأشرح طريقتين: 1. مثل ما قلت في الاعلى ، بأن يأتي المريض للصيدلية / المختبر / .. ويعطيهم رقمه ، وبالتالي يفتحون النموذج الخاص بتلك الجهة صيدلية / المختبر / .. ، ويتم العمل ، وهذه هي الطريقة الافضل ، 2. ان يكون نموذج صيدلية / المختبر / .. مفتوحا دائما ، وتعمل به Timer ، بحيث يتم استيراد البيانات عن طريق الامر Requery جعفر

أخي رمهان إحنا نستخدم أكسس ، ونحاول نطوّعه لما نريد ، وخاصية حمل برامج في الاكسس عن طريق Blob لا يعرف عنها الكثير الجميع يتفق معاك ان الاكسس (احد برامج المايكروسوفت) ليس افضل برنامج ، ولكن هذا ليس مكان مناقشة هذا الموضوع هنا شرحت السبب: . والآن الى شرح "فبدل ان اعمل هذه الجداول المؤقته داخل قاعدة بياناتي ، ويكبر حجمها ": بعض الاوقات نضطر الى عمل جدول/جداول مؤقته داخل برنامجنا ، وعملها ، هو تخزين بيانات ، ثم حذفها ، بحيث ان الحاجة لهذه الجداول تنتهي بقفل البرنامج (غالبا) ، وبهذه الطريقة يكبر حجم البرنامج ، لأن اكسس لا يُعيد حجم البرنامج الى اصله عند حذف السجلات ، وانما نضطر الى عمل ضغط واصلاح لأعادة البرنامج الى حجمه الاصل. قبل حوالي اسبوعين ، واثناء التجارب على احد البرامج وكان حجم جزء الجداول BE حوالي 40MB ، عملت جدول مؤقت وبدأت اشتغل عليه بتجاربي ، وعندما انتهيت ، حجم البرنامج وصل الى حوالي 750MB ، فطبعا استعملت زر الضغط والاصلاح ، ورجع الى حجمه الطبيعي طيب لو اني كان عندي جدول مؤقت خارج برنامجي ، وعملت له رابط في برنامجي ، واشتغلت عليه ، ولما انتهي من عملي ، احذف الجدول المؤقت (طبعا مع قاعدة البيانات اللي الجدول فيها) ، مو يكون افضل لي ؟ او يعني الافضل ان اجعل الضغط والاصلاح تلقائي عند اغلاق البرنامج ؟ نعم استطيع ان اعمل هذا الجدول المؤقت الخارجي برمجيا ، ولا حاجة لإرفاقه ، ولكن في حالتي ، كنا شخصين نشتغل على هذا البرنامج ، وابن عمي كانت مسؤليته عمل الجداول المؤقته ، فلما خلص عمله ، ارفقت شغله بالكامل جعفر

هلا والله بأخوي رمهان ، سواء كنت مشغول او فاضي حبتين انا اعمل على اوفيس 2010 وشغال عندي البرنامج ، فما عندي فكرة ليش ما اشتغل على 2013 ، وبما ان البرنامج قديم من 2009 ، فما اردت ان احوله الى صيغة الاكسس الجديدة ، وتركته بصيغة mdb لتعم الفائدة ، ولك نسخة مرفقة بصيغة accdb 1. هي مجموعة اسباب جعلتني اقوم بهذه الطريقة انا ارفقت زبدة البرنامج ، ولم ارفق صلاحيات المستخدمين ، فلا يملك صلاحية الوصول الى نموذج ادخال Blob إلا اشخاص معينين ، لذا فلا يوجد تخوف من حذف السجل ، وبما ان البرنامج سيكون على شبكة ، ولا يرى المستخدم الجداول ، فلا تخوف من هذه الناحية كذلك ، اما اذا البرنامج ، والشبكة كانوا في يد المستخدمين/المخربين ، فعلى كل البرنامج وبرامج الكمبيوتر السلام 2. حجم حقل OLE هو 1 جيجا ، ولا ادري عن حجم اكبر حجم لـ Blob 3. اذا تمعنت في قاعدة البيانات ، ستجد ان هناك وحدات نمطية لمجلدات الكمبيوتر الاساسية ، ومنها المجلد المؤقت ، وقد كنت استعمل هذا المجلد للعمل ، ولم يكن هناك مشكلة ، ولم يخبرني برنامج المضاد للفيروسات KasperSky بشئ 4. لا وانت الصادق ، هذا كان جزء من احد برنامجي لأحد الجهات الحكومية ، وللعلم وبسبب عدم دراستي/تخصصي للكمبيوتر ، فكل اللي تعلمته كان عملي ، وكل اللي اطرحه في المنتدى هي ممارسات عملية في برامجي ، والمواضيع اللي لست لم اعمل فيها ، فلن ترى لي رد لها 5. الـ Blob ليس كأي عنصر OLE ، لهذا السبب ، تستورده للجدول بكود ، وتصدره للكمبيوتر بكود لا تنسى اني عملت البرنامج هذا في 2009 ، وعملته داخل صيغة mdb ، والسبب اني عملته بهذه الطريقة ، هو بحثي في الانترنت ، وقرأتي عن ميزات وعيوب الطرق المختلفة ، فنعم ، قد يكون كلامك صحيحا عن كائن stream ، ولكن لا علم لي به وشكرا على هذه الاستفسارات ، حتى تعم الفائدة جعفر Blob_accdb.zip

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

يا سبحان الله ، كأني وضعت البرنامج لك http://www.officena.net/ib/topic/67834-هدية-إحمل-برامجك-داخل-قاعدة-بياناتك/ جعفر

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

لم انزل المرفق ولكن وبدل طريقتي السابقة (لأنك لم تعطي اي معلومات عن ماذا كنت تريد ان تعمل) ، تستطيع في الاستعلام ان تعمل حقل جديد فلنسميه A ، ولنقل ان اسماء حقولك B و C ، عليه يصبح الحقل A: A: nz([b],0) + nz([c],0) جعفر

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

وعليكم السلام حياك الله 1. احفظ النموذج الفرعي كتقرير ، . 2. اجعل استعلام النموذج هو نفس استعلام التقرير ، 3. اعمل زر في النموذج الرئيسي لطباعة ما تراه في النموذج الفرعي جعفر

كلام سليم 100% اذا تم استعمال 3 خانات عُشرية (مثل 0.166) على تنسيق خانتين عُشرية "##.###,#" بينما فهمي للسؤال ، انه سيكون إما رقم كامل او خانتين عُشريات ، لهذا السبب اعطيت تنسيق يخص هذه الحالات فقط "###,#" و "##.###,#" فعلى اساسها ، النتائج لن يكون فيها تقريب ، وستكون صحيحة جعفر

على بركة الله جعفر

السلام عليكم البارحة وانا نص نايم لقيت هذا الملف وبه حل http://www.accessmvp.com/KDSnell/DownloadFiles/FixCascadingCombos.zip جعفر

السلام عليكم ورحمة الله وبركاته في أحد المشاريع التي قمت بها ، كنت محتاج الى برنامج خارجي ليقوم ببعض المهام للمشروع ، فالطريقة المعتادة التي نستعملها هي ، وضع البرنامج هذا داخل احد مجلدات المجلد الرئيسي لقاعدة البيانات ، وبما ان فقدان/حذف هذا البرنامج يجعل المشروع عاجز عن العمل ، لم يكن عندي خيار ، سوى ان اجعل هذا البرنامج داخل قاعدة البيانات ، بطريقة تسمى Blob المرفق فيه هذه الملفات: . النموذج frm_Blob مهم في انه يسمح لك بوضع برامجك في قاعدة البيانات بسهولة ، والزر الاخر هو لتصدير هذا البرنامج الى اي مجلد في الكمبيوتر (لعمل التجارب مثلا) ، وقد وضعت برنامجين في قاعدة البيانات المرفقة: 1. pdftk.exe والذي يقوم بالعديد من العمليات لملفات الـ pdf ، 2. Arc5_S_BE.mdb ، وهي قاعدة بيانات فاضية ، وبها جداول مؤقته ، فبدل ان اعمل هذه الجداول المؤقته داخل قاعدة بياناتي ، ويكبر حجمها ، رأيت ان استعمل جداول خارجية ، وعند اغلاق البرنامج ، كنت اقوم بحذفها من المجلد: . لعمل البرنامج الاول ، استخدم الزر رقم 1 ، والذي سيصدر البرنامج pdftk.exe الى مجلد قاعدة البيانات ، ثم سيدمج الملفين a.pdf و b.pdf ويحفظ النتيجة في ملف ab.pdf ، ويفتحه ، بينما الزر رقم 2 ، سيصدر قاعدة البيانات Arc5_S_BE.mdb الى المجلد الرئيسي لقاعدة بياناتنا: . عند الضغط على الزر 1 ، سنرى هذه الملفات في المجلد الرئيسي لقاعدة البيانات: . ان شاء الله يكون فيه فائدة للجميع جعفر Blob.zip

وعليكم السلام ياريت تعطي مثال بطلبك ، توفر علينا نحن الاثنين الوقت اذا كان قصدك ان تجمع قيم الحقول في سجل واحد ، فهذا الكود يعطيك الحقول للسجل ، وجمع قيمها: Dim rst As DAO.Recordset Dim fld As Field 'get this Name Record from the table Set rst = CurrentDb.OpenRecordset("Select * From [salary2015+2014] Where Full_Name='" & F & "'") T = 0 'initial Total 'loop through the fields For Each fld In rst.Fields 'Debug.Print fld.Name & vbTab & fld.Value 'skip the Full_Name field name If fld.Name <> "Full_Name" Then 'add the field values T = T + fld.Value End If Next fld rst.close : set rst=nothing جعفر

وعليكم السلام اذا اردت فتح البرنامج بحجم الشاشة ، جميل ان تقرأ الرابط التالي من اوله لآخره ، وتنزل المرفق من الرابط واللي فيه طلبك: http://www.officena.net/ib/topic/65914-قفل-نموذج-او-كبسة-command-برقم-سري/#comment-429339 جعفر

تفضل . جعفر 316.Aziz1.accdb.zip

السلام عليكم وما تعريف "القسط الاول"؟ جعفر هل هو مبلغ فقط ، او له علاقة بالتاريخ كذلك؟ جعفر

وعليكم السلام احد قواعد الاكسس التي يجب عليك ان تتبعها لبرنامج افضل ، هو إضافة حقل الترقيم التلقائي مفهرس ، فالبرنامج يحتاج اليه ليرتب وضعه في الفهرسة ويكون اسرع في العمل جعفر

تفضل الوحدة النمطية هذه تقوم بالعمل ، ولكن بعد ان عملت الكود اتضح باننا ما محتاجين للحقل Client_Type ، ولكني تركته هناك ، كما اني في اسفل الوحدة النمطية ، جمعت الشروط في سطر واحد ، حتى نستخدمها كبديل في الاستعلام مباشرة ، بدل الوحدة النمطية: Function B_con(CT, T, B) 'CT = Client Type 'T = Type 'B = Balance If T = "Cash" And B >= 10000 Then B_con = B ElseIf T = "Cash" And B < 10000 Then B_con = 0 ElseIf T = "Credit" Then B_con = B End If 'B_con = IIf(T = "Cash" And B >= 10000, B, _ IIf(T = "Cash" And B < 10000, 0, _ B)) End Function . هذا الاستعلام ، B ينادي الوحدة النمطية ويأخذ نتائجه منها ، بينما معادلة B2 موجودة مباشرة في الاستعلام وبدون الحاجة للوحدة النمطية ، ولكن ، اذا اردت عملت تعديل على الشروط ، فستجد ان التعديل في الوحدة النمطية اسهل بكثير . وهذه النتائج: . جعفر 315.TEST.accdb.zip

معلش خذني على قد عقلي ، واعطنا مثال لوسمحت جعفر