كل الانشطه

يتشرف #مركز_الرؤية_الاستراتيجية_للتدريب #Strategic_Vision_Training_Center لدعوة سيادتكم للأنضمام الي الدورات التدريبية التالية,,,,, دورات الموارد البشرية والتوظيف والتدريب وشؤون الموظفين مقدمة إن أهمية الدورات التدريبية ليست قاصرة فقط على الحياة المهنية كما يظن أغلبنا .. ولكن الدورات التدريبية تهدف إلى نقل المعرفة والخبرات العملية التى تثقل مهارات الأفراد وتعزز الثقة بالنفس لديهم مما يساهم في إعداد الكوادر مما يعود بدوره على تطوير وتقدم المؤسسات .لذا يهدف مركز الرؤية الاستراتيجية للتدريب إلى تعزيز مهارات وخبرات الافراد من خلال أقوى البرامج التدريبة لنواكب كل تطور في سوق العمل . #دورات #الموارد_بشرية #توظيف #تدريب #شؤون_الموظفين دورة إدارة الموارد البشرية الإستراتيجية دورة إدارة الموارد البشرية والرواتب دورة إدارة الموارد البشرية وفقا لمنهج الجدارات دورة إدارة الموارد البشرية وقيادة الفريق دورة أساسيات إدارة الموارد البشرية والقيادة الإستراتيجية دورة الابداع والجودة الشاملة فى التدريب الاستراتيجى والتطوير الوظيفى لتحقيق الاهداف التنظيمية دورة التدقيق في الموارد البشرية دورة الموارد البشرية لغير مدراء الموارد البشرية دورة تحليلات الموارد البشرية لإدارة المواهب دورة تدقيق الموارد البشرية وتخطيط ومتابعة البرامج التطويرية دورة تطبيق التحليلات المتقدمة على قرارات إدارة الموارد البشرية دورة تقديم إدارة الموارد البشرية دورة تقييم الأداء ونظام الحوافز والمكافآت دورة تنمية مهارات إختصاصي شؤون الموظفين والتطوير الوظيفي دورة مستشار موارد بشرية معتمد دورة معايير متقدمة في تخطيط وإعداد اللائحة الداخلية لسياسات الموارد البشرية دورة أساسيات الموارد البشرية وإدارة شؤون الموظفين دورة التطوير وتخطيط التعاقب الوظيفي دورة تقنيات الوصف والتحليل الوظيفي دورة التميز و الإبداع في التطوير الإداري و تنمية الموارد البشرية دورة ادارة شوؤن الموظفين و التطويرالوظيفي دورة المهارات المتقدمة للنطوير الاداري و الموارد البشرية دورة تطوير الموارد البشرية وتصميم عملية الإختيار والتعيين في المؤسسة كما يتم تنفيذ #الدورات_التدريبية فى #المجالات_التدريبية الاتية : #الدورات الهندسية ) الكهربائية - الميكانيكية والسيارات - الهندسة المدنية والمشاريع والطرق - هندسة المساحة - الصيانة - البترول والجولوجيا( دورات البيئة وصحة وسلامة الغذاء دورات الامن الصناعي والسلامة والصحة المهنية دورات الامن دورات القانون والعقود دورات الجودة والأنتاج دورات القيادة والادارة دورات العلاقات العامة والدولية والاعلام دورات السكرتارية وادارة المكاتب دورات التسويق والمبيعات وخدمة العملاء دورات الموارد البشرية دورات المحاسبة والمالية دورات البنوك والمصارف دورات المشتريات والمخازن دورات النقل و اللوجستيات وادارة سلاسل التوريد أماكن الانعقاد ( #دبي #اسطنبول #كوالالمبور #المغرب #السعودية #شرم_الشيخ #القاهرة #الأسكندرية #لندن # اسبانيا #كندا ) الاعتمادات احصل الان على شهادتك باعتماد cpd الدولى كما يوجد خصم للشركات والهيئات والجهات الحكومية والمجموعات كما يتم تنفيذ أي دوره تدريبيه اخرى تلبي احتياجاتكم التدريبية بالوقت و بالمكان المناسبين لكم على ان يكون عدد المشاركين (2) كحد ادنى قاعات التنفيذ بفنادق 5 نجوم ذات الشهره العالميه مجهزه بالوسائل السمعيه والبصريه للتسجيل او لطلب العرض الفنى والمالى يرجى الاتصال او ارسال بريد الاكترونى Ahmed Mohamed 00201551848384 : WhatsApp: Training@svtcenter.com svtcenter.com Facebook https://www.facebook.com/profile.php?id=100086139318374 Twitter https://twitter.com/StrategicVisio7 Linkedin https://www.linkedin.com/company/strategic-vision-training-center/ Instagram https://www.instagram.com/strategicvisiontrainingcenter WIX https://eslam-training.wixsite.com/training Website https:// svtcenter.com/ar/Home

يتشرف #مركز_الرؤية_الاستراتيجية_للتدريب #Strategic_Vision_Training_Center لدعوة سيادتكم للأنضمام الي الدورات التدريبية التالية,,,,, دورات تدريبية فى القيادة وادارة وتطويرالمؤسسات مقدمة إن أهمية الدورات التدريبية ليست قاصرة فقط على الحياة المهنية كما يظن أغلبنا .. ولكن الدورات التدريبية تهدف إلى نقل المعرفة والخبرات العملية التى تثقل مهارات الأفراد وتعزز الثقة بالنفس لديهم مما يساهم في إعداد الكوادر مما يعود بدوره على تطوير وتقدم المؤسسات .لذا يهدف مركز الرؤية الاستراتيجية للتدريب إلى تعزيز مهارات وخبرات الافراد من خلال أقوى البرامج التدريبة لنواكب كل تطور في سوق العمل . #دورات #القيادة #ادارة #تطوير #مؤسسات دورة ممارس معتمد لمؤشرات الأداء الرئيسية دورة البرنامج المتكامل إعداد خبراء الحوكمة المعتمدين البرنامج التدريبى دور الذكاء الاصطناعي في إدارة المؤسسات دورة إدارة العمليات الإدارية وإستراتيجيات التخطيط الإدارى المتقدم دورة استراتيجيات إعادة هندسة وتحسين عمليات الاعمال دورة التخطيط الاستراتيجي دورة الحوكمة وإدارة المخاطر والامتثال والضوابط الداخلية دورة القيادة المرنة للمؤسسات عالية الأداء ‏ دورة المهارات القيادية والجدارات الادارية واللياقة الفكرية دورة تبسيط إجراءات العمل لإنتاجية افضل دورة قيادة التغيير- عوامل النجاح الحاسمة دورة مهارات الإدارة الوسطى دورة مهارات وفنون القيادة والحضور القيادي دورة حوكمة الشركات دورة مهارات الادارة المتقدمة دورة إستراتيجيات التخطيط والتنظيم الإداري والتوجيه وإدارة الأزمات دورة التخطيط الإستراتيجي ومؤشرات قياس الأداء الرئيسية (KPI) دورة الفكر المتقدم والتوجهات العالمية لمهارات المدير العصري وتطوير أداء المنظمات دورة المهارات الحديثة فى التعامل مع ضغوط العمل وحل المشكلات دورة بطاقة الأداء المتوازن BSC دورة تحليل ABC للموظفين و استراتيجيات التعامل الفعال مع كل صنف من الموظفين دورة صياغة الاستراتيجية ووضع الأهداف ورسم السياسات برنامج تأهيلي للمدراء لتمثيل المؤسسة في الإجتماعات و اللجان الخارجية التخطيط الاستراتيجي والقيادة الابداعية كما يتم تنفيذ #الدورات_التدريبية فى #المجالات_التدريبية الاتية : #الدورات الهندسية ) الكهربائية - الميكانيكية والسيارات - الهندسة المدنية والمشاريع والطرق - هندسة المساحة - الصيانة - البترول والجولوجيا( دورات البيئة وصحة وسلامة الغذاء دورات الامن الصناعي والسلامة والصحة المهنية دورات الامن دورات القانون والعقود دورات الجودة والأنتاج دورات القيادة والادارة دورات العلاقات العامة والدولية والاعلام دورات السكرتارية وادارة المكاتب دورات التسويق والمبيعات وخدمة العملاء دورات الموارد البشرية دورات المحاسبة والمالية دورات البنوك والمصارف دورات المشتريات والمخازن دورات النقل و اللوجستيات وادارة سلاسل التوريد أماكن الانعقاد ( #دبي #اسطنبول #كوالالمبور #المغرب #السعودية #شرم_الشيخ #القاهرة #الأسكندرية #لندن # اسبانيا #كندا ) الاعتمادات احصل الان على شهادتك باعتماد cpd الدولى كما يوجد خصم للشركات والهيئات والجهات الحكومية والمجموعات كما يتم تنفيذ أي دوره تدريبيه اخرى تلبي احتياجاتكم التدريبية بالوقت و بالمكان المناسبين لكم على ان يكون عدد المشاركين (2) كحد ادنى قاعات التنفيذ بفنادق 5 نجوم ذات الشهره العالميه مجهزه بالوسائل السمعيه والبصريه للتسجيل او لطلب العرض الفنى والمالى يرجى الاتصال او ارسال بريد الاكترونى Ahmed Mohamed 00201551848384 WhatsApp Training@svtcenter.com svtcenter.com Facebook https://www.facebook.com/profile.php?id=100086139318374 Twitter https://twitter.com/StrategicVisio7 Linkedin https://www.linkedin.com/company/strategic-vision-training-center/ Instagram https://www.instagram.com/strategicvisiontrainingcenter WIX https://eslam-training.wixsite.com/training Website https:// svtcenter.com/ar/Home

يتشرف #مركز_الرؤية_الاستراتيجية_للتدريب #Strategic_Vision_Training_Center لدعوة سيادتكم للأنضمام الي الدورات التدريبية التالية,,,,, دورات العلاقات العامة والاعلام والعلاقات الدولية والسياسية والدبلوماسية والتشريفات والبرتوكولات مقدمة إن أهمية الدورات التدريبية ليست قاصرة فقط على الحياة المهنية كما يظن أغلبنا .. ولكن الدورات التدريبية تهدف إلى نقل المعرفة والخبرات العملية التى تثقل مهارات الأفراد وتعزز الثقة بالنفس لديهم مما يساهم في إعداد الكوادر مما يعود بدوره على تطوير وتقدم المؤسسات .لذا يهدف مركز الرؤية الاستراتيجية للتدريب إلى تعزيز مهارات وخبرات الافراد من خلال أقوى البرامج التدريبة لنواكب كل تطور في سوق العمل . #دورات #العلاقات_العامة #العلاقات_الدولية #الاعلام #البروتوكولات #التشريفات #السياسية #الدبلوماسية # دورة أساليب إدارة العلاقات العامة في تحسين الصورة الذهنية للمؤسسات دورة العلاقات العامة والاتصال المؤسسي - الاعلام الرقمي دورة الإتصال الإقناعى الفعال دورة التحليل السياسي دورة التعاون الدولي - الإتفاقيات والتفاوض دورة التعاون الدولي ومهارات المراسم الدولية والبروتوكول والعلاقات العامة الدولية دورة العلاقات العامة وبروتوكول التشريفات وفن التعامل مع الجمهور وكبار الشخصيات دورة التميز والإبتكار فى العلاقات العامة والإتصالات دورة العلاقات الخارجية والتعاون الدولي دورة المتحدث الرسمي لوسائل الإعلام دورة العلاقات الصناعية الحديثة دورة مستشار الإعلام الرقمي دورة العلاقات العامة وتكنولوجيا الاعلام الالكترونى دورة العلاقات المهنية دورة المسؤولية الاجتماعية للشركات دورة العوامل المؤثرة في العلاقات الدولية دورة المهارات المتكاملة في العلاقات العامة والأعلام وفن المراسم والبروتوكولات دورة ادارة الضغوط والصراعات فى العمل الدبلوماسي والعلاقات الدولية دورة إدارة وتنظيم الفعاليات والمؤتمرات كما يتم تنفيذ #الدورات_التدريبية فى #المجالات_التدريبية الاتية : #الدورات الهندسية ) الكهربائية - الميكانيكية والسيارات - الهندسة المدنية والمشاريع والطرق - هندسة المساحة - الصيانة - البترول والجولوجيا( دورات البيئة وصحة وسلامة الغذاء دورات الامن الصناعي والسلامة والصحة المهنية دورات الامن دورات القانون والعقود دورات الجودة والأنتاج دورات القيادة والادارة دورات العلاقات العامة والدولية والاعلام دورات السكرتارية وادارة المكاتب دورات التسويق والمبيعات وخدمة العملاء دورات الموارد البشرية دورات المحاسبة والمالية دورات البنوك والمصارف دورات المشتريات والمخازن دورات النقل و اللوجستيات وادارة سلاسل التوريد أماكن الانعقاد ( #دبي #اسطنبول #كوالالمبور #المغرب #السعودية #شرم_الشيخ #القاهرة #الأسكندرية #لندن # اسبانيا #كندا ) الاعتمادات احصل الان على شهادتك باعتماد cpd الدولى كما يوجد خصم للشركات والهيئات والجهات الحكومية والمجموعات كما يتم تنفيذ أي دوره تدريبيه اخرى تلبي احتياجاتكم التدريبية بالوقت و بالمكان المناسبين لكم على ان يكون عدد المشاركين (2) كحد ادنى قاعات التنفيذ بفنادق 5 نجوم ذات الشهره العالميه مجهزه بالوسائل السمعيه والبصريه للتسجيل او لطلب العرض الفنى والمالى يرجى الاتصال او ارسال بريد الاكترونى Ahmed Mohamed 00201551848384 Training@svtcenter.com svtcenter.com Facebook https://www.facebook.com/profile.php?id=100086139318374 Twitter https://twitter.com/StrategicVisio7 Linkedin https://www.linkedin.com/company/strategic-vision-training-center/ Instagram https://www.instagram.com/strategicvisiontrainingcenter WIX https://eslam-training.wixsite.com/training Website https:// svtcenter.com/ar/Home

السلام عليكم عدلت على كود ارسال واتساب للاستاذ أبوخليل على حسب اسماء الجداول و العناصر لدي فحصل لدي مشكلة وهي ان الارسال يرسل على حسب العدد ولكن للرقم الاول فقط والرسالة الاولى فقط يعني لا ينتقل للسجل التالي وياخذ الرقم للسجل التالي والرسالة التالية ‏‏sendwatsWebAll - نسخة.mdb

يتشرف #مركز_الرؤية_الاستراتيجية_للتدريب #Strategic_Vision_Training_Center لدعوة سيادتكم للأنضمام الي الدورات التدريبية التالية,,,,, دورات السكرتارية وادارة_المكاتب #السكرتارية_التنفيذية #الاجتماعات مقدمة إن أهمية الدورات التدريبية ليست قاصرة فقط على الحياة المهنية كما يظن أغلبنا .. ولكن الدورات التدريبية تهدف إلى نقل المعرفة والخبرات العملية التى تثقل مهارات الأفراد وتعزز الثقة بالنفس لديهم مما يساهم في إعداد الكوادرمما يعود بدوره على تطوير وتقدم المؤسسات .لذا يهدف مركز الرؤية الاستراتيجية للتدريب إلى تعزيز مهارات وخبرات الافراد من خلال أقوى البرامج التدريبة لنواكب كل تطور في سوق العمل . #دورات #السكرتارية #ادارة_مكاتب دورة أخصائى المكتبات والمعلومات - رؤية حديثة متطوره فى عصر المعلومات دورة إدارة الوقت والاجتماعات وتفويض الصلاحيات للسكرتارية ومنسقي المكاتب دورة إدارة الوقت وتحديد الأولويات للسكرتارية دورة أساليب و مهارات التخطيط والتنظيم لأعمال السكرتارية و إدارة المكاتب دورة السكرتاريــــا الالكترونيــــة - بإستخدام الحاسوب دورة السكرتارية الإلكترونية وإدارة مكاتب المستقبل دورة السكرتارية العالمية في ظل منهجية الحكومة الإلكترونية دورة القدرات الجوهرية لمدراء مكاتب الإدارة العليا والسكرتاريا التنفيذية دورة المساعد التنفيذي المتميز في ادارة الاجتماعات وتنظيم الفعاليات دورة المساعد التنفيذي المعتمد دورة المفاهيم المتقدمة للجودة الشاملة في إدارة المكاتب والسكرتارية التنفيذية دورة تطبيق التاءات الخمس 5S لتنظيم بيئة العمل والتخلص من الهدر دورة سكرتارية مجلس الادارة السكرتارية وادارة المكاتب وتقديم التقارير والمراسلات دورة مهارات السكرتارية و إدارة MS Outlook كما يتم تنفيذ #الدورات_التدريبية فى #المجالات_التدريبية الاتية : #الدورات الهندسية ) الكهربائية - الميكانيكية والسيارات - الهندسة المدنية والمشاريع والطرق - هندسة المساحة - الصيانة - البترول والجولوجيا( دورات البيئة وصحة وسلامة الغذاء دورات الامن الصناعي والسلامة والصحة المهنية دورات الامن دورات القانون والعقود دورات الجودة والأنتاج دورات القيادة والادارة دورات العلاقات العامة والدولية والاعلام دورات السكرتارية وادارة المكاتب دورات التسويق والمبيعات وخدمة العملاء دورات الموارد البشرية دورات المحاسبة والمالية دورات البنوك والمصارف دورات المشتريات والمخازن دورات النقل و اللوجستيات وادارة سلاسل التوريد أماكن الانعقاد ( #دبي #اسطنبول #كوالالمبور #المغرب #السعودية #شرم_الشيخ #القاهرة #الأسكندرية #لندن # اسبانيا #كندا ) الاعتمادات احصل الان على شهادتك باعتماد cpd الدولى كما يوجد خصم للشركات والهيئات والجهات الحكومية والمجموعات كما يتم تنفيذ أي دوره تدريبيه اخرى تلبي احتياجاتكم التدريبية بالوقت و بالمكان المناسبين لكم على ان يكون عدد المشاركين (2) كحد ادنى قاعات التنفيذ بفنادق 5 نجوم ذات الشهره العالميه مجهزه بالوسائل السمعيه والبصريه للتسجيل او لطلب العرض الفنى والمالى يرجى الاتصال او ارسال بريد الاكترونى Ahmed Mohamed 00201551848384 Training@svtcenter.com svtcenter.com Facebook https://www.facebook.com/profile.php?id=100086139318374 Twitter https://twitter.com/StrategicVisio7 Linkedin https://www.linkedin.com/company/strategic-vision-training-center/ Instagram https://www.instagram.com/strategicvisiontrainingcenter WIX https://eslam-training.wixsite.com/training Website https:// svtcenter.com/ar/Home

v3-عمالة نظام 2025_2026.xlsmكود يعطينى اخفاء واظهار الاعمدة انا اختارها فى كل شيت بمفرده فى شيت Report2026 و شيت يومية المقاولين وكل شيتات بعد شيت يومية المقاولين يوجد اكواد برمجية ومعادلات بمساعدة اهل العلم فى المنتدى v3-عمالة نظام 2025_2026.xlsm

يتشرف #مركز_الرؤية_الاستراتيجية_للتدريب #Strategic_Vision_Training_Center لدعوة سيادتكم للأنضمام الي الدورات التدريبية التالية,,,,, #دورة #الجودة #الشاملة فى #المختبرات ISO 17025 #دورات #الجودة #الانتاج #iso اهداف البرنامج التدريبي ¨ إمداد المتدربين بالمعرفة اللازمة في مجال الأمن والسلامة في المختبرات على سبل التعامل مع الحوادث والأخطار داخل بيئة المختبرات, وكذلك التعرف الى أدارة المختبرات طبقا لنظام المواصفات القياسية ISO 17025. المشاركين · جميع العاملين في مجال الامن و السلامة العامه · جميع العاملين في مجال امن وسلامة المباني و المنشأتوالمختبرات. رجال الامن والسلامه العامه في المؤسسات والمختبرات والشركات الهيئات الحكوميه. #دورات #الجودة #الانتاج #iso EMS / ISO 14001 (IEMA)دورة مدققي رئيسي دورة إدارة الجودة الإستراتيجية دورة الجودة الشاملة فى المختبرات ISO 17025 دورة إدارة الجودة في سلسلة التوريد دورة الأداء المؤسسي وفقاً لمعايير الأوروبي EFQM دورة التصميم من أجل الجودة دورة الممارسات الجيدة في المختبرات (GLP) دورة الجودة والتدقيق الفردي للأجهزة الطبية دورة تأهيل مديري الانتاج في المنشآت الصناعية دورة تدقيقات الجودة والجوائز والتنفيذ دورة تنمية مهارات إعداد خطط وبرامج التحفيز لزيادة الإنتاجية دورة التوعية والتنفيذ EMS / ISO 14001 دورة قيادة إدارة الجودة دورة نظم معلومات مراقبة الجودة والانتاج دورة إدارة الجودة فى سلسلة التوريد كما يتم تنفيذ #الدورات_التدريبية فى #المجالات_التدريبية الاتية : #الدورات الهندسية ) الكهربائية - الميكانيكية والسيارات - الهندسة المدنية والمشاريع والطرق - هندسة المساحة - الصيانة - البترول والجولوجيا( دورات البيئة وصحة وسلامة الغذاء دورات الامن الصناعي والسلامة والصحة المهنية دورات الامن دورات القانون والعقود دورات الجودة والأنتاج دورات القيادة والادارة دورات العلاقات العامة والدولية والاعلام دورات السكرتارية وادارة المكاتب دورات التسويق والمبيعات وخدمة العملاء دورات الموارد البشرية دورات المحاسبة والمالية دورات البنوك والمصارف دورات المشتريات والمخازن دورات النقل و اللوجستيات وادارة سلاسل التوريد أماكن الانعقاد ( #دبي #اسطنبول #كوالالمبور #المغرب #السعودية #شرم_الشيخ #القاهرة #الأسكندرية #لندن # اسبانيا #كندا ) الاعتمادات احصل الان على شهادتك باعتماد cpd الدولى كما يوجد خصم للشركات والهيئات والجهات الحكومية والمجموعات كما يتم تنفيذ أي دوره تدريبيه اخرى تلبي احتياجاتكم التدريبية بالوقت و بالمكان المناسبين لكم على ان يكون عدد المشاركين (2) كحد ادنى قاعات التنفيذ بفنادق 5 نجوم ذات الشهره العالميه مجهزه بالوسائل السمعيه والبصريه للتسجيل او لطلب العرض الفنى والمالى يرجى الاتصال او ارسال بريد الاكترونى Ahmed Mohamed WhatsApp 00201551848384 Training@svtcenter.com Facebook https://www.facebook.com/profile.php?id=100086139318374 Twitter https://twitter.com/StrategicVisio7 Linkedin https://www.linkedin.com/company/strategic-vision-training-center/ Instagram https://www.instagram.com/strategicvisiontrainingcenter WIX https://eslam-training.wixsite.com/training Website https:// svtcenter.com/ar/Home

Minesweeper.zip

تفضل أخي الكريم / ملفك بعد التعديل وتوسيع النطاق في العمل . وأرجو منك الإهتمام بمواضيعك وأغلاق ما يستحق الإغلاق إشعاراً للقارئ بأن الموضوع قد تم حله والإجابة عليه . فتفاعلك يعكس فكرك . UnMatched123.zip

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

وجب مني التوضيح وبما أننا نتعامل مع الصور حالياً ، فإن آكسيس وباستخدام مسار وهمي لملف غير موجود سينتج لك خطأ قريباً من هذا :- وبالتالي ، الداعي للتوضح يستدعي التنقيح .

السلام عليكم ورحمة الله وبركاته هل وصلت حضرتك إلى الصورة النهائية للبرنامج لأني أعتقد أنه أقرب النتائج لما كنت أفكر به وأبحث عنه

امممم .. دعني أسلك نقاشاً كنت قد تطرقت له برؤوس أقلم في موضوع حماية الجداول على ما اعتقد .... نفذت سابقاً فكرة تقوم بالخطوات التالية من الفتح الى الاغلاق .. عند فتح قاعدة البيانات وفي نموذج البداية Frm_Start سيقوم هذا النموذج أولاً بحذف لقاعدة بيانات خلفية وهمية ( قاعدة بيانات تحميل نفس أسماء الجداول ولكن بدون سجلات ) . يتم الاتصال بقاعدة البيانات الخلفية الحقيقية والمحمية بكلمة مرور ( كالمعتاد ) ثم يعمل المشروع بكل تفاصيله . عند الإغلاق ، وقبل الخروج من قاعدة البيانات ، يتم اعادة استخراج ملف قاعدة البيانات الخلفية ( الوهمية التي قلنا انها لا تحتوي سجلات ) ثم يقوم بإعادة ربطها بدلاً من قاعدة البيانات الخلفية الحقيقية ( الحالية التي تحتوي سجلات ) . وبذلك تم تأمين السجلات والإغلاق . ليس مقصدي الانتقال للحماية ( فلا أدري ما يجول بذهنك معلمي أبو خليل ) ، لكن مقصدي هو الآلية والفكرة التي تدور حولها اسئلتك قد تساعد في الإنتاج الذي ترجوه 😅

تفضل Function RelinkIsIco() As String Dim rs As DAO.Recordset Dim rsA As DAO.Recordset2 Dim fPath As String Dim outPath As String ' مسار ثابت وهمي fPath = "C:\MyApp\Icons\" ' إنشاء المجلد إذا غير موجود If Dir(fPath, vbDirectory) = "" Then MkDir fPath End If Set rs = CurrentDb.OpenRecordset("SELECT progIcon FROM tblEnDc") If Not (rs.EOF And rs.BOF) Then Set rsA = rs.Fields("progIcon").Value If rsA.RecordCount > 0 Then rsA.MoveFirst outPath = fPath & rsA!FileName ' حذف الملف السابق إذا موجود If Dir(outPath) <> "" Then Kill outPath ' استخراج المرفق إلى المسار الثابت rsA!FileData.SaveToFile outPath RelinkIsIco = outPath End If rsA.Close End If rs.Close Set rs = Nothing End Function

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

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

كل الطرق اعلاه واحدة طريقتك كل فتح لاي نموذج اذا النماذج تحمل ايقونات في الاطار .. كل فتح يتم حذف الصورة ثم ارسالها مرة اخرى لو لم تفعل ذلك لا يمكنك الارسال مرة اخرى اقصد تشغيل الدالة سترجع بخطأ وجود الملف انا عالجت هذه المشكلة .. جعلت الارسال يتم مرة واحدة عند اقلاع البرنامج .. والبرنامج بكل مكوناته سيرتبط بالصورة مباشرة ولا حاجة للارسال Function RelinkIsIco() As String Dim rs As DAO.Recordset Dim rst As DAO.Recordset2 Dim FilePath As String Dim strFilePath As String Dim Result As String FilePath = CurrentProject.Path & "\" & "soccer.png" Result = Dir(FilePath) If Result <> "" Then RelinkIsIco = FilePath Exit Function Else Set rs = CurrentDb.OpenRecordset("tblEnDc") Set rst = rs.Fields("progIcon").Value strFilePath = CurrentProject.Path & "\" & rst.Fields("FileName").Value rst.Fields("FileData").SaveToFile strFilePath RelinkIsIco = strFilePath End If rst.Close Set rst = Nothing rs.Close Set rs = Nothing End Function ولكن هذا لا يكفي حاجتي او هدفي الى نوع من انواع الحماية الخاصة ليس بالضرورة ان يكون صورة

مهو علشان أعرف أفكر وانا بفطر، شجعنا بالهدف المنشود لنحدد الوسيلة التي سنسير بها 😉 . على العموم ، بالنسبة للمطلوب الأول هذه وجهة نظري بالتعديل :- Function RelinkIsIco() As String Dim rs As DAO.Recordset Dim rst As DAO.Recordset2 Dim strFilePath As String Set rs = CurrentDb.OpenRecordset("SELECT progIcon FROM tblEnDc") If Not rs.EOF Then Set rst = rs.Fields("progIcon").Value If Not rst.EOF Then strFilePath = CurrentProject.Path & "\" & rst.Fields("FileName").Value If Dir(strFilePath) <> "" Then Kill strFilePath rst.Fields("FileData").SaveToFile strFilePath RelinkIsIco = strFilePath End If rst.Close: Set rst = Nothing End If rs.Close: Set rs = Nothing End Function مطلوب المسار الوهمي بعتمد تنفيذ فكرته على ماهية حاجتك له وغايتك وهدفك منه .

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

وسؤال آخر .. لماذا لم تستخدم Recordset2 بدلاً من Recordset بما أن الحقل = حقل مرفقات !!

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

الهدف والغاية ، فالغاية تبرر الوسيلة 😁

انا سويت لك نفس الطلب من قبل هنـــــــا

الدالة تصبح Function RelinkIsIco() As String Dim rs As DAO.Recordset Dim rsA As DAO.Recordset2 Dim fPath As String Dim tempPath As String ' فتح السجل Set rs = CurrentDb.OpenRecordset("SELECT progIcon FROM tblEnDc") If Not (rs.EOF And rs.BOF) Then Set rsA = rs.Fields("progIcon").Value ' Recordset خاص بالمرفقات If rsA.RecordCount > 0 Then rsA.MoveFirst ' تحديد مسار مؤقت في Windows Temp tempPath = Environ$("TEMP") & "\" & rsA!FileName ' استخراج الملف من المرفقات إلى المسار المؤقت rsA!FileData.SaveToFile tempPath RelinkIsIco = tempPath End If rsA.Close End If rs.Close Set rs = Nothing End Function واستدعاؤها Private Sub cmdShar_Click() Me.img1.Picture = RelinkIsIco() End Sub

وجدت حلا وهي الطريقة الوحيدة التي وصلت اليها وهي نسخ الصورة وارسالها بجانب قاعدة البيانات نعم هي طريقة مفيدة ... ففي هذا الوضع لا يعتمد البرنامج على صور خارجية .. وحتى لو تم حذفها او العبث في التسمية فسوف يدرج اكسس صورة جديدة ورغم ان الارسال سيتم مرة واحدة عند اقلاع البرنامج .. الا انه عند فتح النماذج كل نموذج يتم فتحه تتم عملية حذف الصورة الموجودة وارسال صورة جديدة ويمكنني تلافي ذلك بجعل الكود يتفحص اذا الصورة موجودة بجانب قاعدة البيانات ام لا .. فإذا موجودة يأخذ من موقع الصورة مباشرة وان لم يجدها يرسل جديدة . وغالبا ستكون موجودة بجوار قاعدة البيانات . سأعرض لكم الكود الذي تمت معالجته + المرفق Function RelinkIsIco() As String Dim rs As DAO.Recordset Dim rst As DAO.Recordset Dim strFilePath As String Set rs = CurrentDb.OpenRecordset("tblEnDc") Set rst = rs.Fields("progIcon").Value strFilePath = CurrentProject.Path & "\" & rst.Fields("FileName").Value Kill strFilePath rst.Fields("FileData").SaveToFile strFilePath rst.Close : Set rst = Nothing rs.Close : Set rs = Nothing RelinkIsIco = strFilePath End Function Private Sub cmdShar_Click() Me.img1.Picture = RelinkIsIco End Sub ولكني اطمح الى عمل افضل من ذلك وهنا يأتي السؤال : هل يمكن عمل متغير يحمل رابطا أو مسارا وهميا بدلا من المسار الصريح ؟ أو متغيرين .. واحد يحمل رابط وهمي والآخر يحمل اسم الملف ؟ Database2.rar