اذهب الي المحتوي
أوفيسنا

kanory

الخبراء
  • Posts

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

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

  • Days Won

    138

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

  1. اخي الكريم اعمل استعلام الحاق للبيانات المطلوبه
  2. اخي الكريم المنتدى لخدمة جميع اعضاء المنتدى ولا ترسل الطلبات على البريد وانما يضعها الاعضاء والمشرفين في نفس ردودهم ليستفيد منها الجميع ... بارك الله فيك
  3. اخي اجعل النماذج الاخرى لا تفتح الا بفتح نموذج التسجيل .
  4. أخي الكريم السلام عليكم ورحمة الله وبركاته هذه المقالات مفيدة في هذا الجانب
  5. وعليكم السلام ورحمة الله وبركاته أخي الحبيب أبا خليل كما تعلم أخي أن الاكسس لا يصدر التقرير الا للصيغ المعروفة اكسل وررد بي دي اف وغيرها أما الصور فلا يتم .... لذلك يمكن استخدام برنامج SnagIT وجعل الطابعة الخاصة بها افتراضية ثم طباعة التقرير غلى هذا الاساس أرجو ان اكون قد أوصلت الشرح بالطريقة الصحيحة ... بارك الله فيك
  6. أخي عصام استخدم هذا الكود DoCmd.OutputTo acOutputReport, "كشف متابعة الطلاب", "MicrosoftExcelBiff8(*.xlsx)", "", True, ".xlsx", , acExportQualityPrint
  7. لمعرفة تاريخ الميلاد استخدم Me![DateOfBirth] = Format(IIf(Left([IDNumber], 1) = 3, Mid([IDNumber], 2, 2) + 2000, Mid([IDNumber], 2, 2) + 1900) & "/" & Mid([IDNumber], 4, 2) & "/" & Mid([IDNumber], 6, 2), "yyyy/mm/dd")
  8. اضف هذا السطر في بداية الكود On Error Resume Next
  9. اخي الكود سليم ...
  10. عفوا ماهي التغليمة البرمجية التي هي تحت هذا الزر
  11. وعليكم السلام ...... يبدو والله أعلم أن هناك السجل الحالي مفقود أو غير موجود أو ان مربع النص خالي
  12. وعليكم السلام ورحمة الله وبركاته استخدم txt1 = Mid(txt, 6, 1) ' txt1 اسم مربع النص الذي يظهر الرقم الخامس ' txt مربع النص الذي به الرقم
  13. وعليكم السلام ورحمة الله وبركاته .... فكرة . بدلا من الاخفاء قم بتشفير بياناتك الهامة في تلك الجداول .
  14. للاسف اخي ليس لدي اوفيس ١٠ لاجرب
  15. وعليكم السلام ورحمة الله اخي انظر هنا
  16. تفضل أخي الكريم هل هذا مطلوبك Ka_tast1.rar
  17. وعليكم السلام اسمح لى أخي جعفر ..... لأن السؤال باسمك .... أرجو المعذرة تفضل هل هذا مطلوبك Ka_tast.rar
  18. وعليكم السلام ورحمة الله وبركاته أرجو أن يكون هذا هومطلوبك Kanory-Path.rar
  19. مشاركتي خجوله لأني اشارك بعد مشاركة حبيبنا جعفر ... استاذنا الكبير Ka-‏‏example.rar
  20. موجودة الخانة اخي امكن المشكلة في جهازك .. هل هو جوال ام كمبيوتر
  21. الاستعلام للربط بين الحقول . بارك الله فيك
  22. تفضل ضغ هذا الكود في الفورم Private Sub Form_Timer() If MyTime = Empty Then MyTime = Now() 'غير الرقم واحد الى الرقم أو الدقائق المطلوبة If Now() >= DateAdd("n", 1, MyTime) Then DoCmd.Close End Sub
×
×
  • اضف...

Important Information