khyrabak قام بنشر أبريل 1, 2007 مشاركة قام بنشر أبريل 1, 2007 (معدل) السلام عليكم ورحمة الله وبركاتة سؤالى لو تكرمت فى منع التكرار إدخال بيان أكثر من مرة فى المثال المرفق أريد أن أمنع تكرار إدخال عينة لها نفس التاريخ لدينا : شركة مياة بها مرافق ( محطات كبرى فى مناطق مركزية) فروع مرتبطة بالمرفق الكبير ( محطات إنتاج فى مناطق فرعية تسمى كومبكتات ) أبار فرعية من الفروع ( كل فرع بة أكثر من بئر ) المطلوب هو إما أن تكون العينة فى تاريخ معين إما من المرفق أو من الفرع أو من البئر ولا أعتقد أن العملية سهلة أو مباشرة بإستخدام dcount لأن عند إدخال عينة جديدة تكون فى الجدول مثل أحد التالى : مرفق ـــــــ ــــــــ تاريخ العينة عينة من مرفق كبير مرفق فرع ــــــــ تاريخ العينة عينة من فرع تابع لمرفق مرفق فرع بئر تاريخ العينة عينة من بئر تابع لفرع أرجو أن أكون وفقت فى توصيل المطلوب لأنها بصراحة غلبتنى وتعبتنى ......... وأشكر لكم مقدما مساعدتكم test.rar تم تعديل أبريل 1, 2007 بواسطه khyrabak رابط هذا التعليق شارك More sharing options...
khyrabak قام بنشر أبريل 4, 2007 الكاتب مشاركة قام بنشر أبريل 4, 2007 للرفع رابط هذا التعليق شارك More sharing options...
rudwan قام بنشر أبريل 5, 2007 مشاركة قام بنشر أبريل 5, 2007 اذا كنت تقصد عدم تكرار تاريخ العينة في الجدول tbl_tahlilwekly_gawda اجعل كلا من حقلي اسم العينة و تاريخ العينة مفتاحا رئيسيا , و بذلك لن يقبل ادخال نفس التاريخ لنفس عينة سابقة رابط هذا التعليق شارك More sharing options...
khyrabak قام بنشر أبريل 8, 2007 الكاتب مشاركة قام بنشر أبريل 8, 2007 السلام عليكم شكرا للأخ رضوان على مرورة ليس هذا هو المطلوب لأن الجدول بة إسم المنطقة / رقم الفرع/ رقم البئر / التاريخ للعينة المطلوب هو عدم تكرار عينة فى تاريخ معين لنفس المنطقة أو عدم تكرار عينة فى تاريخ معين لنفس المنطقة مع رقم الفرع أو عدم تكرار عينة فى تاريخ معين لنفس المنطقة مع رقم الفرع مع رقم البئر تكون البيانا فى الجدول كالتالى : مرفق / ـــــــ / ـــــــ / تاريخ العينة عينة من مرفق كبير مرفق / فرع / ــــــ / تاريخ العينة عينة من فرع تابع لمرفق مرفق / فرع / بئر / تاريخ العينة عينة من بئر تابع لفرع أرجو أن أكون إستطعت أن أشرح ما أريد وأتمنى أن أجد لديكم الإجابة لأن الموضوع تعبنى وشكرا test.rar رابط هذا التعليق شارك More sharing options...
khyrabak قام بنشر أبريل 9, 2007 الكاتب مشاركة قام بنشر أبريل 9, 2007 السلام عليكم لدى فكرة باستخام dcount 'البئر If DCount("*", "tbl_tahlilwekly_merf", "regname = forms!frm_tahlilwekly_merf!reg_name and comp_id = forms!frm_tahlilwekly_merf!comp_id and well_num = forms!frm_tahlilwekly_merf!well_num and date = forms!frm_tahlilwekly_merf!date") <> 0 Then MsgBox " العينة مكررة للببئر", vbExclamation + vbMsgBoxRight + vbMsgBoxRtlReading, " تنبية" Me.Undo DoCmd.CancelEvent End If 'الفرع If DCount("*", "tbl_tahlilwekly_merf", "regname = forms!frm_tahlilwekly_merf!reg_name and comp_id = forms!frm_tahlilwekly_merf!comp_id and date = forms!frm_tahlilwekly_merf!date and well_num Is Null") <> 0 Then MsgBox " العينة مكررة للفرع", vbExclamation + vbMsgBoxRight + vbMsgBoxRtlReading, " تنبية" Me.Undo DoCmd.CancelEvent End If If DCount("*", "tbl_tahlilwekly_merf", "regname = forms!frm_tahlilwekly_merf!reg_name and date = forms!frm_tahlilwekly_merf!date and comp_id = forms!frm_tahlilwekly_merf!comp_id and well_num = forms!frm_tahlilwekly_merf!well_num ") <> 0 Then MsgBox " العينة مكررة", vbExclamation + vbMsgBoxRight + vbMsgBoxRtlReading, " تنبية" Me.Undo DoCmd.CancelEvent End If ولكن المشكلة كيف أنادى على قيمة فى الجدول فارغة لا تظبط معى أتمنى أن أجد الطريقة عندكم وشكرا رابط هذا التعليق شارك More sharing options...
khyrabak قام بنشر أبريل 9, 2007 الكاتب مشاركة قام بنشر أبريل 9, 2007 السلام عليكم لا تزال مشكلتى هى النداء أو المقارنة بقيمة فارغة فى الجدول كما فى dcount أريد أن أقول إسم المرفق كما فى الفورم ورقم الفرع كما فى الفورم ورقم البئر فارغ and well_num Is Null والتاريخ للعينة كما فى الفورم كيف ذلك بإستخدام dcount . ولدى سؤال عن إستخدام Recordset ماهى المتطلبات لإستخدام هذا الكود Dim db As Database, rst As Recordset Set db = CurrentDb Set rst = db.OpenRecordset("tbl_tahlilwekly_merf") rst.MoveFirst Do Until rst.EOF If rst!regname = Me!reg_name And rst!comp_id = Me!comp_id And rst!well_num = Null And rst!date = Me!date Then MsgBox " العينة مكررة للفرع ", vbExclamation + vbMsgBoxRight + vbMsgBoxRtlReading, " تنبية" Me.Undo DoCmd.CancelEvent Exit Do End If rst.MoveNext Loop rst.close بمعن ما هو المطلوب تعريفة من DAO وماذا أيضا ومن أين تعرف ولو ممكن بالصور كما عودتنا مشرفتنا الجميلة زهرة أتساءل أين هى من موضوعى يا ريت نظرة وشكرا وأعتذر للإطالة رابط هذا التعليق شارك More sharing options...
khyrabak قام بنشر أبريل 10, 2007 الكاتب مشاركة قام بنشر أبريل 10, 2007 السلام عليكم من الواضح أننى الوحيد الذى أقوم بالرد على نفسى هناك فكرة أخرى عمل إستعلامات للمطلوب مثل فى الفورم frm_tahlilwekly_merf عمل 2 إستعلام الأول بة رقم البئر يكون فارغ لزوم الكشف عن تكرار البئر من عدمة والإستعلام الثانى يكون بة رقم الفرع ورقم البئر فارغ ( الشرط null ) لزوم الكشف عن تكرار المرفق ولكن اعتقد انها فكرة غير ذكية وغير منطقية أرجو أن أجد لدى أحدكم فكرة حيث لاتزال المشكلة هى كيفية مقارنة عمود فى الجدول قيمتة فارغة كما زكرت سابقا وشكراااااااااااااااااااااااااا رابط هذا التعليق شارك More sharing options...
khyrabak قام بنشر أبريل 13, 2007 الكاتب مشاركة قام بنشر أبريل 13, 2007 للرفع يا أهل الخبرة أأسف على طول الموضوع لكنة مهم بالنسبة لى لأنة ضمن برنامج أقوم بتصميمه وأشكر لكم مقدما مساعدتكم رابط هذا التعليق شارك 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.