اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

Hamtoooo

02 الأعضاء
  • Posts

    97
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو Hamtoooo

  1. السلام عليكم اسعد الله يومكم عند تصدير نموذج فرعي مرتبط بنموذج اساسي إلى pdf او تقرير كيف اتحكم في اسم الملف بحيث اريده تلقائي يحفظ الpdf بكود القسم و تاريخ اليوم ( [كود القسم] 28-12-2021 ) مرفق مثال اثابكم الله حفظ باسم pdf.accdb
  2. السلام عليكم اسعد الله يومكم بكل خير اساتذتي الافاضل لاستفيد ويستفيد غيري لدي جدولين مرتبطان بعلاقه وضعت لهم نموذج متعدد اريد بعد انتهائي من فرز النتائج بطريقة التصفيه المدمجه بالاكسس ( تصفيه وفرز يمين الماوس ) يكون هناك زر للطباعه او حفظها pdf بشرط ان تتم طباعه التتقرير بالنتائج الضاهره بالنموذج والذي سبق ان قمت بعمل تصفيه لهم مرفق لكم مثال لترويض المسأله شكرا لكم طباعة بعد التصفيه.accdb
  3. اثق كثيرا في معلوماتك شكرا لك على تصحيح المعلومات انا كنت اعتقد انه يحجز الحروف كامله مما يزيد حتى في حجم البرنامج بشي بسيط
  4. جمييييل شكرا لك جعفر فهمت طريقة الفكرة انا فعلا استخدم هذه الطريقه لكن حتما سأستخدم طريقتك
  5. احسن الله إليك وجعل ما تقوم به في ميزان حسناتك اخي جعفر شفهيا لماذا وضعت داله if واستخدمت len ؟؟ م الفائده منها وهل استخدامها شائع
  6. ممتن للطفك وجميل صنعك حسب ما فهمت من ردك اخي جعفرر انه يتم استدعاء الرساله كامله بما فيها العنوان ونص الرساله انا اريد ان استدعي فقط متغير عنوان الرساله .. كي اضعها في متغيرات العناوين في الرسائل بباقي القاعدة
  7. السلام عليكم اسعد الله يومكم يا ابطال لأستفيد ويستفيد غيري كوني مبتدئ اعمل على انشاء برنامج متكامل ولدي الكثير من الرسائل المنبثقه (msgbox) احببت ان يكون عنوان هذه الرسائل المنبثقه (title) موحده مثلا بإسم البرنامج ورقم الاصدار الذي عملته هو انني وضعت جدول يكون فيه اسم البرنامج ورقم الاصدار واستخدمت دالة (Dlookup) لجلب اسم البرنامج والاصدار في عنوان الرسائل كما يلي : Private Sub b_emp_add_Click() On Error Resume Next If Forms![LoginFourm]![Delete] = 0 Then MsgBox "خطأ .. ليس لديك صلاحيات اصدار أذن", 0 + 16 + 1048576, DLookup("[name_pro]", "[info]") & " | " & DLookup("[Version_pro]", "[info]") Else DoCmd.OpenForm "Permission_add", , , , acFormAdd End If End Sub وكما تلاحظ انني وضعت داله الـ dlookup في عنوان الرساله في كل مره اضع هذا الكود اعلم انها طريقه غير احترافيه .. المطلوب ماهي الطريقه المثلى والاخف للقاعده كي استدعي العنوان بدون تكرار الداله انا خطرت في بالي فكرة الوحده النمطية المساعده بحيث اريد ان اضع دالة ال dlookup بها واستدعيها في عنوان الرساله هل اضع الداله في ال sub بشكل عادي او لا بد وضعها بمتغير وهل اعلان المتغير لابد ان يكون عام حيث اريد هذه الداله على مستوى القاعدة كاملة ماهي افضل الطرق وياليت يتم شرح لنا استدعاء دالة dlookup داخل وحده نمطيه والاستفاده منها في عنوان الرساله كل الامنيات للابطال ان يتم شرح فكرة استدعاء اي داله او نص من الوحده النمطيه إلى اي مكان في القاعده بشكل مبسط شاكر ومقدر حسن تعاملكم وتفهمكم توحيد العنوان في الرسائل المنبثقه.accdb
  8. السلام عليكم اسعد الله صباحكم تجربتي في الاكسس ليست بالبعيده ومازلت اتعلم واحببت ان اذكر اهم نقاط مهمله يجب الانتباه لها لجعل برنامجك يعمل بشكل جيد .. نبدأ في النقاط الـ 6 الأولى وبإذن الله سيتم إنعاش الموضوع كل يوم .. الموضوع مفتوح للجميع ويمكن إضافه إثرائك بما يجود به من علمك ولكن اجعله مبسط وقابل للفهم بالنسبه للمبتدئين 1- اسماء الحقول في الجدول + اسماء كافة العناصر لا اقول يجب لأنه عمليا تستطيع كتابتها بالعربي ولكن الافضل الافضل الافضل ان تكون بالانجليزي ويفضَل بدون مسافات وتستطيع استبدال المسافه بـ ( _ ) ولا بأس في التسميات التوضيحيه في النماذج والتقارير ان تكتب مايناسبك في العربي واستخدم المسافه - اهتم بأسماء العناصر ليسهل عليك معرفتها مثلا نموذج لإضافة موظف جديد( employees_form_add ) لماذا ؟ - تجنب الاخطاء عند كتابه الاكواد في منشئ التعبير واكواد ال vba وغيرها .. - تجنب اخطاء الترميز في لغات الويندوز ربما لا يعمل برنامجك في جهاز ترميز اللغه العربيه يكون غير معروف. ----------------------------------------------------------------------------- 2- حجم الحقل (اي عدد الحروف) ضروري جدا الاهتمام به و يكون متناسب مع نوعية البيانات الافتراضي دائما يكون (250) فمثلا بحقل الاسم ولنفترض ان هناك موظف اسمه (عبداللطيف عبدالرحمن عبدالملك عبدالله الاوفيسي) في الاسم اعلاه جميع الحروف مع المسافات عددها (45 حرف) إذا ... ؟ باقي هناك 205بت حجزت وزادت بحجم القاعده تم حجزة بدون فائده. - ستجد ان بعض الحقول تحتاج فقط 5 أحرف ومنها جنس الموظف إما ذكر او انثى .. إذا لماذا 250 حرف ف الافضل تقليصها بما يتناسب مع بيانات الحقل ----------------------------------------------------------------------------- 3- لديك مثلا جدول موظفين وفيه عدد 15 حقل وتريد اضافه نموذج (عناصر متعدده) (عناصر متعدده يعني كل موظف تنعرض بياناته في سطر والسطر الثاني للموظف الثاني وهكذا) غير ضروري انك تعرض البيانات كامله وتقدر تضيف فقط حقل الاسم والرقم الوظيفي والجنس والجنسيه وبكل بساطه تقدر تسوي زر في حال اردت عرض البيانات كامله يوجهك إلى نموذج تنعرض كامل البيانات فيه يكون قدام كل موظف وهذا اجمل واكمل مثال - الافضل في نماذج العناصر المتعدده الغاء الاضافه وتتم الاضافه في نموذج خاص بالاضافه. - نموذج عرض البيانات لا تجعله يستند إلى استعلام الافضل تتم برمجة زر عرض البيانات لجلب النموذج وعرض بيانات الموضف استنادا إلى رقم الموظف لماذا لكي تستفيد من نموذج عرض البيانات في ازرار اخرى ولا يكون حصري على نموذج تصفح الموظفين. ----------------------------------------------------------------------------- 4- عند انشائك لأي نموذج يعرض بيانات موظف واحد فقط اي سجل واحد وليس هناك أي ازرار تنقل لتسريع عملية فتح النموذج وتجنب بطئ القاعدة والافضل هو ان تجعل هذا النموذج دورة في السجل الحالي فقط لكي لا يتم صف السجلات الاخرى في الخلفيه بإنتظار المستخدم للإنتقال إلى السجل التالي وعرضه واساسا ليس هناك اي زر تنقل وإنما النموذج خصص لعرض سجل واحد فقط .. الطريقه | من خصائص النموذج > إذهب لغير ذلك > من خاصية دورة اختار (السجل الحالي) ----------------------------------------------------------------------------- 5- بعض الازرار تكون مكرره في اغلب النماذج مثلا ( الاضافه - الحذف - الحفظ - البحث الافتراضي - التنقل ) وهذه الازرار لا تحتاج إلى معرفة اسم النموذج هو يقوم بالأمر في السجل الحالي بغض النظر عن اسم النموذج وانت بدورك كمبرمج تطمح إلى مزيد من التقدم والاحترافية يجب ان تكون ذكيّا لتقلل الاكواد او المايكرو المكرر في كل نموذج م الحل ؟ ببساطه اجعل كود حفظ او اضافه او الحذف في وحدة نمطيه واستدعها متى ما شئت في الزر المناسب مثلا: اجعل كود الحذف في وحده نمطيه ك التالي : ومن ثم من زر الحذف الموجود في النموذج عند حدث عند النقر اكتب مايلي وهو الاستدعاء : كرر عملية الاستدعاء في ازرار الحذف الاخرى كما يمكنك استخدام المايكرو بدلا من الوحده النمطيه واستدعاءه في اي زر اذا كنت ما زلت لم تستخدم الاكواد انشئ مايكرو وضع فيه امر الحذف كما يلي: ثم في حدث عند النقر في زر الحذف استدع المايكرو كما يلي: كرر عملية الاستدعاء في ازرار الحذف الاخرى م الفائده : تقليل الاكواد او المايكرو مما يساهم في تقليل الاخطاء وتسريع القاعده ----------------------------------------------------------------------------- 6- كـ لمسه فنية إذا اردت تغيير اسم النموذج الذي يظهر في اعلى عند شريط القائمة الواضح هنا .. ولأنك التزمت في النقطه السابقه بعدم تسيمة النماذج بالعربيه كيف إذا تعيد تسميتها بالعربي وبأي مسمى ؟ الحل بكل بساطه .. عند حدث في الحالي بالنموذج الذي تريد تغغير مسماه اكتب الكود البسيط التالي : Me.Caption = "اكتب هنا الاسم الذي ترغب ان يظهر في اعلى النموذج" ----------------------------------------------------------------------------- نكتفي بهذا القدر على امل بكم في النقاط ال 6 الاخرى غدا بإذن الله
  9. الله يسعد مساكم وصباحكم احيانا اقوم بتحديث قاعده وارسلها للمستخدم المطلوب | اريد عندما المستخدم يفتح القاعده للمره الاولى يظهر نموذج (نموذج غير منضم اكتب فيه التحديثات الجديده) توضح فيها التحديثات الجديده للقاعده وكيف يستفيد منها ويكون فيه زر مثلا (فهمت ..) عند الضغط عليه يقوم بإلغاء الرساله عند فتح القاعده بالمره القادمه .. إليكم مرفق لترويض المسأله رساله للمتسخدم.accdb ممتن للطفكم
  10. وعليكم السلام قاعدة البيانات مرفوعه على sql او جداول بيانات اكسس ؟
  11. اسعد الله اوقاتكم لدي جدول (f_emp) فيه بيانات الموظفين يحتوي على: -اسم الموظف -حالة الموظف [على رأس العمل - اجازة ] وجدول اخر خاص باجازات الموظفين (f_v) ويحتوي على : -اسم الموظف -تاريخ بداية الاجازة -تاريخ نهاية الاجازة المطلوب | كيف اجعل قيمة حالة الموظف الموجود في فورم الموظفين تتحدث تلقائي إلى (اجازة) إذا كان تاريخ اليوم واقع بين تاريخين بداية ونهاية الاجازة مرفق لكم مثال لترويض المسأله ممتن للطفكم تحديث قيمة بناء على تاريخين.accdb
  12. بارك الله في علمك اخي طيب ايهم افضل طريقة واخف على قاعدة البيانات واسرع هل استخدم متغير في ميديول او طريقتك اضيفها في تيمب فار السؤال الثاني حفظك الله كيف اخلي المستخدم يقدر يغير القيمة اللي في التيمب فار او اللي في الميديول ممتن للطفك
  13. السلام عليكم اسعد الله اوقاتكم لدي قاعدة بيانات فيها اكثر من عشر نماذج وتقارير وفيها مربعات حوار (msgbox) لنفترض ان اسم البرنامج (HR_SE) اريد ان اجعله كمتغير عشان يسهل علي استدعيه سواء في مربعات الحوا MSGBOX او النماذج وهكذا هل سيكون الكود هكذا ؟؟ Dim title1 as string title1 = "HR_SE" واين اضع هذا المتغير بحيث استدعيه من ي مكان واذا وضعته بالمكان الصحيح كيف صيغة الكود لأستدعائه شكرا لكم
  14. السلام عليكم اسعد الله صباحكم بكل خير المطلوب هو لنفترض ان لدي حقل ترقيم تلقائي (id) كيف اسوي قناع ادخال او نص ثابت وبعده الترقيم التلقائي يكون مثل كذا (1443/1) حيث السنه 1443 ثابت والرقم 1 متغير وهو تلقائي مرفق مثال ترقيم بقناع.accdb
  15. ممتن للطفك ضبطت بالرغم من اني واجهت مشكلة ولكن حذف كود الحذف عند else وضبطت
  16. السلام عليكم لدي نموذج فيه حسابات المستخدمين حيث ان اول سجل هو الادمن كيف امنع المسؤول من حذفه مرفق لكم قاعده لتجاربكممنع حذف اول سجل.accdb
  17. عمل تشكر عليه لكن فكرتك كانت في فقط تحريك شريط التمرير مازال هناك ضغط في النموذج وانا اريد يكون بالنموذج عشر سجلات فقط بحيث ما يكون ضغط عليه وبطريقة ما اذا ضغطنا الصفحه التاليه تظهر لي السجلات العشر التاليه ..
  18. السلام عليكم اسعد الله يومكم سؤالي للأبطال اذا جعلت السجلات تظهر بشكل عناصر متعددة لا أريده يظهر كل السجلات في صفحة واحده حتى لا يكون ضغط على الصفحة وإنما اريد تحديد عدد معين من السجلات ولنفترض 10 سجلات وتظهر بالأسفل ارقام صفحات تنقل اسهم كما في اقسام المنتديات ... سويت عن طريق الاستعلام بإظهار عدد معين ولكن لا ا ستطيع الانتقال إلى السجلات التالية في الصفحة التالية فقط يظهر لي عدد معين بدون التنقل مرفق لكم ملف لتطبيق تجاربكم page1.accdb
×
×
  • اضف...

Important Information