في المثال المرفق من المفترض تنفيذ جملة الاستعلام في النموذج ولكن بعد الضغط على الزر لا يحدث أي شيء هل هناك خطأ ما ؟ أرجو ايجاد الحل ..
تشغيل استعلام في زر أمر بالنموذج
او بعد اذن الاستاذ اكسير الحياة
من الممكن ان ينفذ بهذا الكود اخوك نبض الاكسس
Private Sub ÃãÑ0_Click() Dim db As DAO.Database 'DoCmd.RunSQL "UPDATE A SET A.b = ([c]*[d])" Set db = CurrentDb db.Execute "UPDATE A SET A.b = ([c]*[d])" End Sub
تم تعديل هذه المشاركة بواسطة اهدنا الصراط في 13 أغسطس 2010 في 01:27
حكمتي الخاصة كلما ابتعدت عن الناس صغرت في اعينهم وكلما اقتربت زاد حجمك في نضرهم
أكسير الحياة مشكوووور جزيلاً ..
اهدنا الصراط مشكووور جزيلاً وخصوصا أن طريقتك لا تحتاج إلى تأكيد التحديث أو إنشاء استعلام .