أبو أحمد

جزاكم الله خيرا ولكن بصراحة انا وجدت الكود الثاني أفضل أحيانا فاذا كان text به بيانات فيقوم بحذفها أو العكس If IsNull(Me.text1) Then Me.text2 = "" Else Me.text2 = 2 End If في حين مع الكود الاول لا يقوم بالحذف وهذه معلومة لحضرتك بعد تجربتها الان فقط وجزاكم الله خيرا وبارك فيكم

جزاكم الله خيرا ولكن لزيادة توضيح اذا اردت المعنى اذا كانtext1 تساوي صفر أو فارغ يكون text2 قيمته تساوي واحد والا فتكون قيمة text2 تساوي 2 لتكون هذه هي النتيجة : أيهما اكنب له If Me.text1.Value = "" Then Me.text2 = 1 Else Me.text2 = 2 End if أم أكتب له هذا If IsNull(Me. text1) then Me.text2 = 1 Else Me.text2 = 2 End if

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

في انتظار حضرتك وجزاك الله خيرا

هل معنى ذلك أن معنى السؤال الاول هذا If Me.text1.Value = "" Then Me.text2.Value = "Adel" Else Me. text2.Value = "Ali" End if نفس النتيجة ونفس المعى لهذه ؟؟؟؟ If IsNull(Me.text) Then Me.text2.Value = "Adel" Else Me. text2.Value = "Ali" وأسف لاني لم أفهم اجابة السؤال الثاني أرجو التوضيح أكثر وحبا لو بمثال وجزاكم الله خيرا End if

الاساتذة الكرام أعضاء المنتدى / السلام عليكم ورحمة الله في اكسس 2003 ممكن أعرف أيه الفرق بين If IsNull(Me.text) then if me.text.value = "" then وبعد اذنكم سؤال آخر .... في مربع تحرير وسرد ما الفرق بين خاصية تحديث وخاصبة تغيير وجزاكم الله خيرا

جزاكم الله خيرا هذا هو المطلوب تسلم وبارك الله فيكم

للاسف الملف كبير جدا وصعب ارساله هل يمكنكم تعجيل الكود ؟؟؟

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

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

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

جزاكم الله خيرا ولكن هل يمكن تعديله مرة ثانية بعذ اذنكم لو سمحتم If IsNull([YourFeild]) Then Eval ("MsgBox('حقول بحاجة لتعبئة:" & vbCrLf & vbCrLf & _ "@@@', " & _ vbInformation + vbOKOnly & ", 'حقل مطلوب')") Me. ([YourFeild]).SetFocus Exit Sub Else End If

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

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

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