kanory

اذن كل ما عليك فعله البحث في المنتدى حتى تجد ذلك الكود المبسط ...

تفضل <><><><><><><><><> all-by-yesno.accdb

اول ما تشغل البرنامج مباشرة اضغط شيفت

نعم ممكن ولكن باستخدام تصميم التقرير برمجيا ...

ابحث في الموقع تجد العديد من الموضوعات مثل هذا <><><><><><>

تفضل <><><<><><>< Test (10).accdb

كلام اخي عمر صحيح ..... بالاضافة الى ذلك انظر ....

بارك الله فيك ..... الحمد لله رب العالمين .... بالتوفيق استاذي الفاضل

هنا تجد الاجابة لمن يريد ؟

تأكد من انواع الحقول وتنسيق كتابتها : نص او رقم او تاريخ ....

Replace(Replace(Replace([text1];"/";"-");"(";"-");")";"-")

جرب المرفق ......... بحث احترافي.accdb

جرب للهجري هذا ..... Me.RecordSource = "hijriDate" وغير الجدول للميلادي بنفس الطريقة

اشر اطراءك اخي واستاذي الفاضل احمد ... بارك الله فيك

انظر يا حلو .... جرب الملف واعلمنا ..... all-by-yesno.accdb والطرق كثيره .... انت ماذا تريد بالضبط .... هل المقصد تصدير التقرير ام ماذا ؟؟؟؟؟؟

وهذه مشاركة مع اساتذتي الكرام ... مع التحية لهم جميعا ..... If DCount("*", "[Students]", "[ID]=" & Me.Text0) > 0 Then Dim rst As DAO.Recordset Dim fld As Field Dim a As Integer Set rst = CurrentDb.OpenRecordset("SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & _ "FROM Students " & _ "WHERE (((Students.ID)=" & [Forms]![Form]![Text0] & "));") For a = 1 To rst.RecordCount For Each fld In rst.Fields If IsNull(fld.Value) Then MsgBox "قم باكمال البيانات" & "(" & fld.Name & ")" & "ليس هناك بيانات في الحقل" DoCmd.OpenQuery "استعلام1", acViewNormal Exit Sub End If Next fld rst.MoveNext Next a rst.Close: Set rst = Nothing DoCmd.SetWarnings False DoCmd.RunSQL "INSERT INTO Team ( ID, Fullname, tel, Degree, class ) " & vbCrLf & _ "SELECT Students.ID, Students.Fullname, Students.tel, Students.Degree, Students.class " & vbCrLf & _ "FROM Students " & vbCrLf & _ "WHERE (((Students.ID)=[Forms]![Form]![Text0]));" DoCmd.SetWarnings True Me.Text0 = "" Else MsgBox "هذا القيد غير موجود" End If Me.Requery Me.Text0 = Null Me.Text0.SetFocus Example.accdb

هناك مواضيع عديدة لمعالجة هذه المشكلة منها هذا الموضوع ... وهناك موضوع لاستاذي @ابو جودي .. ولكن لم اعثر عليه الان .. ابحث عنه تجده في المنتدى ...

جرب الكود التالي ...... اللجان والتصحيح7.4.accdb

نعم .... ولكن هناك مشاكل ... اعتقد يمكن حلها

ممتاز ... هذا هو الهدف من المنتدى ...

الحقيقة اخي لا اعلم ما المشكلة لديك ... جرب المرفق على اجهزة اخرى ... جتى نعلم هل المشكلة من جهازك ام ماذا ؟؟

طيب جرب الملف والتعديلات الموجوده بها واعلمنا بالنتيجة <><><><><><><> BOOK (2).accdb

حياك الله في اي وقت ...... قدر معرفتنا بالمعلومة لن نبخل على المنتدى بالاجابة في حال توفرها لدينا ..... ولكن في حال عدم معرفتنا لها بصمت ولا نجيب ..... شكرا لك

معلومات قيمة اخي ابا ابراهيم ... شكرا لك