ToMix

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

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

خلاص الروابط راح مفعولها ماعاد نقدر نحمل من الروابط الموجودة FILE NOT FOUND مثلا خلونا نقول ان هناك أعضاء يفكرون يرفعونها لنا من جديد !! ياليت وشكراً لصاحب الموضوع على مبادرته لنفع اخوته

الله يعافيك اخي رضوان ربما انا لم اوضح المسالة كما ينبغي ولكن إليك الإيضاح :: انا لا اريد ان اربط صورة في النموذج بكائن OLE... ليس هذا المقصود ولكن ما اعنيه هو اني وضعت في النموذج مربع صورة + مربع نص ووضعت في حدث الحالي للنموذج كود وظيفته هو ان يكون مصدر مربع الصورة هو المسار الموجود في مربع النص .. Me.img.Picture = Me.EmpPicPath اريد ان اضع القيمة الإفتراضية لمربع النص هو مسار الصورة بحيث يرشدنا المسار إلى المجلد الذي يتواجد به البرنامج تلقائياً تحسباً لنقل البرنامج من كمبيوتر لآخر واختلاف مسميات المجلدات ووإلخ .. انا اعتقد انه يكون تقريبا بهذا الشكل ../picture.gif تك تك تك تك

في البداية اتمنى لكم حياة طيبة في موضوعي هذا اردت أن استفسر عن (الصور) في الأكسيس كيف اضع القيمة الإفتراضية لمسار الصورة بحيث تكون متواجده بنفس مجلد البرنامج لاني اريد وضع صورة باسم DEF.GIF بنفس مجلد البرنامج عشان ما تطلع رسالة خطأ (عدم وجود الصورة في المسار التالي ..إلخ) ارجو ان الإشارة للمطلوب واضحه وبانتظار الرد تحيتي للجميع

سؤال عالطاير قبل لا تغلق الجلسة ايهما افضل ان اعمل ضغط وإصلاح لقاعدة البيانات قبل الانتهاء من البرنامج أو بعد الانتهاء منه حيث انني قمت بعمل ضغط واصلاح لقاعدة البيانات ولا زلت اعمل على تنقيحها وترتيب النماذج ووالخ هل سيسبب لي هذا ظرر في المستقبل وشكراً

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

UP اخواني انا حصلت هذا الكود ارجو من يملك الخبرة بأن يفهمني وش الفايدة منه وهل ينفعني في تنفيذ المطلوب في الموضوع الرئيسي وشكراً Me.lstForms.RowSource = "SELECT DISTINCTROW Mid([Name],4) AS Expr1, MSysObjects.Type FROM MSysObjects WHERE (((MSysObjects.Type)=-32764) AND ((MSysObjects.Name) Like ""rpt*"")) OR (((MSysObjects.Type)=-32768) AND ((MSysObjects.Name) Like ""rpf*"")) ORDER BY MSysObjects.Name;"

طابت ايامكم اخواني سؤالي لا يبتعد كثيراً عن ما كتب في عنوان الموضوع ولكن سأكتب هنا للإيضاح فقط !! لدي أكثر من تقرير في البرنامج ، اريد ان اضع في النموذج الرئيسي قائمة منسدلة تظهر لي جميع التقارير التي في البرنامج يبدأ اسمها بـ (rpt) مثلاً .. هل هناك دالة او كود يظهر لي اسماء كافة التقارير التي تبدأ بـ(rpt) ؟؟ وشكرا لكم مقدماً بانتظار الـــــرد

captin فعلاً اتيت بالمطلوب جزاك الله خير الجزاء على مجهودك اتمنى لك حياة سعيدة دعني لألقي النظرة على المثال المرفق بتعمق اكثر ،، وتقبل تحيتي

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

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

UP

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

السلام عليكم اخواني انا عندي سؤال بخصوص الدالة IF الشرطيه اذا اردت ان اطبق هذه الفكرة على الاكسيل ينتهي بي الامر إلى الغثيان والعصبية واليأس وفكرتي هي عندي خليتين الأولى بها رقم 3 والثانية بها كلمة "3months" أريد في الخلية الثالثة أن استخدم دالة IF بحيث: اذا كانت الخلية الأولى اكبر من أو تساوي 3 والخلية الثانية بها كلمة 3months ، يظهر لي في الخلية الثالثة "FPC" واذا لم يكن كذلك يظهر لي في الخلية الثالثة "PPP" ارجو من يستطيع المساعدة ان يساعدني فانا بحاجة لها وتحيتي للجميع