ابوخليل

ابشر ولكن الفت انتباهك الى وجود خطأ غير مقصود في اول سطر من الكود السابق Dim i As String, x As Integer عدله الى : Dim i , x As Integer

الحمد لله لاحظ اني غيرت نوع حقل رقم التخصص في جدول الاطباء من نص الى رقمي

الف مبروك اخي احمد ، وتستاهل اكثر

تفضل Dim i As String, x As Integer i = Me.Specialty x = DCount("*", "tblDoctors", "[Specialty]=" & i) + 1 Me.DoctorID = i & "/" & Format(Str(x), "000") ID2.rar

الطلب غير واضح - ما اسم الحقل الذي تريد الترقيم فيه ؟ لانه لا يظهر على الفورم حقل لترقيم الاختصاص

طيب .. اعانك الله ووفقك ارى انه افضل لو انك وضعت في المثال بعض البيانات وطلبت من اخوانك اجراء عملية محددة ...................................................................... لاحظ انك تريد ضبط في ما لو تم ارجاع الصنف اكثر من مرة والبحث سوف يتم على رقم الفاتورة الاصلية والفاتورة الاصلية تحتوي على اكثر من صنف وطبعا لكل ارجاع رقم فاتورة يخصه في الارجاع الاول سوف يتم الارجاع بسهولة لانه لم يتم بعد اصدار فاتورة في الارجاع الثاني : كيف تتوصل الى العدد الذي تم ارجاعه في المرة الاولى يجب ان نفكر جيدا فنحن بحاجة الى معيار يتكون من : رقم الفاتورة الأصل ( لمعرفة العدد الاصلي ) + كود الصنف ( بسبب تعدد الاصناف في الفاتورة ) + معيار ( ؟؟ ) ( لاظهار عدد المسترجع في المرة الأولى ) البرمجة عبارة عن تطبيق فكرة منطقية

اخي العزيز ابو ابراهيم هذا السطر يجلب من الصفحة شرط وجود الجدول مسبقا في قاعدة البيانات DoCmd.TransferText acImportHTML, , "HTML1", CurrentProject.Path & "\0125.html", True, "0125" اذا جعلت اسماء الحقول في الجدول f1 , f2 ,f3 ....... وهكذا ، واستبدلت true بـــــــــ false يجلب البيانات + رأس العمود واذا سميت الحقول مثل ما هي في الصفحة لا يعمل الا مع true ويجلب جسم الجدول ولكن لا يظهر السجل الأول لو القيت نظرة بارك الله فيك IMPORT_HTML2.rar

يمكن انني لم افهم عنك تفضل يجلب اخر ادخال test4.rar

غريبة .. طلبك يسير جدا ويبين انك لا تعرف في الأكواد هل انت من عمل المثال ؟ على كل لست ملزما بالاجابة تفضل التعديل test3.rar

لم اكتب الا بعد التجربة اعمل على اجهزة كما عندك .. وندوز7 واوفيس 10 ولم تعمل عندي السؤال : ما ذا تريد وما هي حاجتك من هذه الأمثلة ؟

فقط اعكس الكود With rst Me.sname = ![sname] Me.sage = ![sage] .Close End With Me.Refresh test2.rar

تفضل جرب الآن برنامج تنظيم الصور3 .rar

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

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

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

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

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

مشاركة مع اخي ابو احمد .. كنت عملت عملا مشابها ايام الشباب .. يعني يوم انا ولد .. وقد بحث عنه حتى وجدته ، وقمت بالتعديل عليه بما يتوافق وطلب اخونا عمران اولا نصيحة وتوجيه حول تصميم قواعد البيانات عامة : تكرار البيانات في اكثر من جدول غير صحي بل هو مخالف للطرق التي ينصح بها عند تصميم الجداول فمثلا يوجد في القاعدة جدولا لبيانات الطلاب كاملة : المعرف والاسم والصف والعنوان .... الخ ، وعند الاطلاع على جدول الدرجات نرى مجموعة من هذه البيانات مكررة والطريقة الصحيحة ان يكتفى في جدول الدرجات على معرف الطالب فقط ودرجات المواد فإذا اردنا عرض بعض بيانات الطالب مع درجاته فالاستعلام كفيل بعرض كل شيء كتبت هذه المقدمة للفائدة وللتنبيه اني تصرفت في جدول الدرجات كما ينبغي ان يكون . الكود يرتب البيانات داخل جدول جديد مؤقت حسب الطلب آمل ان يحظى باستحسانكم ملحوظة : اخي عمران اذا لم يرق لك تعديلي على الجدول فيمكن للكود العمل على الجدول الأصلي ... فقط نعدل على ارقام داخل الكود Dim Rs, Rst, rsq As Recordset, Dbs As Database Dim r, x, i, q, j, j2 As Integer Set Dbs = CurrentDb Set Rs = Dbs.OpenRecordset("TBL_grades") Set Rst = Dbs.OpenRecordset("tbl_temp") Set rsq = Dbs.OpenRecordset("SELECT DISTINCT TBL_grades.IDStudent FROM TBL_grades") DoCmd.SetWarnings False DoCmd.RunSQL ("DELETE tbl_temp.* FROM tbl_temp") DoCmd.SetWarnings True Rs.MoveFirst rsq.MoveFirst r = Rs.RecordCount q = rsq.RecordCount For i = 0 To q Rst.AddNew Rst.Fields(1) = rsq.Fields(0) x = 2 For j = 1 To 8 j2 = 2 For j2 = 2 To 5 Rst.Fields(x) = Rs.Fields(j2) x = x + 1 Next j2 Rs.MoveNext Next j Rst.Update rsq.MoveNext Next i MsgBox "تم اعداد الجدول" تحويل اعمدة الى صف.rar

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

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

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

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

عليكم السلام المرفق غير مكتمل ، يبدو انك عملته على السريع

اخونا الحبيب وأستاذنا القدير ابو عبدالله ؛ في الفقرة 1 لعلك تراجع الحسبة ، لاني حسبتها باصابعي والنتيجة 19 شهر المهم في الامر ان الاستعلام رفيقي مثل ما الاستاذ جعفر رفيق التقارير حاولت ان احل المسألة باستعلام واحد ونجحت في ذلك اتمنى ان يحقق مطلبك QuestionHalwane.rar

احسنت طال عمرك ، والف شكر