jjafferr

اذا كان الحقل منضم في الجدول ، فيجب ان تعمله من نوع مذكرة ، وفي اخر الاعدادات في الجدول ، اعمله Rich Text ، ولكن وقبل ان تعمل هذا التغيير جرب التالي: في التقرير ، اعمل حقل غير مضمن ، واعطيه برمجيا قيمة الحقل اللي تريد العمل عليه 🙂 جعفر

هممم اذا عملنا جدول خاص فيه: "مصدر بياناته و مسمياته وبعض تنسيقاته وفق للقيمة المحمله" لكل نوع ، يكون اسهل في التعامل معه !! شكرا على الفكرة 🙂

لا ما اشتغل ، يعطيني اخطاء !! على العموم ، ننتظر النسخة الاخيرة ونجربها ان شاء الله 🙂 جعفر

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

وعليكم السلام 🙂 انا عانيت الكثير مع الخط Al-Mohanad Extra Bold ، واضطررت الى تركه ، وانتهت مشاكلي 😁 مع العلم بأن مشاكل الخط موجودة في برنامج الوورد اكثر منها من مشاكله في الاكسس !! المشكلة تكون لما المؤسسة التي تتعامل معاها يقولون لك انه الخط المعتمد وما نقدر نغيره (فتأخر استعمالهم لاحد التقارير المهمة لمدة حوالي 5 سنوات ، ولما جاءت ادارة جديدة على طول وبدون اي مشكلة ، استعملو خط آخر واستعملو التقرير !!) . من وجهة نظري ، عندك حلين: 1. استعمال خط آخر قريب في الشكل لهذا الخط ، والحمدلله فيه خطوط قريبه منه ، 2. تستعمل الاكسس 2007 فما فوق (صيغة accdb ، لأن صيغة mdb لا تملك هذه الميزة) ، بحيث في التقرير ، تجعل تنسيق نص الحقل : . مما يجعله يقبل التنسيق وتغيير اي جزء فيه : . . وبما ان هذا التنسيق يعمل بلغة HTML ، فممكن ان نعمله برمجيا (بما اني لا اعرف لغة HTML ، فالطريقة اللي اعملها هي: اعمل التنسيق اللي اريده كما في الصورة ، وبعدين اعرض كود HTML اللي الاكسس عمله (debug.print me.text4) ، واضبط برمجتي على اساسه 🙂 ) ، وتظهر لي هذه النتيجة: . حسب ما يراه الكمبيوتر <div align=right><font face="Calibri (Detail)">نص وارقام </font><font face="Times New Roman" size=5 color=red>123456 </font><font face="Calibri (Detail)">ثم نص وارقام</font></div> بعد ان عملت عليه التعديل ليناسب برمجتي <div align=right> <font face="Calibri (Detail)">نص وارقام </font> <font face="Times New Roman" size=5 color=red>123456 </font> <font face="Calibri (Detail)">ثم نص وارقام</font> </div> . فالمطلوب الآن عمل كود ليعرف الارقام : . اما اذا كانت الارقام باللغة العربية ، فبدل Asc يجب ان نستعمل AscW ، لأن الارقام العربية لها ارقامها الخاصة برمجيا : . جعفر

سيدي الفاضل ، ما اعرف وين المشكلة ، ولكن خلينا نحاول نصيدها ، بتجزئة الكود 🙂 شو نوع الحقل id_Ccallg ، نص او رقم ؟ 1. اوقف عمل الاسطر 1 و 2 و 3 (اعمل الاشارة ' على يسار السطر ، او كلمة Rem) ، والمفروض الكود يعطيك كل النتائج حسب Deletedrecord=1 ، 2. اسمح للاسطر 1 و 3 بالعمل ، والمفروض تحصل على نفس الخطأ السابق (هنا نتعامل مع الحقل id_Ccallg كنص) 2. اوقف السطر 1 ، واجعل السطر 2 يعمل (هنا نتعامل مع الحقل id_Ccallg كرقم) Dim x() As String, myWhere As String x = Split(Me.OpenArgs, "|") myWhere = "[id_Ccallg]='" & x(1) & "'" '1 'myWhere = "[id_Ccallg]=" & CInt(x(1)) '2 myWhere = myWhere & " And" '3 myWhere = myWhere & " [Deletrecord]=1" rs.Open "SELECT * FROM tbl_QualityEvaluation WHERE myWhere ORDER BY id_Ccallg DESC;", sqldb جعفر

طيب ، 1. اذا كان التركيز على الحقل item او Quantity ، وادخلت الباركود فيه كذلك ، فتريد ان يتم ترك القيمة في الحقل كما كانت ، ثم تعمل سجل جديد ، وتضيف فيه قيمة الباركود. نأخذ مثال: ادخلت الباركود في حقل الباركود ، فينتقل التركيز الى حقل الصنف ، فتقوم انت بإدخال معلومة معينة ، مثل: "قميص بحري 2" ، ولم تنتقل الى الحقل التالي ، فتكون هذه القيمة لم تحفظ لا في السجل ولا في الحقل بعد ، وما تعمل اي شيء ، وتقرأ بالباركود (ومثلا رقمه 123456) ، فتصبح قيمة حقل الصنف: قميص بحري 2123456 ، فكيف تريد ان نفك معلومة الباركود من معلومة الصنف !! نفس السيناريو ممكن يكون لحقل الكمية !! هل ارقام الباركود مميزة ، يعني لها نفس طول العدد (مثلا دائما 5 ارقام) ، او انها دائما تبدأ بالرقم 9 ، او الحرف د ، او اي شيء خاص ؟ او انها موجودة في جدول؟ جعفر

لي الشرف في انك تراجع معلوماتي القديمة ، واشوف انها لا تزال صحيحة 🙂

من واقع خبرتي ، كنت استعمل متغير variant ، ولكن صادقتني مشاكل فيه ، فتحولت الى نص ، والحمدلله بدون مشاكل الى اليوم 🙂 طبعا لاحقا ، يمكننا تحويل كل جزء/قيمة الى اصلها عن طريق الاوامر CInt و Cdate . هل فيه اشكال في هذا الاستعمال؟ جعفر

جميل ، اذن LisetViewData ليس اسم النموذج ، سوف نرسل قيمتين في المتغير OpenArgs ، يجب ان يكون الامر عندك هكذا ، نرسل اسم النموذج وقيمة حقل LisetViewData : DoCmd.OpenForm "frm_QualityEvaluation", , , , , acDialog, me.name & "|" & LisetViewData . عند اغلاق النموذج frm_QualityEvaluation ، اكتب : dim x() as string x=split(me.openargs,"|") Forms(x(0)).Visible = True او Forms(split(me.openargs,"|")(0)).Visible = True . وبالنسبة للسجل: dim x() as string x=split(me.openargs,"|") rs.Open "SELECT * FROM tbl_QualityEvaluation WHERE id_Ccallg = '" & x(1) & "' And Deletrecord =1 ORDER BY tbl_QualityEvaluation.id_Ccallg DESC;", sqldb او rs.Open "SELECT * FROM tbl_QualityEvaluation WHERE id_Ccallg = '" & split(me.openargs,"|")(1) & "' And Deletrecord =1 ORDER BY tbl_QualityEvaluation.id_Ccallg DESC;", sqldb . جعفر

شو LisetViewData ، وشو القيمة اللي فيه

خلينا نأخذ مثال حقيقي علشان نشوف شو اللي ممكن عمله : . 1. شو طريقة عمل النموذج ، اعطنا مثال لوسمحت ، 2. هل عند ادخال الباركود ، يجب ان تكون على سجل جديد ، او تستعمل الباركود للبحث عن السجل ؟ 3. شو نوع المعلومة اللي تكون في الحقل item ، نص او رقم ، واذا كان فيها معلومة وادخلت الباركود ، فيصبح فيها القيمة القديمة وقيمة الباركود ، فكيف تريد ان تفصلها المعلومات ، هل تعمل سجل جديد برقم الباركود وتترك معلومة item القديمة فيه ، او ماذا !! 4. نفس الكلام عن الحقل Quantity 🙂 جعفر

الامر DoCmd.OpenForm لفتح النموذج frm_QualityEvaluation ، السؤال: ما هو الحقل LisetViewData وما قيمته ؟ سؤالك الاصل كان : لهذا السبب انا اقترحت عليك استعمال المتغير OpenArgs في امر فتح النموذج (لاحظ اننا ارسلنا اسم النموذج الذي نحن عليه الآن me.name كقيمة عن المتغير OpenArgs) : DoCmd.OpenForm "frm", , , , , , me.name وانتهى الكلام عن فتح واغلاق النموذج ---------------------------------------------------------- فتح النموذج على السجل الذي نحن عليه الآن . والجواب كان (رجاء التركيز على جملة التصفية فقط ) : docmd.OpenForm "frm",,,"[ID]='" & me.lst_1 & "'",,acDialog, me.name . ولكنك في جملة rs التالية استعملت OpenArgs بدل عن me.lst_1 rs.Open "SELECT * FROM tbl_QualityEvaluation WHERE id_Ccallg = '" & OpenArgs & "' And Deletrecord =1 ORDER BY tbl_QualityEvaluation.id_Ccallg DESC;", sqldb ======================================================= اعتقد سؤالك كان لازم يكون كالتالي: 1. frm1 و frm2 نقوم من خلالهما فتح النموذج frm ، وعند اغلاق frm اريد ارجع للنموذج الذي تم فتحة منه ، 2. عند فتح النموذج frm عندي جملة SQL لفتح سجل معين في النموذج frm ، وهذا السجل هو السجل الذي يقع عليه التركيز في مربع القائمة في النموذج frm1 او frm2 . رجاء تأكد لي ان مفهومي صحيح علشان اكتب لك الرد ، واذا كان مفهومي غير صحيح ، فرجاء تعطينا الصورة كامله عن قصدك ، لأني الى الآن ما فاهم !! جعفر

السلام عليكم 🙂 اخوي rockjone33 : 1. رجاء تكتب نقاط عن عمل برنامجك ، لأنك تبذل مجهود ، ما فاهم منه شيء!! 2. رجاء تدخل في الكود وتعمل له Debug>Compile ، 3. يا ريت تخبرني وين كان الخطأ حتى استفيد جعفر

الله يطول عمرك ، انت خلطت الحابل بالنابل !! احنا استعملنا المتغير OpenArgs لإرسال اسم النموذج ، وهو يعمل بطريقة صحيحة حسب الصورة اعلاه ، ولكنك هنا تحتاج الى: فإذن استعمل الحقل ID هنا (ID هو عبارة عن حقل فيه قيمة فريدة تميز السجلات) 🙂 جعفر