طالب علم مبتدىء

اتفضل هذا مثال كنت اتعلم عليه بلغة الاستعلامات SQL على الرابط التالى لغة الإستفسارات البنيوية SQL بالتوفيق DataBaseSQL.rar

للرفع

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

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

اختى الكريمه ام عهود المشكله فى كود الاغلاق هذا Private Sub CmdClose_Click() On Error Resume Next Me.Kind = "" If IsNull(Me.Kind) Or IsNull(Forms!frmMain!FRMALL.Form!Names) And IsNull(Forms!frmMain!FRMALL.Form!Kod) Then DoCmd.Close ElseIf MsgBox("åá ÊÑíÏ ÍÝÙ Ç…

بارك الله لنا فيكى يا ام عهود وجعل الله ما تقدمينه لنا فى موازين حسناتك

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

اللهم آمين

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

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

وبارك الله فيكى يا ام عهود اعتذر عن الاطاله قمت بنسخ زر الاغلاق والحفظ من الامثله السابقه لى ووضعتها على المثال الاخير بالنموذج frmall ولكن لم تعمل فى الاستخدام من على النموذج frmmain قمت بعمل بعض تغييرات فى الاكواد ولكن لم تعمل ايضا ارفق الملف للنظر فيه تقبلى…

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

بارك الله فيكى يام عهود قربت كتير يا ام عهود وتسلم ايدك على هذه التعديلات باقى شىء واحد الان فى النموذج frmMain فى حالة ادخال رقم بطاقه موجود من قبل تظهر الرسائل تمام ولكن عندما ارغب بالضغط على نعم اريد اضافة بيانات اخرى تطلع رسالة خطأ ولا يتم فتح النموذج frma…

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

اختى زهره بارك الله لكى فى عملك واولادك ووقتك اللذى تقضينه بيننا فى سبيل العلم تم اضافة 10 سجلات لكل اداره كما طلبتى لى ملحوظه صغيره فى حالة الادخال لم يتم تثبيت الاداره جزاكى الله عنا كل خير يا ام عهود za-TestNum-UP1.rar

اخوانى قمت باستخدام هذا الكود لاختنا ام عهود فى مثال سابق لها Private Sub strNameN_AfterUpdate() Me.strNumber.SetFocus Dim vLastN As Variant Dim iNext As Integer vLastN = DMax("[strNumber]", "[tblName2]", "[strNameN] LIKE '" & strNameN & "'") If IsNull(vLastN)…

up

للرفع

تم رفع الملف مره اخرى للمنتدى تمنياتى للجميع بالتوفيق language SQL_PLSQL.zip

up