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

الضياء2008

03 عضو مميز
  • Posts

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

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

السمعه بالموقع

14 Good

عن العضو الضياء2008

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    مدرس

وسائل التواصل

  • Yahoo
    diaa_el_attar@yahoo.com

اخر الزوار

1,277 زياره للملف الشخصي
  1. شوف التعديل بس الجداول المرفقة غير منضبطة بالمرة قوائم الفصول.rar
  2. فين بيانات الفصول فى جدول الطلاب ؟ هيتم الاستعلام على أى أساس و لا يوجد تحديد للفصل ولا الصف ولا المرحلة الى الطالب ملتحق بيها
  3. ادخل على الكود وعدل اسم الملف والبارتشن المراد عمل التصدير اليه اصنع ملفجديد على الباتشن f باسم tttt أو غير هنا باللون الأحمر 😕Set dbs = ws.CreateDatabase("f\tttt\Schl_" & i & ".mdb", dbLangArabic) DoCmd.CopyObject "f😕tttt\Schl_" & i & ".mdb", "School", acTable, "School" SlicingDB.rar
  4. دالة مع الملف يحتوى على الكود Option Explicit ' ### Provided By Nart Lebzo For www.officena.net ### Public Function RowNum(FRM As Form) As Variant On Error GoTo Err_RowNum With FRM.RecordsetClone .Bookmark = FRM.Bookmark RowNum = .AbsolutePosition + 1 End With Exit_RowNum: Exit Function Err_RowNum: If Err.Number <> 3021& Then 'Ignore "No bookmark" at new row. Debug.Print "RowNum() error " & Err.Number & " - " & Err.Description End If RowNum = Null Resume Exit_RowNum End Function ثم عنصر التحكم الذى اشرت اليه واضح من الكود استاذنا اللى كتبه
  5. الكود يعمل ... بس انت أكمل باقى النموذج اكيد فيه بيانات أخرى ستضاف لأنه يجبان تظل فى النموذج بعد تحديث بيانات الحقل
  6. تفضل أخى الكريم الكود لأحد عمالقة المنتدى Database111.rar
  7. شرط الترحيل الى جدول سلة المحذوفات أن يكون منقطع لذا لا يوجد خطأ يمكن اضافة السطر التالى فى لتحديث البيانات فى النموذج الأول Me.Requery القصد من شرط الترحيل إعطاء أكثر من اختيار يمكن عمل نفس الخطوات للحذف النهائى أو من أمر حذف المعتاد
  8. أستاذى العزيز كل الفضل يعود لأساتذتى فى هذا المنتدى استمارة 2 تأمينات.rar
  9. معنى الرسالة أنه يجب ضبط اللغة العربية على الجهاز بشكل صحيح
×
×
  • اضف...

Important Information