زينب الذهبي قام بنشر أغسطس 1, 2017 مشاركة قام بنشر أغسطس 1, 2017 السلام عليكم اخوتي سؤالي كيف يمكنني ان اضع نتيجة الاستعلام التالي في مربع نص غير منضم موجود في نموذج.... strsql1 = "SELECT Employes.Job FROM Employes WHERE ((([Employes]![EmpNum])=[Forms]![Form1]![Names1]));" اي انني اريد استرجاع العنوان الوظيفي job من الملف employes ووضعه في مربع النص job1 في النموذج form1 Rewards.rar رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر أغسطس 1, 2017 مشاركة قام بنشر أغسطس 1, 2017 وعليكم السلام همممم يعني انتي في النموذج Form1 وترسلين قيمة الحقل Names1 كمعيار الى الحقل EmpNum في الاستعلام "استعلام1" ، وثم تريدين قراءة قيمة الحقل job من الاستعلام "استعلام1" الى الحقل job1 في نفس النموذج Form1 ، والحقلين موجودين في سجل واحد في الجدول Employes ، والذي يأخذ النموذج والاستعلام نتائجه منه!! هذا يبدو كأنه واجب/اختبار مدرسي!! على العموم ، تستطيعين استخدام الامر Dlookup للحصول على ما تريدين جعفر 1 رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 1, 2017 مشاركة قام بنشر أغسطس 1, 2017 2 ساعات مضت, jjafferr said: على العموم ، تستطيعين استخدام الامر Dlookup للحصول على ما تريدين شكرا استاذ جعفر 2 ساعات مضت, زينب الذهبي said: اي انني اريد استرجاع العنوان الوظيفي job من الملف employes ووضعه في مربع النص job1 في النموذج form1 اتفضلي كما قال استاذنا جعفر تقدر تستخدمي هذا الكود في حدث بعد تحديث لكومبوبوكس Private Sub Names1_AfterUpdate() Me.Job1 = DLookup("[Job]", "Employes", "[EmpNum]='" & Me.Names1 & "'") End Sub او تقدر تستخد هذا كمصدر مربع نصي ل جوب1 =DLookUp("[Job]";"Employes";"[EmpNum]='" & [Names1] & "'") واليك قاعدة بياناتك بعد استخدام الطريقة الثانية Rewards.rar 1 رابط هذا التعليق شارك More sharing options...
زينب الذهبي قام بنشر أغسطس 2, 2017 الكاتب مشاركة قام بنشر أغسطس 2, 2017 شكررررررررررررررررررررررررررا على الرد افدتموني كثيرا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.