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

ابو محمد 316

03 عضو مميز
  • Posts

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

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

كل منشورات العضو ابو محمد 316

  1. السلام عليكم ورحمة الله هذى مثال من موقع اجنبي يرسل الملفات والصور من الاكسيس الى اوتلوك مع نص الرسالة ...... يمكن تستفيد منه بالتوفيق إن شاء الله OutlookEmail1.rar
  2. السلام عليكم ورحمة الله وبركاته إضافة الى ماقدم الأخ والأستاذ محمد أبوعبدالله هذى مثال من موقع اجنبي يتكون من جدول " لحفظ الرسائل " و نموذج ووحدة نمطية ربما يفيدك بالتوفيق إن شاء لله test (3).accdb
  3. السلام عليكم ربما هذى المثال قد يفيدك من موقع اجنبي بالتوفيق إن شاء الله SignatureCapture (1).zip
  4. السلام عليكم ورحمة الله وبركاته اخي الكريم اعتقد انه يوجد خطاء في وضع معلومات الاجازات والتنقلات وغير ذلك في جدول واحد تحتاج الى تقسيم البيانات الى جداول جدول معلومات الموظف الأساسي يحتوى على الحقول التالية ( الاسم رقم الموظف مسمى الوظيفة تاريخ التعيين....... ) جدول الاجازات جدول التنقلات جدول الترقيات كل معلومات ذات سمة مشتركة يفترض ان تكون في جدول مستقل ويتم الربط بين الجداول بحقل رقم الموظف مع جدول الموظفين الاساسي والله اعلم بالتوفيق إن شاء الله
  5. السلام عليكم يمكن هذى الى ترغب فيه بالتوفيق إن شاء الله 123456.rar
  6. السلام عليكم ورحمة الله وبركاته بارك الله فيك وحفظك الله ورحم الله والديك نعم هذى الذي كنت ارغب في تصميمة حفظك الله في حالة اذا ارغبت يكون التاريخ اكبر من اين اضع علامة اكبر من في الاستدعاء Call updateData(100, #1/1/2019#)
  7. حفظك الله اخي الكريم الفلاحجي اعتقد ان الملف الذي ارفقته يتطلب وجود استعلام والحقيقة انني لا ارغب في استخدام استعلام فقط وحدة نمطية يمكن استدعيه من النموذج او التقرير Call updateData حفظكم الله
  8. السلام عليكم ورحمة الله هل السؤال غير واضح ؟ وهل هناك جواب لهذي السؤال او نصيحه او توجيه او شي من هذى القبيل اسال الله التوفيق للجميع
  9. السلام عليكم ورحمة الله وبركاته بارك الله فيكم
  10. السلام عليكم هل هناك صعوبة في السؤال
  11. السلام عليكم ورحمة الله وبركاته اتنمنا ان اجد حل هذى كود يقم بعد السجلات Function CO2() On Error GoTo co2_Err With CodeContextObject If DCount("[ID]", "Tbl1") > 5 Then كود التاكد من تاريخ ادخال اسجلات كود تنفيذ استبدال الارقام MsgBox " " End If End With co2_Exit: Exit Function co2_Err: Resume co2_Exit End Function جملة الاستعلام في الكود والتي تفرز الذين تم تسجيلهم بعد التاريخ المحدد DoCmd.RunSQL strSQL = "SELECT Tbl1.daRACORD " & vbCrLf & "FROM Tbl1 " & vbCrLf & "WHERE (((Tbl1.daRACORD)>=#1/1/2010#));" كود تبديل الارقام بشرط يكون تاريخ تسجيله اكبر من التاريخ المحدد في جملة الاستعلام السابقة Dim RecAdo As New ADODB.Recordset RecAdo.Open "Tbl1", CurrentProject.Connection, adOpenStatic, adLockOptimistic, acTable Dim i As Integer For i = 1 To RecAdo.RecordCount RecAdo!id = Replace(RecAdo!id, "111", "3") RecAdo.MoveNext Next RecAdo.Close Set RecAdo = Nothing End Sub الى ارغب فيه هو تكون كل هذى الاكواد في وحدة نمطية بحيث استدعيه من التقارير او النماذج بارك الله فيكم
  12. السلام عليكم ورحمة الله الأخوة الكرام هل هناك حل
  13. السلام عليكم ورحمة الله الأخوة الكرام هل هناك حل لهذى المشكلة او أن السؤال غير واضح
  14. السلام عليكم ورحمة الله وبركاته قد تختلف الحماية على حسب البرنامج نسخه للعرض او نسخه تم بيعه البرنامج الذي يتم بيعه يكون قد تم تحويله الى صيغة mde او صيغة accde مع بعض الحمية البسيطة مثل كتابة اسم الجهة التي يتم بيع البرنامج لها في التقرير بحيث قد يصعب التعديل عليه البعض يربط البرنامج برقم قطعة في الجهاز " لا انصح بذلك " اما النسخة التي تكون للعرض والتجربة فيختلف الوضع يجب وضع حماية لهذى النسخه مثل 1- ربط البرنامج برقم قطعة في الجهاز مثل رقم المعالج او المذر برد " اعتقد انه يوجد امثلة على ذلك في المنتدى " 2- زرع ملف في النظام " اذا وصل عدد السجلات الى عدد محدد يحذف هذى الملف تلقائي " وهو مطلوب لتشغيل البرنامج 3- ادخال عدد محدد من السجلات التي يتم حفظه في البرنامج 4- تفعيل البرنامج برقم من قبل المصمم " اعتقد انه يوجد مثال على ذلك ربما للأخ أبو عقيل " 5- ربط البرنامج بتاريخ محدد بعد هذى التاريخ يتم إيقاف البرنامج 6- السماح بتشغيل البرنامج لعدة مرات فقط 7- تشفير الجداول بعد انتهاء فترة التجربة او ادخال العدد المسموح به من السجلات "في حالة اذا تم الشراء البرنامج يتم فك الشفر عن الجداول من قبل المصمم" ويستمر البحث عن حماية الأفكار فهي لا تقل أهمية عن البرنامج ربما هناك بعض الطرق للحماية لنسخ العرض قد يذكرها بعض الاخوة لتعم الفائدة والله اعلم بالتوفيق إن شاء الله
  15. السلام عليكم ورحمة الله ربما تحتاج الى إضافة حقل تاريخ بحيث لا يعرض النموذج المستمر الى ماتم إدخاله من البيانات في نفس اليوم او تغير خصائص النموذج الى ((ادخال بيانات =نعم )) والله اعلم بالتوفيق أن شاء الله
  16. بارك الله فيك انا استخدم هذى الخط لاكن ابحث عن خط افضل من هذى
  17. السلام عليكم ورحمة الله وبركاته ابحث عن افضل خط عربي يستخدم في التقارير بالتوفيق إن شاء الله
  18. السلام عليكم ورحمة الله اذا كان حقل التاريخ يستخدم التاريخ الهجري ربما تحتاج الى بعض التعديلات على الاستعلامات اذا تم تحويل قاعدة البيانات الاكسيس الى sql server وتم الربط باستخدام ODBC والله اعلم بالتوفيق إن شاء الله
  19. السلام عليكم ورحمة الله ربما هذى الملف قريب جداً من المطلوب بالتوفيق إن شاء الله Count if (1).accdb
  20. السلام عليكم ورحمة الله ربما ان افضل طريقة هي انشاء جدولين الجدول الأول يحتوي على الحقول (أمر الشغل - رقم الماكينة - الوردية - التاريخ) والجدول الثاني يحتوي على حقول "أمر التشغيل او رقم الماكينة او التاريخ " من حقول الجدول السابق لغرض الربط بين الجدولين ويضاف اليه الحقول التاليه ( عدد الأعطال - وقت الأعطال - ملاحظات ) ربما هذى الطريقة تفيدك مستقبلاً في تتبع اعطال الماكينة....... والله اعلم بالتوفيق إن شاء الله
  21. السلام عليكم ورحمة الله جرب تغيير اسم قاعدة البيانات جرب نقل قاعدة البيانات الى مجلد ثاني بعد تعديل الاسم بالتوفيق إن شاء الله
  22. السلام عليكم ورحمة الله اعتقد انك ترغب في انشاء تقرير كامل عن جميع المعاملات ( لم يتم الرد ، تم الرد ، تم الحفظ ، ......... ) تحتاج الى برنامج صادر و وارد " موجود في الموقع كثير وهى مفتوح المصدر " ربما تستفيد منها بالتوفيق إن شاء الله
  23. السلام عليكم ورحمة الله وبركاته ملاحظة على النموذج المرفق في المشاركة السابقة يمكن استبعاد حقل العمر ويكتفا بحقل تاريخ الميلاد ومن ثم انشاء استعلام يحسب العمر الحقيقي ويمكن إضافة حقل المستوى التعليمي لكل شخص من افراد الاسرة والله اعلم بالتوفيق إن شاء الله
  24. السلام عليكم شكراً لك مثال ممتاز بالتوفيق إن شاء الله
×
×
  • اضف...

Important Information