تغير أيقونة الأكسس على شريط المهام

[أبا عمر]

السلام عليكم ورحمة _الله_ وبركاته
إخواني الكرام جزاكم _الله_ خيرا وأحسن ربي إليكم
أود تغير أيقونة الأكسس على شريط المهام بدون عمل تحزيم للبرامج وقد قمت بتغير أيقونة التطبيق من بدأ التشغيل وتم التطبيق على النماذج والتقارير لكن لا تتغير الأيقونة على شريط المهام فهل من سبيل لعمل ذلك 
 

[ابوخليل]

عن نفسي لا اعرف او بالاصح قديما حاولت ولم انجح

والسبب ان ايقونة اكسس داخل الملف التنفيذي التشغيلي لقواعد بيانات اكسس

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

 

هذا الرابط يتكلم عن تغيير ايقونة اكسس

 http://office.microsoft.com/ar-sa/access-help/HA101832351.aspx

[أبا عمر]

جزاك _الله_ خيرا أستاذي الكريم 
وأحسن ربي إليك وجعلك ربي من أسبق السابقين إاليه ومن أقرب من تقرب إليه ومن أوجه من توجه إليه
 

[أبا عمر]

 

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

هل لك أن توضح لي كيف استخدمت واجهت الفيجوال 

جزاك _ربي_ جنته

[ابوخليل]

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

حيث لا يمكن تخفيض امان اكسس 2007 وما فوق  برمجيا الا من خارج اكسس

 

حتى اعطيك نسخة مفتوحة من المشروع :

يلزم منك تنصيب فيجوال بيسك 6 في جهازك ويكون لديك خلفية ابتدائية بسيطة 

 

والمشروع عبارة عن فورم  جاهز  يتم التغيير فيه كل مرة  للأيقونة الخاصة بالبرنامج الجديد واسم قاعدة البيانات فقط 

[أبا عمر]

 

حتى اعطيك نسخة مفتوحة من المشروع :

يلزم منك تنصيب فيجوال بيسك 6 في جهازك ويكون لديك خلفية ابتدائية بسيطة 

 

والمشروع عبارة عن فورم  جاهز  يتم التغيير فيه كل مرة  للأيقونة الخاصة بالبرنامج الجديد واسم قاعدة البيانات فقط 

جزاك _الله_ خيرا ورفع قدرك وأعزك وأرضاك في أمتنا

الفجيوال بيسك 6 عندي والخلفية الابتدائية موجودة   

وأنا جاهز للتعلم أسأل الله أن يرضى عنك رضا لم يخطر لك ببال

[ابوخليل]

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

 

يظهر اني خلطت الامور  بين االغاء التحذيرات  وبين ايقونة اكسس

 

عن نفسي لا اعرف او بالاصح قديما حاولت ولم انجح

والسبب ان ايقونة اكسس داخل الملف التنفيذي التشغيلي لقواعد بيانات اكسس

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

ومع هذه المحاولات لم انجح

معلومة : يوجد برنامج يلحق بالفيجوال يقوم بتحويل اكسس الى فيجوال  شريطة ان يكون تصميمه انجليزي 100%

[أبا عمر]

لا بأس أستاذي إلغاء التحذيرات أو تغير الأيقونات منتظرين 

تم تعديل سبتمبر 16, 2013 بواسطه أبا عمر

[ابوخليل]

يوجد ملف تنفيذي ضمن المرفقات

 

لعمل مثله / بعد فتح المشروع :

file/make project EXE

ثم تابع الخطوات

يمكنك تغييير الايقونة من خصائص الفورم

 

المشروع لالغاء تحذيرات  اكسس 2003 ، 2007 ، 2010

 

مشروع تخفيض أمان أكسس.rar

[أبا عمر]

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

[ابوخليل]

آمين ولك بالمثل

[أبا عمر]

السلام عليكم ورحمة _الله_وبركاته
إخواني اللهم لك الحمد تم التوصل للحل بفضل الله أولا ثم بفضل الأخت زهرة 
وهذا رابط المشاركة 

 

 

وأقول للأستاذ أبو خليل جزاك ربي الفردوس الأعلى مثال الأكثر من رائع عدلت عليه على حسب المشاركة المذكورة والآن يقوم مثالك بتخفيض الأمان وتغير الأيقونة وتغير إسم البرنامج ثم يفتح برنامج الأكسس 

 

[ابوخليل]

حقيقة يا اباعمر  كلها  يمكن تشبيهها بالعمليات القيصرية  

1- الاستعانة  بفيجوال  وتوظيفه لالغاء تحذيرات  اوفيس

2- توظيف وندز لكبح بعض خصائص اكسس المستعصية

 

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

ومع هذا اكسس من البرامج سهلة التعلم ويفي بالحاجة لمعظم الاعمال

[أبا عمر]

صدقت أستاذي وأحسن ربي إليك إحسانا

[ابوخليل]

عن نفسي لا اعرف او بالاصح قديما حاولت ولم انجح

 

 

عثرت بالصدفة على تطبيق  يقوم بتغيير الايقونة على شريط المهام بطريقة افضل

 

واعتقد انه يمكن تهذيبه لافضل من ذلك

 

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

ChangeIcon0.rar

[أبا عمر]

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

[أبا عمر]

وهذا مثال كنت قد وجدته لكن نفس المشكلة خصائص شريط المهام
Nasystry.rar

[ابوخليل]

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

 

 

Sub ChangeTitle()
    Dim obj As Object
    Dim Dbs As Database
    Const conPropNotFoundError = 3270
    On Error GoTo ErrorHandler
    ' Return Database object variable pointing to
    ' the current database.
    Set Dbs = CurrentDb
    ' Change title bar.
    Dbs.Properties!AppTitle = "Contacts Database"
    ' Update title bar on screen.
    Application.RefreshTitleBar
    Exit Sub
ErrorHandler:
    If Err.Number = conPropNotFoundError Then
        Set obj = Dbs.CreateProperty("AppTitle", dbText, "Contacts Database")
        Dbs.Properties.Append obj
    Else
        MsgBox "Error: " & Err.Number & vbCrLf & Err.Description
    End If
    Resume Next
End Sub
Private Sub Form_Load()
ChangeTitle
End Sub

 

 

الحكم بعد التجربة

ضع المجلد على D

ChIco.rar

[أبا عمر]

أستاذي الحبيب جزاك_الله_خيراً ورفع ربي قدرك وأعزك وأعز بك ومن تحب ومن تخصهم بالدعاء

لكن المشكلة كما هي قمت بالتجربة على جهازين ولم تتغير الأيقونة على شريط المهام " قمت بوضع البرنامج على D "  :)

تم تعديل سبتمبر 23, 2013 بواسطه أبا عمر

[ابوخليل]

عجيب !!

عندي تظهر الايقونة في الحالات الثلاث كلها .

 

جرب بربط الايقونة من جديد

[أبا عمر]

عجيب !!   
لا تعجب أستاذي هذا ما حدث معي على جهازين 
وجربت ما تفضلت به من اعادة ربط الأيقونة لكن نفس المشكلة قائمة تعمل في حالتين والثالثة وهي الجمع دوما ، اخفاء التسميات لا تعمل   
أحسن _الله_ إليك 

تم تعديل سبتمبر 24, 2013 بواسطه أبا عمر

[ابوخليل]

صدقت 

واذا عرف السبب بطل العجب  ، والسبب هو اني استعجلت بالحكم

 

وعلى كل حال هونها وتهون :

  ايقونة اكسس مفتاح  والمفتاح احسن من القفل   

[أبا عمر]

 

وعلى كل حال هونها وتهون :

  ايقونة اكسس مفتاح  والمفتاح احسن من القفل