أبوبسمله

بالنسبه لليوزر اسم المستخدم فى اول صفحة فقط تم لااعلم ان كانت هتنفع او لا ان شاء الله يشاركنا اخواننا واساتذتنا جزاهم الله خيرا بالتوفيق 1311_11.DATA12.mdb

وعليكم السلام اخى @abouelhassan اتفضل شوف التقرير هل هذا ما تريد ؟ واعطنى اسم يوزر وباسورد للاطلاع ع ما تريد بالتوفيق 1311.11.DATA12.rar

وعليكم السلام اخى واستاذى @sandanet اتفضل ان شاء الله يكون ما تريد Private Sub Command25_Click() Dim mydb, mydac Dim strSQL As String mydb = IIf(Nz(Me!textbox2.Value) = "", "Null", "#" & Me!textbox2.Value & "#") strSQL$ = ("INSERT INTO table1 ([fullname] , [date_birth]) VALUES('" & Me!textbox1 & "', " & mydb & ")") CurrentDb.Execute strSQL, dbFailOnError subfrm.Requery MsgBox "تم حفظ البيانات بنجاح", vbInformation + vbMsgBoxRight, "تنبيه" End Sub بالتوفيق اخى example(1).accdb

السلام عليكم اخوانى محاولتى على قدر معرفتى وان شاء الله يشاركنا اخواننا واساتذتنا جزاهم الله خيرا قمت بانشاء استعلام ثم قمت بادراج المعادلات التى بحقلى مكعب وجمله بداخل الاستعلام وقمت بتصفيه الاستعلام بناء على رقم الفاتوره ثم قمت باستخدام دوال التجميع dcount للعدد و Dsum للاجمالايات a1.accdb

وعليكم السلام اخى هانى شوف الاستعلام الجدولى sheet_Crosstab والتقرير sheet_Crosstab لعله يفيدك ان شاء الله بالتوفيق sheet_hani(1).mdb

جزاك الله خيرا على التفسيرات الرائعه التى اعشقها لاننى اتعلم منها كل يوم 💐 بارك الله لنا فيك وبارك لك فى كل ما تحب

جزاك الله خيرا اخى ومعلمى العزيز @jjafferr 💐 من الامس وانا بضرب اخماس فى اسداس بسبب هذا الخطأ الى ان هدانى الله اليوم لازالة تعريف المتغيرات وحصلت على خطأ قيم فارغه فقمت باستخدام nz ولم يخطر ببالى استخدامها داخل الاستعلام جزاك الله خيرا معلمى العزيز

شكرا اخى ابواشرف @عبد اللطيف سلوم على المساعده ولكن ليس هذا المطلوب المطلوب هو جمع عمود القيم الناتج عن الفنكشن اتفضل اخى @Matin_Murad تم تغيير بسيط فالفنكشن Function test(a, b) test = Nz(a, 0) * Nz(b, 0) End Function بالتوفيق اخوانى price_fa(2).accdb

أخي واستاذي العزيز @jjafferr برجاء الاطلاع عالمشكله وافادتنا

صراحه لا اعلم ما سبب الخطأ وقد حاولت قدر استطاعتى ولم اتوصل لحل وسوف انتظر الاجابه معك من احد اخواننا واساتذتنا جزاهم الله عنا كل خير بالتوفيق

اى طريقه قمتى بتجربتها ؟ لقد قمت بعمل الخطوات التى اشار بها اخى واستاذى ابوابراهيم الغامدى بالاعلى على 2019 وتمت بنجاح

وعليكم السلام اتفضل اخى ان شاء الله يكون ما تريد بالتوفيق price_fa.accdb

استاذه @نيفين محمد 2021 لما لم تستخدمى طريقه استاذ @أبو إبراهيم الغامدي ومثلها الطريقه الاخرى لاستاذ جعفر الذى تم وضع رابطها لك من استاذ محمد الحلوانى ؟ فهذه الطرق ايسر جربى الطريقه قومى بالخطوات لاستاذ جعفر المذكوره بالرابط واليكى الرابط مره اخرى بالتوفيق

وعليكم السلام ورحمه الله وبركاته اخى الفاضل هنا منتدى تعليمى ومساعده الاعضاء ع حلول المشاكل اثناء عملهم وتباددل الخبرات اذا اردت قم بوضع طلبك فى قسم الاعلانات بالموقع عالرابط التالى https://www.officena.net/ib/forum/157-إعلانات-شخصية-بأجر-للاعضاء/ بالتوفيق

تمام وجميل انك تحاول مع الاستفسار ما اسم النموذج المطلوب العمل عليه ؟ بالتوفيق

وعليكم السلام اتفضل اطلع ع هذا الرابط لعلك تستفيد منه وجزاه الله خيرا اخى ابوامنه بالتوفيق

السلام عليكم اتفضل اخى هل هذا ماتريد؟ Requery(1).accdb

بالاضافه الى ما وجهك اليه اخى ومعلمى العزيز ابوخليل جزاه الله عنا كل خير قم بتعديل السطر الاول من الكود الى Dim rst As dao.Recordset بالتوفيق

السلام عليكم اخى امير راجع اعدادت اللغه لديك بالتوفيق

وعليكم السلام بعتذر فلم اطلع عالنموذج بالامس ولكن اطلعت عالتقرير راجع المرفق الى ان ارجع ان شاء الله بالتوفيق Test.pdf Employee1.accdb

السلام عليكم اخوانى مشاركه مع اخى العزيز @biskra هل هذا ما تريد ؟ Employee.accdb

اخي بيسكرا الملف يعمل عندي حتى بعد الضغط والاصلاح ربما لوجود كتابه باللغه العربيه طب جرب عمل مثال نفسه ع جهازك ثم قم بنقل الكود وان شاء الله سوف اقوم بمراجعته مره اخرى عند عودتي من العمل بإذن الله الشكر لله ثم لإخواننا واساتذتنا جزاهم الله خيرا بالتوفيق

السلام عليكم مشاركه مع اخى واستاذى العزيز @biskra جزاه الله خيرا 💐 اتفضل اخى @Matin_Murad هل هذا ما تريد Private Sub Form_Load() Call strTime End Sub Private Sub Form_Timer() Call strTime End Sub Sub strTime() x = CDbl(Now) - CDbl(TimeValue("12:00:00")) Me.xxx = Format(TimeValue(CDate(x)), "HH:NN:SS") End Sub بالتوفيق ساعة رقمية 12.accdb

وعليكم السلام اخى محمد جزاك الله خيرا ع مشاركتك لنا هذا المثال الجميل بارك الله فيك هل ممكن تزويدنا بالموقع ايضا ؟ تقبل تحياتى اخوك الصغير احمد

السلام عليكم اخوانى واساتذتى لااملك الا الدعاء لكم جزاكم الله عنا كل خير وان يبارك لكم فى كل ما تحبون وان يرزقكم الفردوس الاعلى اتمنى ان اجد الوقت الكافى لاتفحص الامثله واتعلم منها فهذا مستوى متقدم على وان شاء الله ربنا يعينى عليه جزاكم الله خيرا اساتذتى الكرام