abdullaht8 قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 السلام عليكم ورحمة الله وبركاته هل هناك كود لتفريغ بيانات حقل معين في الاكسيس عن طريق وضع زر في النموذج الاساسي وعند الضغط عليه يتم تفريغ الحقل من البيانات الموجوده فيه انا بحثت ووجدت كود لكن المشكله لم اجد شرح لكيفة وضعه والا ستفاده منه Private Sub txt_Click() txt.Value = "commnder a enter" End Sub هذا هو الكود ارجو من الله ثم منكم شرح الطريقه لي والله يجزاكم خير انتظر الطريقه ضروري الله لا يهينكم رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 اخي الكريم من شرحك الكود خاطئ فهو لا يقوم بتفريغ البيانات و انما ستظهر لك رسالة خطأ فقط الطريقة الصحيحة اضف رز امر الى النموذج و ليكن اسم الزر cmd1 انقر نقرا مزدوجا على الزر لتظهر نافذة الخصائص اذهب الى علامة التبويب حدث اختر ( عند النقر ) اجراء حدث ثم اضغط على الزر الصغير بجانبها تفتح لك صفحة محرر الفيجوال بيسك اكتب الكود التالي txt1.text="" حيث txt1 هو اسم حقل النص في النموذج رابط هذا التعليق شارك More sharing options...
abdullaht8 قام بنشر يونيو 11, 2012 الكاتب مشاركة قام بنشر يونيو 11, 2012 الله يوفقك يا محمد ويجزاك بالخير ولا يحرمك الاجر حاولت اضبطها بنفس شرحك ما ضبطت يعطيني خطاء txt1.text="" استبدلت txt1 بــ commnder a enter ولا ضبطت هذا مثال ارفقته لك وما اريده منك هو وضع زر الامر لي علي ان يتم تفريغ جدول mark والله يوفقك db1.rar رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 هذا مثال ارفقته لك وما اريده منك هو وضع زر الامر لي علي ان يتم تفريغ جدول mark جدول ؟ ام عمود ؟ ام حقل ؟ رابط هذا التعليق شارك More sharing options...
abdullaht8 قام بنشر يونيو 11, 2012 الكاتب مشاركة قام بنشر يونيو 11, 2012 (معدل) ما اريد تفريغه هو عمووود بضغطه زر لاحظ الصوره المضلل اريد تفريغه تم تعديل يونيو 11, 2012 بواسطه abdullaht8 رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 تفضل تم التعديل باستخدام عبارة sql ( استعلام تحديث ) db2.rar رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 أخي الكريم يوجد خطا فلا يوجد جدول باسم shops ؟؟؟؟؟؟؟؟؟؟؟؟ ولا يوجد عمود commnder a enter ؟؟؟؟؟؟؟؟؟ رابط هذا التعليق شارك More sharing options...
abdullaht8 قام بنشر يونيو 11, 2012 الكاتب مشاركة قام بنشر يونيو 11, 2012 الله يجزاكم خير عملت نفس الطريقه ويطلع لي خطاء هذي صورته ما اريده هو افراغ العمود commnder a enter من الجدول shops ياليت اجد حل وهذا ما وضعته Private Sub ÃãÑ311_Click() DoCmd.RunSQL "UPDATE shops SET shops.commnder a enter = " End Sub رابط هذا التعليق شارك More sharing options...
abdullaht8 قام بنشر يونيو 11, 2012 الكاتب مشاركة قام بنشر يونيو 11, 2012 الله يجزاكم خير ويوفقكم انا عندي قاعدة بيانات وعندي عمود يتغير من فتره الي اخري ومعتمد عليه في تقارير يعني عندى مجموعتين الاولي الف والثانيه باء واريد ان افرغ هذا العمود من القيم من اجل ان اختار منهم في المجموعه باء يعني احتاج كود يمسح جميع المعلومات الموجوده في العمود ويكون فارغ لا اريد وضع صفر في العمود اريد تفريغه من اي قيمه بواسطه الامر وسلامتكم وربي من الظهر الي الان وانا احوووس في القاعده الله يرحم والديكم سااعدوووني رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 اخي الكريم انظر الاستعلام ali حيث يفرغ جميع القيم في الجدول ali الحقل mark و اود ان الفت انتباهك انه لا يوجد عمود باسم commnder a enter ولا يوجد جدول باسم shops db3.rar رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 اولا مثالك لا يوجد فيه الحقل المذكور ولا جدول الثاني وهي الاهم تسمية الحقل خاطئة لا تجعل مسافات فارغة بين الكلمات عند التسمية اجعله هكذا .commnderaenter او هكذا .commnder_a_enter ( وهذا هو سبب خروج الرسالة ) الثالث بعد ما تصحح اسم الحقل يمكنك استبدال الصفر الموجود في الكود بكلمة Null رابط هذا التعليق شارك More sharing options...
abdullaht8 قام بنشر يونيو 11, 2012 الكاتب مشاركة قام بنشر يونيو 11, 2012 الله يوفقكم ويجزاكم خير تم حل المشكله مثل ما تفضل اخوي ابوخليل والشكر لجميع من تفضل بمساعدتي لا خلا ولا عدم رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر يونيو 11, 2012 مشاركة قام بنشر يونيو 11, 2012 لو كنت ارفقت مثالك الصحيح وبينت المطلوب بكل دقة لحصلت على الجواب الشافي في اول رد من اخونا محمد ولما انتظرت كل هذا الوقت الحمد لله على انقضاء الحاجات . رابط هذا التعليق شارك More sharing options...
طاهر الوليدي قام بنشر ديسمبر 19, 2017 مشاركة قام بنشر ديسمبر 19, 2017 Dim Sql As String Sql = "UPDATE sarfyomi SET sarfyomi.todys_add = 0;" If MsgBox("هل تريد تفريغ جمع عدد ايام الحضور", vbYesNo + vbMsgBoxRight, "تحذير") = vbYes Then DoCmd.SetWarnings (warningsoff) DoCmd.RunSQL (Sql) DoCmd.SetWarnings (warningson) Me.Refresh End If هذا كود حذف حقل todys_addفي جدول اسمه sarfyomiفي زر من النموذج المطلوب كيف غيره بحيث يحذف حقل في استعلام اسمه1 sarfyomi مرتبط بجول الموظفين واسم الحقل نفسه todys_add رابط هذا التعليق شارك More sharing options...
طاهر الوليدي قام بنشر ديسمبر 20, 2017 مشاركة قام بنشر ديسمبر 20, 2017 في ١٩/١٢/٢٠١٧ at 10:32, طاهر الوليدي said: Dim Sql As String Sql = "UPDATE sarfyomi SET sarfyomi.todys_add = 0;" If MsgBox("هل تريد تفريغ جمع عدد ايام الحضور", vbYesNo + vbMsgBoxRight, "تحذير") = vbYes Then DoCmd.SetWarnings (warningsoff) DoCmd.RunSQL (Sql) DoCmd.SetWarnings (warningson) Me.Refresh End If هذا كود حذف حقل todys_addفي جدول اسمه sarfyomiفي زر من النموذج رابط هذا التعليق شارك More sharing options...
ابويسرى قام بنشر يوليو 9, 2018 مشاركة قام بنشر يوليو 9, 2018 x="" بمعنى x i هو الحقل المراد حذف قيمته = "" رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان