Elsayed Bn Gemy

اخى الكريم ابو خلل رائع كعادتك واضافاتك ملموسة فى كل عمل تقدمه

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

وكيف يمكن اكتشاف المسار ؟؟؟

وانا ايضا احب ان اعرف ما العيوب فى مرفقى حتى اتحاشاها ؟؟

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

بالنسبة للمرفق الخاص بى يعتمد على ان لو حد اخد نسخة من قاعدة البيانات عندك وحاول يشغلها على جهاز اخر مش هتشتغل ودى استعملت فيها وحدة نمطيه لتحديد مسار القاعدة ثم جعل مسار معين هو مسار افتراضى للتشغبيل اللى هو دا C:\mared\path_true.accdb يعنى علشان قاعدة البينات تشتغل لازم تتحط فى فولدر اسمه mared داخل بارتيشن c غير كدا مش هتشتغل ودا شرح الوحدة النمطية https://support.microsoft.com/en-us/kb/113919 path_true.rar

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

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

اخى جعفر هل المرفق الذى ارفقته انا لا يعمل ارجوك جربه وان كان هناك خطأ ما اعلمنى ؟؟

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

Private Sub TV_NodeClick(ByVal Node As Object) Dim nodSelected As MSComctlLib.Node Set nodSelected = Me.TV.SelectedItem Me.Text3 = nodSelected.Text End Sub تفضل اخى الكريم واعتذر فا انا فى العمل

اخى الكريم اذهب الى محرر الاكواد ثم اختر tools ثم referense وتاكد من هذه الخيار كما فى الصورة

استاذن اخى جعفر فلنسبقة الى الخير ولو مرة TreeView.rar

تفضل sa.rar

تفضل اخى الكريم بصراحة انا معرفتش اجربه بس هو ظبط معايا بالنسبة للاصناف الموجودة ضيف انت جديد وشوفه انا استعملت الدالة NZ([fildes name];0)

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

اخى الكريم تحية طيبة وبعد انا شفت المرفق بس لى كام سؤال وقبل الاسئلة احب ان اخبرك بان هناك حقل يسمى رقم الملف مثلا قيمته 100 وهناك حقل يسمى رقم الملف الفرعى وقيمته 100/1 عند الربط وفى النماذج اذا ادخلت رقم 100 للاستعلام لن يظهر النتائج لان القيمة غير متساوية فى حاجة تانية بالنسبة للتعديل اللى ارفقته هل انت تريد الاستعلام فقط ام انك ستعدل فى البينات اقصد انه لو على الاستعلام فقط ممكن نستخدم دالة استدعاء وخلاص بمجرؤد ما تدخلها رقم الملف هتجلب البينات بعيدا عن الربط خالص

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

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

اخى الكريم فى النموذج اللى فيه مربع النص الخاص بالمجموع اككتب الحدث عند الفتح مثلا او عند التحميل If IsNull(text) Then Me.text= 0 End If text هو مربع النص الذى يعتمد على قيمة الاستعلام لو الحقل فارغ خلى قيمته صفر

وايه هى المشكلة اخى الكرم نحن نظر بعينيك انت الى البرنامج الخاص بك

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

تفضل يا اخى مرفق صممته اتمنى ان يكون المطلوب حفظ كلمة المرور.rar

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

نفرض ان تاريخ الميلاد هو اسم مربع النص ضع مربع نص جديد إسمه yearوضع فيه هدا الكود =year([تاريخ الميلاد]) في مربع نص العمر ضع هذا =Year(Date())-([year])