WinMaster

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

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

ما في مشاكل تستطيع عمل الكود في حدث On Got Focus وتضعين كود الفحص على text 3 ان يفحص text 2 و Text 1 قبل لا يقبل اي ادخال. ونفس الحال للباقي اذا تبين مساعدة ارفعي الملف وانا حاضر تحياتي

السلام عليكم اذا لم تريدي عمل مفتاح مركب اذا الكود المعمول بالقاعدة يعمل اللازم مجرد طرح افكار لا اكثر تحياتي Dim Cnn As New ADODB.Connection Dim RstCheck As New ADODB.Recordset Dim x As Integer Set Cnn = CurrentProject.Connection RstCheck.Open "Select * FROM Table1 Where Date = #" & txtDate.Value & "#;", Cnn, adOpenStatic For x = 0 To RstCheck.RecordCount - 1 If RstCheck.Fields("Name") = cmbName.Value Then MsgBox "ÊÖÇÑÈ ÇáÇÓã ãÚ ÇáÊÇÑíÎ ", vbExclamation, "Error" cmbName.SetFocus Me.Undo End If If Not RstCheck.EOF = True Or Not RstCheck.BOF = True Then RstCheck.MoveNext End If Next __________.rar

طيب ما في اشكال بس لازم تعرف متى تبغين الكود يفحص!! مثلا اذا تبين الكود يفحص القيمة المدخلة هل هي من النوع المطلوب(الحقل ياخذ رقم يجب ان يدخل المستخدم رقم) اذا تحتاج الكود يفحص على الحدث After Update اما اذاكنت مجرد تريد التاكد ان المستخدم ادخل معلومات في هذه الحاله الكود سهل جدا ويكون داخل الحدث Lost Focus تحياتي

انا الحقيقة ما فهمت المراد بالضبط لو توضح سؤالك تحياتي

قصدك استخدام Tab Index؟ ولا قصدك انها ما تطلع من النص حتى تكون القيمة موجودة؟ ارجو التوضيح تحياتي

الطريقة اللي ممكن افكر فيها الان هي ان تعمل workgroup file من غير وجود هذا الفايل لن يستطيع احد التغيير في البرنامج من حيث التصميم لكن للاسف اللي عنده خبرة في الاكسس يستطيع فتحه. تحياتي

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

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

هذا يقوم بالواجب اخي جمال

نسيت اهم واسهل طريقة من الاستعلام اذهبي الى خصائص واختاري RecordSet Type واجعليه SnapShot لن يستطيع احد التغيير الان لا اعرف الاسم بالعربي اذا كان احد الاخوان يساعد مشكور تحياتي

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

ليلى: اذا عملتي MDE محد يقدر يغير شي!! ولا انا فاهم سؤالك خطأ؟؟ تحياتي

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

السلام عليكم انا جربته وشغال عال العال اخي مهند الى الان ما عرفت المشكلة Clcik Enter شغالين تمام تحياتي

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

كان بامكانك عمل ذلك مباشر بالاستعلام الاول NZ(الحالة التي تجمعها,الحاله اذا كان الحقل فارغ) انا قرات سؤالك بس ما كان واضح مبتغاك عموما الحمدلله عملت معاك تحياتي

ايضا جربت حدث Key Down Click شغالين افحص نسخة الاوفيس اللي عندك يمكن تحتاج تصليح تحياتي

نفس الشيء حدث معاي الكونترول شغال عال العال مهند لو توضح وين الاشكال معاك يمكن نلقى حل تحياتي

الدالة IIF تعمل على هذا الاساس IIF(الحالة تحت الفحص,ماذا تريد اذا النتيجة ايجابية,ماذا تريد اذا النتيجة سلبية) في حالتنا تكون الحاله هي Date1 - date1 = 0 اذا كانت النتيجة 0 يعني ايجابي غيره الى 1 واذا كانت النتيجة غير الصفر يعني سلبي ضع الناتج هذه هي المعادلة بعد الشرح exp: IIf([table1]![date1]-[table1]![date2]=0,1,[table1]![date1]-[table1]![date2]) تحياتي

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

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

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

شكرا على التوضيح اخي المهاجر