لماذا تختفي بعض السجلات المدموجه

اظن التغيير يجب ان يكون هنا في هذه الداله وهو تغيير نوع بيانات التجميع من مربع نص الى مذكره

لكن لا اعلم ماذا اغير

Function Concatenate1(pstrSQL As String, Optional pstrDelim As String = "") As String
    Dim rs As New ADODB.Recordset
    rs.Open pstrSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
    Dim strConcat As String
    With rs
        If Not .EOF Then
            .MoveFirst
            Do While Not .EOF
                strConcat = strConcat & .Fields(0) & vbNewLine & pstrDelim
                .MoveNext
            Loop
        End If
        .Close
    End With
    Set rs = Nothing
    If Len(strConcat) > 0 Then
        strConcat = Left(strConcat, _
        Len(strConcat) - Len(pstrDelim))
    End If
    Concatenate1 = strConcat
End Function

فماذا اغير ؟؟ ان كان من هنا

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

لا تحتاج الى اي تغيير في الداله فالداله تعمل بشكل صحيح ولا يوجد بها اي مشكله

المشكلة لديك انت بارك الله بك في ادخال البيانات في الجدول فعندما تقوم بتكرار نفس البيانات في السجلات فإن الاستعلام ينظر اليها كأنها سجل واحد

فمثلا لو قمت بوضع مليون سجل له نفس القيمه مثلا  AA1  فلن يظهر لك إلا سجل واحد فقط

لذا حاول ادخال بيانات مختلفه كليا في كل سجل وستظهر لك كل السجلات المطلوبه

بالتوفيق

 لا سيدتي زهره

انظري لمثالي التالي انظري لنموذج ال OrderFrm  وبيانات النموذج الفرعي بداخله والعنصر ggg

za-MedLab2014-END.rar

 لدي 17 سجل فرعي لاتظهر منها بال Normal Value  الا 12  تقريبا

 في انتظار ردك اختنا زهره ، ؟؟؟؟؟

 وهذا نفس المثال مع بعض التعديلات اختنا زهره

za-MedLab2014-END.rar

?????????????????????

كوماندير كتب:

احبتي الاعزلي

 

لدي موضوع في الرابط

 

/index.php/topic/279043-%D8%AA%D8%AC%D9%85%D9%8A%D8%B9-%D8%A7%D8%B1%D9%82%D8%A7%D9%85-%D8%A7%D9%84%D9%85%D8%AA%D8%B5%D9%84%D9%8A%D9%86-%D9%81%D9%8A-%D8%B3%D8%AC%D9%84-%D9%88%D8%A7%D8%AD%D8%AF/

 

والحمد لله قامت الاخت زهره بحل مشكلتي الاساسية الا وهي

دمج عدة سجلات من جدول ، في سجل واحد في جدول اخر

 

الموضوع اقفل

 

واجهتني مشكلة وهي بالنسبه للسجلات المضموومه معا بعض بالنسبة للاستعلام Q2

 

والتي اريد دمجها مع بعض بالنموذج OrderFrm  بالنموذج الفرعي له المستمد من جدول OrderDetails

 

 لايتم ظهور جميع السجلات الفرعيه المضمومه بحقل NormalValue

 انظر لل Test المسمى gggg

حيث عدد السجلات الفرعيه له هي 17 سجل تقريبا لاتنظم جميعها بالحقل NormalValue

 

za-MedLab2014-END.rar

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

لا اعلم ما هي الآلية لتقييمنا بعلامة السالب !!!!!!!!!!

هل لأننا نحاول الإجابه عليك ومساعدتك حتى تحصل على الحل المطلوب من خلال النقاش !!!

ام انني قد اسأت اليك من حيث لا اعلم !!!!

اذا كنت سوف اجيب على كل عضو في المنتدى واحصل على علامة سالب ففي هذه اللحظة اقول لكم 

استودعكم الله والف مليون شكر يا اعضاء منتدى الفريق العربي للبرمجة

واشكركم من كل قلبي على رد الجميل فوالله ثم والله انني لم ابخل على اي شخص في المنتدى بأي شيء

استطيع ان اقدمه له على حساب صحتي ووقتي ومع هذا كله اجد من يعاملني بعكس المتوقع

شكرا لكم جميعا

بالتوفيق

انا اسف على تدخلي لكني لم اجد لنفسي شيء للصبر دون اكتب هذه الكلمات

استاذة الكل الدكتورة ام عهود اقول وانا المسؤول عن كلامي والله العلي القدير شاهد على ما اقول

نحن اعضاء المنتدى لن تمر لحظة واحدة دون ان نتوجه الى الله العلي القدير بالدعاء لك ولعائلتك الكريمة بالصحة والعافية

سائلين الله عز وجل ان يبعد عنك كل مكروه لكي الفضل بل كل الفضل في وصولنا الى مسافة كبيرة في هذا العلم الاكثر من رائع

وفي الاخير لا اقول الا هذه العبارة لا تتركينا فأنتي نور هذا المنتدى وطريقه الى التقدم والرقي ---- اخوك ابو حاتم العنزي

بسم الله الرحمن الرحيم

السلام عليكم جميعا ورحمة الله وبركاته

استميحكم عذرا في انني قد اهدر بعض اللحظات من وقتكم الثمين... ولكن ربما اجد العذر لانني اريد ان اقول كلمة اعتقد انها كلمة حق .. والله اعلم

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

ما يميز هذا المنتدى سعة صدر المشرفين عليه وتجاوبهم المشكور للاجابه على استفسارات السائلين وهم الاخت زهره والاخ ايهاب عثمان وابو يوسف

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

كنت اود ان اوجه رسالة لبعض المتشنجين من الاعضاء واسألهم الرفق بالاخوة المشرفين الذين لا يبخلون علينا بوقتهم وجهدهم

واقل ما يمكننا عمله توجيه كلمة شكر لهم

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

بعد كل هذا يجب ان نقيمها بما تستحق وبايجابية شديدة .. اما التقويم السلبي فهو اقل ما يقال عنه انه انكار للجميل

حيوا معي جميعا الاخت الفاضله وادعوا الله ان يحفظها واسرتها من كل سوء

لاحول ولا قوة الا بالله

الاخت ام عهود  وان كانت هذه العلامات لاتقدم ولا تأخر شيء من عطائها لكنها كل المتاح لدينا لرد ولو الجزء اليسير من الوقت الذي تبذله في مساعدتنا

والاهم من العلم الذي تشاركنا اياه .. وهذا من اندر ماموجود  ولا يمتلكه الا من احبه الله فاعطاه هبة البذل في سبيل الاخرين 

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

والامر من هذا ممن قد يسيئون اقدير الامور

اختى الكريمة  اذا كان بالامكان ان اقدمك لك انا اعتذاري شخصيا فارجو ان تتقبليه مني   فما ذنبا ان نؤخذ باخطاء غيرنا

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

السلام عليكم ورحمة الله وبركاته جميعا

من واجبنا جميعا ان نقدم للاخت زهرة التحية والشكر والتقدير 

واحب هنا ان اشير الى اننا وعلى مداركل الفترة الماضية من عمرهذا المنتدى لم نجد من الاخت المحترمه الفاضله ام عهود الا كل تسامح وتفان في خدمة المشتركين ونسال الله لها على هذا خير الجزاء

وقد يحدث احيانا ان يطرح البعض سؤالا غير مفهوم ومن الطبيعي انه لا يتلقى الاجابه الصحيحة هذا من جهة

ومن جهة اخرى يجب ان لا نعلق جهلنا ببعض حقائق البرمجه على شماعة اعصاب المشرفين

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

فهل كان من الممكن ان اتهم المشرفين بالتقاعس عن الرد ؟

من ناحية اخرى لاحظت ان الاخ صفوت ياسين رد على السيد كوماندير في غير هذه المشاركه عندما لاحظ اسلوبه المتعجرف بطرح السؤال ....وليعذرني الاخ كوماندير ( الذي قوَّم الاخت زهرة سلبيا ) فانا لا اقصد اية اساءة له او لاأي احد

فنرجو من الاخت زهرة ان تكون لديها سعة الصدر ولتراجع قول الله تعالى ( والكاظمين الغيظ , والعافين عن الناس , والله يحب المحسنين ) فربما يكون هذا سببا لتنالي الاجر والثواب من حيث لا تدرين

اقدم اعتذاري الشخصي  للفاضلة الاخت زهرة نيابة عن الجميع ونرجو ان تستمر في عطائها

والله ولي التوفيق

السلام عليكم

احب ان اضيف صوتي الى اصوات الاخوة الكرام بمناشدة الاخت المعطاء  المشرفة

بان لاتتركنا  فقد تعودنا على كرمها وعطائها في القسم ...

وان شاء الله يجعل الله ثواب كل ما تقوم به لمساعدتنا في ميزان حسناتها  يوم لاينفع مال ولابنون

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

كمال مختار كتب:

السلام عليكم ورحمة الله وبركاته جميعا

من واجبنا جميعا ان نقدم للاخت زهرة التحية والشكر والتقدير 

واحب هنا ان اشير الى اننا وعلى مداركل الفترة الماضية من عمرهذا المنتدى لم نجد من الاخت المحترمه الفاضله ام عهود الا كل تسامح وتفان في خدمة المشتركين ونسال الله لها على هذا خير الجزاء

وقد يحدث احيانا ان يطرح البعض سؤالا غير مفهوم ومن الطبيعي انه لا يتلقى الاجابه الصحيحة هذا من جهة

ومن جهة اخرى يجب ان لا نعلق جهلنا ببعض حقائق البرمجه على شماعة اعصاب المشرفين

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

فهل كان من الممكن ان اتهم المشرفين بالتقاعس عن الرد ؟

من ناحية اخرى لاحظت ان الاخ صفوت ياسين رد على السيد كوماندير في غير هذه المشاركه عندما لاحظ اسلوبه المتعجرف بطرح السؤال ....وليعذرني الاخ كوماندير ( الذي قوَّم الاخت زهرة سلبيا ) فانا لا اقصد اية اساءة له او لاأي احد

فنرجو من الاخت زهرة ان تكون لديها سعة الصدر ولتراجع قول الله تعالى ( والكاظمين الغيظ , والعافين عن الناس , والله يحب المحسنين ) فربما يكون هذا سببا لتنالي الاجر والثواب من حيث لا تدرين

اقدم اعتذاري الشخصي  للفاضلة الاخت زهرة نيابة عن الجميع ونرجو ان تستمر في عطائها

والله ولي التوفيق

جزا الله كل من اعتذر نيابة عني الف الف خير

صدقوني لم يكن لي غرض من تقييم اي مشاركة بالسالب الا انني كنت اود لفت نظر صاحب تلك المشاركة ( ربما عذر اقبح من ذنب ) ،

لكن هل لي ان اعرف الحالات التي يجوز لي تقييم المشاركات بالسالب ؟

استاذتي الكريمة زهرة ندعوا الله لك بالمغفرة وسعة الرزق ولاهلك بالغفران ولاولادك بالبركة في الصحة والعمر ...

ونأمل منك ان تقبلي اعتذارنا جميعاً عما بدر من صاحب الموضوع بدون قصد (المسامح كريم )  ...

ولك كل ود وتقدير وسامحينا عن اي اساءة او تقصير ...

والله ثم والله إنها لخسارة كبيرة أن تتركنا الأستاذة العظيمة أم عهود فإنا لله وإنا إليه راجعون .

الاخوة المشرفون

الاخوة الاعضاء

انا قد قدمت اعتذاري اكثر من مره

وارى ان الموضوع خرج عن الموضوع الاساسي

وقد فتح موضوع ندإ الى الاخت زهره للعودة للمنتدى

/index.php/topic/287047-%D9%86%D8%AF%D8%A7%D8%A1-%D8%A7%D9%84%D9%89-%D8%A7%D9%84%D8%A7%D8%AE%D8%AA-%D8%B2%D9%87%D8%B1%D9%87-%D9%84%D9%84%D8%B9%D9%88%D8%AF%D8%A9/page-2#entry1377736

ارجو منكم العودة لموضوعي الاساسي ومحاولة حله

شاكرا لكل من شارك معنا بهذا الموضوع .

كوماندير كتب:

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

اخي الكريم : كوماندير

السلام عليكم ورحمة الله وبركاته

اعتذارك مقبول على العين وعلى الرأس من فوق 

وسامحك الله دنيا وآخره وجزاك الله كل خير واسكنك الفردوس الأعلى من الجنه

بإمكانك معرفة التفاصيل اكثر من هنا

/index.php/topic/287047-%D9%86%D8%AF%D8%A7%D8%A1-%D8%A7%D9%84%D9%89-%D8%A7%D9%84%D8%A7%D8%AE%D8%AA-%D8%B2%D9%87%D8%B1%D9%87-%D9%84%D9%84%D8%B9%D9%88%D8%AF%D8%A9/page-2

بالتوفيق

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

الاخوة الكرام ، لازلت بانتظار الحل 

ارجو انكم لم تألو جهدا بالبحث عن حل

فالموضوع مهم جدا .

كوماندير كتب:

 لا سيدتي زهره

 

انظري لمثالي التالي انظري لنموذج ال OrderFrm  وبيانات النموذج الفرعي بداخله والعنصر ggg

 

za-MedLab2014-END.rar

 

 لدي 17 سجل فرعي لاتظهر منها بال Normal Value  الا 12  تقريبا

انظر ياعزيزي.. اعتدادك بنفسك هنا أصابك بمقتل.. وهو أسوأ عندي من سبعين حمراء!

إذا كنت تريد التعلم فأول واجب على المتعلم أن يتواضع، وثانيا أن يبتعد عن العجلة والتسرع!

من المفترض أن يكون الاستعلام Q2 هو مصدر البيانات في النموذج الفرعي ولكنك لم تفعل!

وشيء آخر أن الجدولبن أدناه فيهما تضارب في بيانات حقل بمسىً واحد.. وهو  أمر سيء للغاية!!

جزاك الله الف خير اخي الفحم

وسامحك الله

من المفترض أن يكون الاستعلام Q2 هو مصدر البيانات في النموذج الفرعي ولكنك لم تفعل!

لم افهم اخي الفحم ؟ فالذي تعلمته ان يكون الاستعلام Q2 هو مصدر بيانات سجل ( كومبوبكس ) اختيار ال Test

اما

وشيء آخر أن الجدولبن أدناه فيهما تضارب في بيانات حقل بمسىً واحد.. وهو  أمر سيء للغاية!!

فماتعلمته ان هذه كانت مشكله بالاصدارات ماقبل 2007 ولكن بعدا لم تعد مشكلة

ع كل حال اشكرك جزيل الشكر على تنبيهاتك

وليتك تحل لنا المشكله بتعديلك كما تراه مناسبا

أرجو أن تعذرني..قصدي أن تحتاط لنفسك من الوقوع فيما لا تحمد عاقبته!

بالنسبة لي تقييم (الإجابة) بالسالب لا أقول بتحريمه لكني أكرهه، كما إن تقييم (الإجابة) بالموجب لا أقول بوجوبه لكنى أستحسنه،، ومع هذا فأنا لا أتصور بحال أن يكون هذا التقييم يعود لذوات الناس!!

الآن دعنا نعود للحل ..

في كل الجداول التي فيها حقل (TestId) كانت القيم فيها رقمية سوى الجدول (OrderDetails) فالقيم فيه نصية.. ولذا لايمكن ربط هذا الجدول بالجدول (NormalRetTbl) الذي يحتوي السجلات السبعة عشر!!.. هذا أولا..

ثانيا.. في الاستعلام Q2 ربطت بين الجدول (TestsDataTbl) والجدول (NormalRetTbl) مع أن الثاني لا مكان له هنا! بل كان من المفترض أن يكون بدلا عنه الجدول (OrderDetails) وتأخذ منه القيم التي تريد أن تظهر في النموذج الفرعي..

ثالثا بالنسبة للشفرة.. مع أنها تؤدي الغرض.. إلا إنه كان من المفترض أن تضع جملة الاستعلام في جسم الوضيفة وليس ضمن محدداتها.. وهو أمر مستغرب فعلا.. كان يكفي أن تضع المحدد المطلوب فحصه.. وهو هنا (TestId)

أظن أن الأمر اتضح لك ومن السهل أن تقوم أنت بالتعديل.. أليس كذلك

أجريت بعض الإضافات والتعديلات على المرفق التالي أرجو أن يكون ما تطلب

MedLab2014-END.zip

اقتباس

 

 

في كل الجداول التي فيها حقل (TestId) كانت القيم فيها رقمية سوى الجدول (OrderDetails) فالقيم فيه نصية.. ولذا لايمكن ربط هذا الجدول بالجدول (NormalRetTbl) الذي يحتوي السجلات السبعة عشر!!.. هذا أولا..

أعتذر إليك! لم ألاحظ أن القيم في حقل (TestId) مرتبطة