Bluemind

تفضل مثالك بعد التعديل عليه في البدايه يجب تحويل الساعات الى دقائق ثم جمعها ثم تحويلها الى ساعات ودقائق Sum Hours.rar

موضوع مخالف الرجاء قراءة قواعد المشاركه في المنتدى يغلق الموضوع

تفضل اخي الكريم وتذكر ان القيم المحسوبه لا ينصح بتخزينها في الجدول بل يتم حسابها بواسطه الدوال Hours.rar

اخوي بارك الله فيك ضع مثالك ليتم التعديل وعمل الازم عليه

اخوي بارك الله فيك الرجاء قراءه قواعد المشاركه في المنتدى و الالتزام بها http://www.officena.net/Tips/Questions.htm موضوع مخالف

اخوي بارك الله فيك الرجاء قراءه قواعد المشاركه في المنتدى و الالتزام بها http://www.officena.net/Tips/Questions.htm موضوع مخالف

تفضل اخي الكريم مثالك بعد التعديل عليه NA_Census.rar

اخوي بارك الله فيك الرجاء الاتزام بقواعد المشاركه في المنتدى http://www.officena.net/Tips/Questions.htm موضوع مخالف

تفضل مثالك بعد التعديل عليه شاهد النموذج Form1 في القاعده cc لابد ان يعمل كا نموذج رئيسي عند فتح قاعده البيانات و لا مشكله في اخفائه كذلك لابد ان تكون القواعد الثالث في نفس المجلد Relink db.zip

اخوي بارك الله فيك لا يوجد قاعده بيانات مرفقه ، فكيف تريد المساعده!!!

الاخ محمد الان انت تسال عن الجديد ولكن!! هل قمت بالعمليات الحسابية ادناه كما ذكرت لك سابقا؟؟ وماهي النتائج؟؟

اخوي بارك الله فيك سؤالك كان عن تصفيه نموذج من نموذج اخر وتم حله الان تضع عده اسئله في نفس الموضوع وهذا مخالف لقواعد المشاركه قم بوضع كل سؤال في موضوع جديد وسوف تجد المساعده ان شاء الله من بقيه الاعضاء

حل جميل و موفق تم استخدام اكثر من داله مما يثري العمل

اخوي محمد انا ليس الخبره الكثيره في مجال المحاسبه مع اني درستها واستعمل بعض اساسيتها في العمل ولكن قبل كل شي سوف اتكلم عن تصميم الجداول وعلاقتها وكذلك تسهيلها للعمليات الحسابيه و الاستعلاميه التصميم الموجود في الجدول ليس بالسليم اولا: لا يوجد مفاتيح اساسيه ولا تعريفيه بمعنى لايوجد مايعرف بالزبون سوى اسمه ويكتب كتابه كل مره يتم الاضافه وهذا غلط لابد من وضع جدول منفصل للعملاء ويتم وضع رقم تسلسل لكل زبون لغرض التعريف ويكون مفتاح اساسي متفرد كذلك لا يوجد مفتاح تعريفي انوع العمليه‘: مبيعات ، او مسترجع... الخ بل تستخد الادخال بكتابته يدويا ، ومن ثما حدوث خطاء في الادخال قد يسبب مشالكل حسابية وكذلك ينطبق الكلام على نوع المدفوعات من اساسيات تصميم قواعد البيانات هو سلامه البيانات او Data Integrity ثانيا هناك عمليات يجب برمجه التسلسل فيه كما في رقم الفاتوره في مثالك انت تقوم بادخالها يدويا وهذا قد يسبب مشاكل اخرى بالتعريفات و الاستعلامات من ناحيه التصميم اقترح وضع جدول للعملاء يحتوي على رقم العميل و يكون من نوع رقم تلقائي >> مفتاح اساسي اسم العميل العنوان التليفون .... جدول لنوع المدفوعات يحتوي على رقم تعريف من نوع تلقائي الوصف >>> نقد او اجل كذلك جدول لنوع العمليه حتوي على رقم تعريف من نوع تلقائي الوصف >>> مبيعات او مسترجع كذلك جدول للعمليات وجدول للعمليات يحتوي على رقم منفرد من نوع تلقائي رقم العميل وهو ياخذ البيانات من جدول العملاء اعلاه ويكون مفتاح ثانوي التاريخ نوع االعمليه من نوع رقم>> مبيعات او مسترجع ويكون قائمه منسدله تختار منها ويتم تخزين رقم العمليه الموجود في جدول انوع العمليات اعلاه نوع المدفوعات من نوع رقم>> نقد او اجل ويكون قائمه منسدله تختار منها ويتم تخزين رقم نوع المفوعات الموجود في جدول نوع المفوعات اعلاه المبلغ قيمه الفاتوره هذا كل ماتحتاجه بعد ذلك بامكانك حساب رصيد العميل اما دائن او مدين بحيث تقوم بعمل استعلام(ِA) يعمل على جمع مبالغ العميل(حقل المبلغ) ذو الرقم مثلا 1 من نوع المبيعات و من نوع نقدا( لاحظ وجود شرطين مبيعات و نقد) ثم تقوم بعمل استعلام (B)يقوم بجمع مبالغ العميل من نوع مبيعات والاجله(حقل قيمه الفاتوره) ثم تقوم بخصم Bمن A فايعطيك رصيد اولي مدين او لآ ونسمي هذا الاستعلام مثلا © ثم تقوم بعمل باستعلام (D) يعمل على جمع حقل(المبلغ الفاتوره) للعمليات من نوع مسترجع , و نقد ونقوم بعمل استعلام (E) يجمع حقل (المبلغ الفاتوره) و من نوع مسترجع اجل و من ثما نقوم بخصم D من E و نحصل عللا الاستعلام F الذي يبين اما دائن او لا الان حصلنا على قيم المدين© و الدائن (F) نقوم بخصم © من (F) مثلا قيمه C 6000 كما في مثالك وقيمه F 50 كما في مثال ببعد اجراء العمليه تحصل على 5950 دين على الزبون بامكانك وضع حقول تقوم بجمع الدائن و المدين وايضاحها في النموذج ارجو ان قد وفقت في الشرح و الرجاء من الاخوان المحاسبين تصحيح العمليات اعلاه ان وجد خطاء بالتوفيق

اخوي محمد كما ذكرت في مشاركتي السابقه هذهالوحده وجدتها في احد المواقع الاجنبيه ولم اقم بتصميمها ثانيا ماعليك فقط الا تعديل مسار القاعده الخلفيه او قاعده الجداول الموجوده على السرفر انظر هذا السطر في الوحده النمطيه strName = "C:\Users\Guest\Documents\Backend1.accdb" ثم في النموذج الرئيسي في الواجهه الاماميه(الموجوده على اجهزه المستخدمين) وفي حدث عند التحميل او onload قم باستدعى الوحده النمطية كاتالي OpenAllDatabases True وفي حدث عند الاغلاق للنموذج ضع الكود التالي OpenAllDatabases False مع العلم انه يجب تشغل هذا النموذج طول الوقت مادم المستخدم يعمل على القاعده الامامية بالتوفيق

اخوي بارك الله فيك لقد تم التعديل على جدول son و marred تم عمل مفتاح اساسي SQ وتم ازاله المفتاح الاساسي من حقل FamilyID لانه لايسمح باضافه اسماء اخرى تحت هذا الحقل بنفس الرقم لذلك جعلنا FamilyID هو الحقل الرابط بين الجدولين و بين النموذجين قم بالضغط على زر الانجال وشاهد النتيجه قمت بعمل الربط عن طريق المعالج ضع زر امر على النموذج ثم سوف يقوم المعالج بالعمل اختر Form Operation ومن الحدث Open Form ثم اختر اسم النموذج الذي تريد فتحه ثم اختر الخيار الاول open form and find specific data... ثم اختر الحقل IDfamily من الجهه اليمنى و IDfamilyمن الجهه اليسرى واغط على الزر الموجود بينهما <-> ثم اغط على التالي ثم انهاء وعليك تطبيق الفكره على زر الزوجات لكي تستوعب الفكره بالتوفيق NA_Census.rar

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

هذا حل وجدته باحد المواقع عن طريقه فتح اتصال مع قاعده البيانات الخلفيه لتسريع الاتصال قم بانشاء الوحده النمطية التالية Sub OpenAllDatabases(pfInit As Boolean) ' Open a handle to all databases and keep it open during the entire time the application runs. ' Params : pfInit TRUE to initialize (call when application starts) ' FALSE to close (call when application ends) ' Source : Total Visual SourceBook Dim x As Integer Dim strName As String Dim strMsg As String ' Maximum number of back end databases to link Const cintMaxDatabases As Integer = 2 ' List of databases kept in a static array so we can close them later Static dbsOpen() As DAO.Database If pfInit Then ReDim dbsOpen(1 To cintMaxDatabases) For x = 1 To cintMaxDatabases ' Specify your back end databases Select Case x Case 1: strName = "C:\Users\Guest\Documents\Backend1.accdb" End Select strMsg = "" On Error Resume Next Set dbsOpen(x) = OpenDatabase(strName) If Err.Number > 0 Then strMsg = "Trouble opening database: " & strName & vbCrLf & _ "Make sure the drive is available." & vbCrLf & _ "Error: " & Err.Description & " (" & Err.Number & ")" End If On Error GoTo 0 If strMsg <> "" Then MsgBox strMsg Exit For End If Next x Else On Error Resume Next For x = 1 To cintMaxDatabases dbsOpen(x).Close Next x End If End Sub مع تعديل مسار القاعده الخلفيه في الكود ثانيافي نموذج الرئيسي في الواجهه الاماميه(الموجوده على اجهزه المستخدمين) وفي حدث عند التحميل او onload قم باستدعى الوحده النمطية كاتالي OpenAllDatabases True وفي حدث عند الاغلاق للنموذج ضع الكود التالي OpenAllDatabases False مع العلم انه يجب تشغل هذا النموذج طول الوقت مادم المستخدم يعمل على القاعده الامامية

نعم ممكن وهي اغلب مشاكل بطء قواعد البيانات هناك امور اخرى يجب مراعتها ماهو طول اسم قاعده البيانات (back end)?? ماهو مستوى موقع القاعده ؟ هل هي بداخل اكثر من مجلد فرعي؟؟ كذلك ، برنامج مكافحه الفيروسات له علاقه بالموضوع ، قم باستثناء مجلد قاعده البيانات من مسح برنامج مضاد الفيروسات كذلك ، ماهو نموذج بداء التشغيل ؟؟ هل هو فورم بدون مصدر بيانات ؟؟ اي فورم يوجد به ازرار لفتح نماذج اخرى بدون اي مصدر للبيانات؟؟ لا بد من وضع نموذج مخفي يعمل بالخفى عند تشغيل الواجهه ويكون يعمل طول الوقت و يوجد لديه مصدر للبيانات.

اخوي ابو خليل هل تستخدم اي من الدول Dsum او Dcount ...??

عفوا تم تحديث المرفق

تفضل اخوي مثالك بعد التعديل عليه تم اخذه من مثال اجنبي تحذير4.rar

بعد اذن اخوي ابو خليل هذا ليس جدول داخل جدول ولكن تسمى علاقات من علامه التبويب database Tools اذهب الى Relationships وسوف تجد العلاقات والربط بين الجداول بستخدام حقول اساسيه و الثانويه

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

ابوحمد الرجاء وضع موضوع جديد لسؤالك الثاني حسب قواعد للمشاركه في المنتدى