• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

eyadd

اعضاء
  • عدد المشاركات

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

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

كل شيء نشر بواسطة eyadd

  1. السلام عليكم, و كل عام و انتم بالف خير سؤالي كيف يمكن اظهار رساله (متل رسالة ال comment في Excel) عند المرور فوق زر امر للايضاح ان هذا الزر يعمل كذا؟   شكرا جزيلا
  2. Query Builder

    شكرا اخي اكرم ساقوم بالاطلاع و تطوير الفكره ليستفيد الجميع. في حال وجود افكار اخرى .. ارجو ان لا يبخل علينا بها احد  
  3. السلام عليكم جميعا اود المساعده في ايجاد امثله ولو بسيط في استخدام from كواجهه ديناميكيه في انشاء استعلام مثل query builder.   السبب في ذلك هو وجود العديد العديد من الاختيارات من المستخدم لتشكيل تقرير معين حيث لا يمكن حصر كل تلك الخيارات في انشاء استعلامات لها   شكرا جزيلا لكم اياد
  4. Query Builder

    هل يوجد احد للمساعده؟ هل يحتاج الموضوع للشرح اكثر او انه غير مفهوم؟   شكرا على كل الاحوال
  5. Query Builder

    للرفع .. شكرا
  6. Link Master Field Link Child Field شكرا جزيلا اخت زهره
  7. السلام عليكم اخواني الكرام, في الصورة المرفقه يحتوي النموذج frmMain على: -عنصر treeview و الذي يحتوي على ارقام لوحات السيارات بشكل شجري -عنصر page و فيه معلومات عن هذه السياره المطلوب: هو الربط بين العنصرين اي عند الحدث dblclick في ال treeview ستعدل البيانات المتعلقه بهذه السياره و شكرا جزيلا Fleet Management v1.2.zip
  8. السلام عليكم: لماذا لا استطيع اظهار توقيعي عند اضافه رد في المنتدى؟ شكرا
  9. جهد كبيير تشكر عليه
  10. زر لفتح Character Map

    مشكورة اخت زهرة
  11. زر لفتح Character Map

    حسب علمي لاتوجد طريقة دينميكيه لايجاد الملف التنفيذي المطلوب في لحال اختلاف مسار من جهاز لاخر لذلك توجد طريقتين: 1- اما توحيد مسار الملف التنفيذي في كل جهاز اي ان تدخل على كل جهاز و تضع برنامج Character Map في مسار محدد "c:\my files\Character Map.exe" 2- او ان تغير المسار في ملف الاكسس حسب الجهاز
  12. زر لفتح Character Map

    اكتب في الامر التالي قي زر الامر عند الحدث click Dim stAppName As String stAppName = "C:\Windows\system32\charmap.exe" Call Shell(stAppName, vbNormalFocus) بالتوفيق ان شاء الله
  13. الاخ ابو عيسى تم تعديل الملف حسب طلبك بالتوفيق ان شاء الله Database12.zip
  14. تم التعديل على الملف المرفق بالتوفيق Database12.zip
  15. هناك مشكله في كود تحميل النموذج
  16. انت بحاجه الى استعلام يضم الجداول الثلاثه وليس الى dlookup و تجعل النموذج يقرا البيانات من هذا الاستعلام و ليس من الجداول
  17. اخي الكريم ارفاق مثال يوضح السؤال و يوضح الاجابه
  18. اخي خالد بدلا من ان هناك زري امر استبدلت فكرتك باستخدام خيار "التامين"على النموذج الرئيسي ففي حال ارد اظهار الاشخاص الذي تم تامينهم اضغط على خيار التامين و الا سيتم اظهار جميع الموظفين ملاحظه هامة: في الاصدارات القديمه لاكسس لم يكن لزر الاختيار بنوعيه "Check , Option" الا قيمتي true او false حتى ظهر في نسخة ال 2007 (على ما اعتقد) قيمة ثالثه و هي Null و في مثالك هناك 160 موظف 125 مؤمن 29 غير مؤمن 6 لا توجد قيمه اي null ومنهم ع سبيل المثال الموظف رقم 16090383 فاقتضى التوضيح للاستفاده DataInsur.zip
  19. البحث

    هناك مشكله في تحميل قاعدة البيانات المرفقه انصح بتحميل الملف من جديد بعد التاكد من انه يعمل
  20. بسم الله الرحمن الرحيم لعل الكثير منا (و خاصة المطورين) نواجه مشاكل في تعديل التطبيقات الموجوده على الشبكه ذالك لان عدد من المستخدمين قد يشغلون البرنامج و بالتالي لا يمكن المطور من الدخول و التعديل الا بعد خروج جميع المستخدمين. في هذا الموضوع ساقوم بشرح طربقه سهله و بابسط ما يمكن لحل هذه المشكله باذن الله الهدف: هو اخراج كافه المستخدمين من التطبيق بعد فترة زمنيه محدده من دون الحاجه لدخولك كمطور. خلاصة الطريقه: قيام التطبيق بفحص وجود ملف خارج ال database كل فترة معينه و اغلاق التطبيق عند عدم وجود هذا الملف الخطوات: 1- انشئ مجلدا في السواقه C و سميه My Data 2- انشئ ملفا نصيا فارغا و سميه open.txt 3- غير الاحقه من txt الى abc مثلا ليصبح اسم الملف open.abc 4- انشئ ملف اكسس و ضع فيه اي جدول و اي بيانات 5- انشئ نموذج لهذا الجدول و سميه frmName ثم اغلقه الان نحتاج الى بعض التركيز 6- انشئ نموذجا جديدا غير مرتبط و سميه frmShutDownWarn و ضع فيه text box و سميه txtWarning سيكون في هذا النموذج رسالة التنبيه للمستخدم بانه ستيم انهاء البرنامج لكي يتسنى له حفظ البيانات التي يعمل بها ثم اغلق النموذج 7- انشئ نموذجا جديدا غير مرتبط و سميه frmShutDownCheck سيكون هذا النموذج فارغا من اي شئ مهمة هذا النموذج هو القيام بعميله فحص و التاكد من اسم الملف المذكور سابقا open.abc 8- ادخل على النموذج frmShutDownCheck بوضع التصميم 9- من خصائص النموذج ضع 60000 في خانة Timer Interval اي دقيقه واحده حيث كل 1000 Milisecond تساوي ثانيه و احده (يمكنك تغيير الوقت كما تريد) 10- انقر على زر View Code الموجدود ضمن مجموعه tools كما في الصوره . 11- ثم ادخل الكود التالي: Dim boolCountDown As Boolean Dim intCountDownMinutes As Integer Private Sub Form_Open(Cancel As Integer) ' Set Count Down variable to false ' on the initial opening of the form. boolCountDown = False End Sub Private Sub Form_Timer() On Error GoTo Err_Form_Timer Dim strFileName As String strFileName = Dir("c:\My Data\open.abc") If boolCountDown = False Then ' Do nothing unless the check file is missing. If strFileName <> "open.abc" Then ' The check file is not found so ' set the count down variable to true and ' number of minutes until this session ' of Access will be shut down. boolCountDown = True intCountDownMinutes = 2 End If Else ' Count down variable is true so warn ' the user that the application will be shut down ' in X number of minutes. The number of minutes ' will be 1 less than the initial value of the ' intCountDownMinutes variable because the form timer ' event is set to fire every 60 seconds intCountDownMinutes = intCountDownMinutes - 1 DoCmd.OpenForm "frmShutDownWarn" Forms!frmShutDownWarn!txtWarning = "This application will be shut down in approximately " & intCountDownMinutes & " minute(s). Please save all work." If intCountDownMinutes < 1 Then ' Shut down Access if the countdown is zero, ' saving all work by default. Application.Quit acQuitSaveAll End If End If Exit_Form_Timer: Exit Sub Err_Form_Timer: Resume Next End Sub سيقوم هذا الكود بفحص مسار و اسم الملف open.abc كل دقيقه, و في حال عدم وجود هذا الاسم في المسار C:\My Data\open.abc سيقوم باظهار رسالة التنبيه للمستخدم و بعدها بدقيقه سيتم حفظ جميع البيانات و سيغلق البرنامج تلقائيا ملاحظه هامه جدا: لكي نضمن دوام عملية الفحص يجب ان يكون النموذج frmShutDownCheck مفتوحا و مخفيا طول فترة استخدام التطبيق لذلك نقوم بما يلي: 12- انشئ مايكرو لفتح النموذج frmName و frmShutDownCheck 13- عند خاصية Window Mode للنموذج frmShutDownCheck اجعلها Hidden كما في الصوره 14- اغلق المايكرو و سميه autoexec تماما .. لكي يقوم بفتح النموذجين تلقائيا عند فتح التطبيق, الان اغلق ملف الاكسس لتجربة ما قمت به, عدل اسم ملف open.abc و اجعله اي شئ اخر او انقله الى سطح المكتب او اي مسار اخر و راقب ما سيحدث في ملف الاكسس ملاحظه هامه: اسم الملف open.abc يختلف عن Open.abc او OPEN.abc او open.txt و عند الاختلاف يقوم باجراءات اغلاق التطبيق مميزات الطريقه السابقه عن غيرها من الطرق: 1- تمنح المستخدم بعضا من الوقت لانهاء و حفظ عمله قبل الاغلاق 2- سيتم اغلاق البرنامج حتى لو كان كومبيوتر المستخدم في وضع Work Station 3- لاداعي للمطور ان يدخل علىالتطبيق و يقوم بتغيير اي شيء للاخراج المستخدمين بل يكفي فقط تغير اسم او مسار الملف الذي في مثالنا open.abc 4- لا داعي ان يكون التطبيق مصمم على طريقة Client - Server لتجربة المف المرفق: قم بفك الضغط و ضع الملفين في المسار C:\My Data اخيرا ارجو ان اكون موفقا في شرحي و اتمنى ان يكون هناك اي سؤال او اضافه او مشاركه في هذا الخصوص .. و لا نتسونا من صالح الدعاء لي و لكم الحمد لله الذي تتم بنعمه الامور open.zip
  21. شكرا على اهتمامك .. و بانتظار رايك الكريم بعد التجربه تقبل تحياتي
  22. مثال جميل جدا اخي dbprog و انا شخصيا استفدت منه لكن هناك ثلاث امور لا ياخذها هذا المثال بالاعتبار: 1- لا يتم اغلاق التطبيق في حال فتح المستخدم له و اغلاق جهازه في وضع ال work station 2- يعتمد على تصميم من نوع client-server حيث يجب على المطور الدخول الى ملف ال server و كتابة No .. ولكن ليس كل التطبيقات تحتاج الى client-server 3- في هذا المثال يتوجب وضع كود الاغلاق في كل نموذج مع التايمر الامر الذي قد يتعارض مع اي نموذج في التطبيق يحتاج الى تايمر لقد قمت باضافه طريقه اخرى على الرابط التالي: http://www.arabteam2000-forum.com/index.php?showtopic=249910 ارجو منكم الاطلاع و مناقشته لاغناء الموضوع شكرا
  23. السلام عليكم جميعا, اريد ان اسأل اهل الخبره: 1- ما هي الطرق الممكنه لاخراج جميع المستخدمين من تطبيق اكسس معين ؟ (علما اني لست Admin على الشبكه) 2- هل توجد طريقه لاخراجهم مثلا بعد ان اضغط على زر امر مخفي, بخمس دقائق مثلا؟ شكرا مقدما