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

ام ناصر

03 عضو مميز
  • Content Count

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

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

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

16 Good

3 متابعين

عن العضو ام ناصر

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

  • Gender (Ar)
    أنثي
  • Job Title
    طالبة علم

اخر الزوار

857 زياره للملف الشخصي
  1. ام ناصر

    حذف مرفقات

    كل الشكر والتقدير لأستاذنا الفاضل جعفر لسعة الصدر في الرد على تساؤلاتنا فعلاً كنت طالبة شرح للاختصارات الموجودة في الكود لعدم معرفتي في آلية أستخدامها اضافةً لطلبي حذف المرفق وفق شرط والنتيجة كانت مرضية وشكر كبير للأستاذ عبد الفتاح لمشاركته الموضوع وافادتنا بطريقة اخرى للحل ، فجزاكما الله عنا خير الدنيا والآخرة .
  2. ام ناصر

    حذف مرفقات

    اهلا استاذ جعفر سلمت الايادي .. الكود يحذف جميع المرفقات في الجدول لو تفضلت بشرحه اكون شاكرة لك لاني حاولت جعل الحذف لمرفق محدد كأن يكون المفتوح في النافذة فقط ظهر لي خطأ في استكمال تنفيذ الشفرات البرمجية . strSQL = "SELECT Table1.ID, Table1.image FROM Table1 WHERE (((Table1.ID) Like [Forms]![Form1]![ID]) AND ((Table1.image.FileName) Is Not Null));" Option Compare Database Private Sub Command32_Click() Dim strSQL As String Dim rst As DAO.Recordset '1_________>> DAO.Recordset Dim childrst As DAO.Recordset Dim db As DAO.Database Dim RC As Integer Dim i As Integer 'from https://stackoverflow.com/a/42239279 strSQL = "SELECT * FROM Table1 WHERE Not (Table1.image.FileData) Is Null;" Set db = CurrentDb Set rst = db.OpenRecordset(strSQL, dbOpenDynaset, dbSeeChanges) '2__>>.OpenRecordset(strSQL, dbOpenDynaset, dbSeeChanges) If Not rst.BOF And Not rst.EOF Then '3_______>> BOF rst.MoveFirst___________________ '4_______>>MoveFirst End If Do Until rst.EOF Set childrst = rst.Fields("image").Value childrst.MoveLast: childrst.MoveFirst '5___>> childrst.MoveLast (:) childrst.MoveFirst RC = childrst.RecordCount For i = 1 To RC childrst.Delete childrst.MoveNext Next i rst.MoveNext Loop End Sub
  3. ام ناصر

    حذف مرفقات

    السلام عليكم .. اساتذتي الافاضل هل هنالك طريقة او شفرة برمجية تمكني من حذف المرفقات من نوافذ الاكسس من دون الضغط على المرفق من نافذة التعديل واختيار الامر remove . المثال المبسط مرفق ادناه..مع التقدير مثال1.rar
  4. ام ناصر

    مقارنة تاريخ مع عدة فترات

    المثال الثاني موافق لما طلبت جزاك الله عنا خير الجزاء استاذ .
  5. السلام عليكم ورحمة الله بداية احب ان ابارك لجميع اعضاء المنتدى حلول شهر الله الفضيل اعاده الله على الجميع باليمن والبركات وقبول الاعمال🌷 اساتذتي الافاضل لدي مثال مبسط مرفق ادناه الفكرة منه هي عند ادخال تاريخ غياب في النموذج ويكون هذا التاريخ غير داخل ضمن الفترات الموجودة في الـ (Sub form) التي تعتبر فترة استحقاق راتب يعطي البرنامج رسالة تنبيه (عذرا تاريخ الغياب غير داخل ضمن فترات الاستحقاق السابقة ). شكري وتقديري لكل من يتابع الموضوع . p1.rar
  6. من هذا نفهم ان عمل قاعدة البيانات مرتبط ايضا بملفات انظمة الحاسوب واصداراته وليس فقط على اصدار الاوفس ؟؟
  7. السلام عليكم ورحمة الله لدي قاعدة بيانات تعمل بصورة جيدة على جهاز الحاسوب الخاص بي عند نقلها على جهاز آخر ذو مواصفات أعلى تظهر رسائل النظام ادناه على الرغم من ان نسخة الاوفس المستخدمة هي نفسها في كلا الجهازين ,كيف يمكنني حل هذه المشكلة وتلافي ظهور تلك الرسائل . مع التقدير لكل من يتابع الموضوع ..
  8. وعليكم السلام والرحمة شكراً جزيلا استاذتي الافاضل ابا جودي وابو خليل لم يبدر منكم اي تقصير في ابداء المعلومة ومشاركتها معنا في هذا الصرح العملاق بالكفاءات العلمية اكيد استاذ واعتقد اثناء التحويل ايضا يتتطلب انشاء مفاتيح فريدة للجداول ان شاء الله مواصلة عملية البحث عن حل مع املي بأيجاد الاجابة من ذوي الخبرة بعملية التحويل وتكبير قاعدة البيانات
  9. استاذي الفاضل @ابا جودى قمت بتجربة مااشرت اليه وتم تغيير الامتداد بنجاح الا ان بيانات احد الجداول اثناء تحويلها الى الـ SQL server 2012 قد فقدت ولم تتم عملية التحويل بصورة صحيحة فما العمل بهذه الحالة ؟ الصور ادناه مع التقدير
  10. السلام عليكم ورحمة الله لدي قاعدة بيانات بحجم MB 996 عند تغيير امتدادها من accdb الى mdb يظهر المسج ادناه ولايتم تحويل قاعدة البيانات بالامتداد المطلوب كيف يمكنني تلافي هذه المشكلة ؟ مع الشكر والتقدير لكل من يتابع الموضوع او يرفدني بروابط لطريقة التحويل ..
  11. شكراً جزيلاً اخي الفاضل @kaser906 جزاك الله عنا خيراً .
  12. نعم اخي @kaser906 المثال الذي ارفقته تم فيه التوصل للنتيجة المطلوبة هلا تفضلت عليَ بتوضيح ما تم التعديل فيه لاني بحثت ولم اتوصل لنتيجة
×